Fahad Mirza / Mbed 2 deprecated Nucleo_HXC900

Dependencies:   mbed

Committer:
fahadmirza
Date:
Thu Jul 12 23:08:47 2018 +0000
Revision:
1:168a6afffbff
Parent:
0:a0c5877bd360
Child:
2:1ef859bc5cd2
Updated debug printf; Separated ClassA and ClassC configs; ADC initialization added;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
fahadmirza 0:a0c5877bd360 1 /*
fahadmirza 0:a0c5877bd360 2 _ _ _____ _______
fahadmirza 0:a0c5877bd360 3 | | | | |_ _| |__ __|
fahadmirza 0:a0c5877bd360 4 | |__| | __ ___ __ | | ___ | |
fahadmirza 0:a0c5877bd360 5 | __ |/ _` \ \/ / | | / _ \| |
fahadmirza 0:a0c5877bd360 6 | | | | (_| |> < _| || (_) | |
fahadmirza 0:a0c5877bd360 7 |_| |_|\__,_/_/\_\_____\___/|_|
fahadmirza 0:a0c5877bd360 8 (C)2017 HaxIoT
fahadmirza 0:a0c5877bd360 9 */
fahadmirza 0:a0c5877bd360 10 /*******************************************************************************
fahadmirza 0:a0c5877bd360 11 * @File : lora_driver.c
fahadmirza 0:a0c5877bd360 12 * @Author : Fahad Mirza (Haxiot)
fahadmirza 0:a0c5877bd360 13 * @Version : V1.0.0
fahadmirza 0:a0c5877bd360 14 * @Modified: 12-Apr-2018
fahadmirza 0:a0c5877bd360 15 * @Brief : LoRa Driver
fahadmirza 0:a0c5877bd360 16 ******************************************************************************
fahadmirza 0:a0c5877bd360 17 * @attention
fahadmirza 0:a0c5877bd360 18 *
fahadmirza 0:a0c5877bd360 19 * <h2><center>&copy; COPYRIGHT(c) 2017 Haxiot</center></h2>
fahadmirza 0:a0c5877bd360 20 *
fahadmirza 0:a0c5877bd360 21 * Redistribution and use in source and binary forms, with or without modification,
fahadmirza 0:a0c5877bd360 22 * are permitted provided that the following conditions are met:
fahadmirza 0:a0c5877bd360 23 * 1. Redistributions of source code must retain the above copyright notice,
fahadmirza 0:a0c5877bd360 24 * this list of conditions and the following disclaimer.
fahadmirza 0:a0c5877bd360 25 * 2. Redistributions in binary form must reproduce the above copyright notice,
fahadmirza 0:a0c5877bd360 26 * this list of conditions and the following disclaimer in the documentation
fahadmirza 0:a0c5877bd360 27 * and/or other materials provided with the distribution.
fahadmirza 0:a0c5877bd360 28 * 3. Neither the name of Haxiot nor the names of its contributors
fahadmirza 0:a0c5877bd360 29 * may be used to endorse or promote products derived from this software
fahadmirza 0:a0c5877bd360 30 * without specific prior written permission.
fahadmirza 0:a0c5877bd360 31 *
fahadmirza 0:a0c5877bd360 32 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
fahadmirza 0:a0c5877bd360 33 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
fahadmirza 0:a0c5877bd360 34 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
fahadmirza 0:a0c5877bd360 35 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
fahadmirza 0:a0c5877bd360 36 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
fahadmirza 0:a0c5877bd360 37 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
fahadmirza 0:a0c5877bd360 38 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
fahadmirza 0:a0c5877bd360 39 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
fahadmirza 0:a0c5877bd360 40 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
fahadmirza 0:a0c5877bd360 41 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
fahadmirza 0:a0c5877bd360 42 *
fahadmirza 0:a0c5877bd360 43 ******************************************************************************
fahadmirza 0:a0c5877bd360 44 */
fahadmirza 0:a0c5877bd360 45 /* Includes ------------------------------------------------------------------*/
fahadmirza 0:a0c5877bd360 46 #include <stdio.h>
fahadmirza 0:a0c5877bd360 47 #include "hxc_client.h"
fahadmirza 0:a0c5877bd360 48 #include "debug.h"
fahadmirza 0:a0c5877bd360 49 #include "stm32l0xx_nucleo.h"
fahadmirza 0:a0c5877bd360 50 #include "time_server.h"
fahadmirza 0:a0c5877bd360 51 #include "lora_driver.h"
fahadmirza 0:a0c5877bd360 52 #include "tiny_sscanf.h"
fahadmirza 0:a0c5877bd360 53 #include "utilities.h"
fahadmirza 0:a0c5877bd360 54
fahadmirza 0:a0c5877bd360 55 /* Private Macros ------------------------------------------------------------*/
fahadmirza 0:a0c5877bd360 56 #define JOIN_SEND_DELAY_MAX (10000U) // Randomization range - 10s
fahadmirza 0:a0c5877bd360 57 #define JOIN_STATUS_REQ_DELAY (7000U) // milliseconds. Join req takes 6s.
fahadmirza 0:a0c5877bd360 58
fahadmirza 0:a0c5877bd360 59 /* Private type definitions --------------------------------------------------*/
fahadmirza 0:a0c5877bd360 60 // LoRaWAN State Machine states
fahadmirza 0:a0c5877bd360 61 typedef enum eDevicState
fahadmirza 0:a0c5877bd360 62 {
fahadmirza 0:a0c5877bd360 63 DEVICE_INIT,
fahadmirza 0:a0c5877bd360 64 DEVICE_CONFIG,
fahadmirza 0:a0c5877bd360 65 DEVICE_JOIN,
fahadmirza 0:a0c5877bd360 66 DEVICE_SEND,
fahadmirza 0:a0c5877bd360 67 SLEEP_DEVICE,
fahadmirza 0:a0c5877bd360 68 DEVICE_DATA_RECEIVED,
fahadmirza 0:a0c5877bd360 69 DEVICE_JOIN_STATUS_CHECK
fahadmirza 0:a0c5877bd360 70 } eDeviceState_t;
fahadmirza 0:a0c5877bd360 71
fahadmirza 0:a0c5877bd360 72 /* Private global variables --------------------------------------------------*/
fahadmirza 0:a0c5877bd360 73 static sLoraConfig_t *LoraConfigParam;
fahadmirza 0:a0c5877bd360 74 static sLoraDriverParam_t *LoraDriverParam;
fahadmirza 0:a0c5877bd360 75 static volatile eDeviceState_t DeviceState = DEVICE_INIT;
fahadmirza 0:a0c5877bd360 76
fahadmirza 0:a0c5877bd360 77 static TimerEvent_t JoinRequestTimer;
fahadmirza 0:a0c5877bd360 78 static TimerEvent_t SensorMeasureTimer;
fahadmirza 0:a0c5877bd360 79 static TimerEvent_t NucleoLedTimer;
fahadmirza 0:a0c5877bd360 80 static TimerEvent_t JoinStatusDelayTimer;
fahadmirza 0:a0c5877bd360 81
fahadmirza 0:a0c5877bd360 82 // Object definition for data to be sent to loRa application server
fahadmirza 0:a0c5877bd360 83 static uint8_t DataBinaryBuff[64];
fahadmirza 0:a0c5877bd360 84 static sSendDataBinary_t SendDataBinary = {DataBinaryBuff, 0 , 0, 0};
fahadmirza 0:a0c5877bd360 85
fahadmirza 0:a0c5877bd360 86 // RNG handler declaration
fahadmirza 0:a0c5877bd360 87 RNG_HandleTypeDef RngHandle = {.Instance = RNG};
fahadmirza 0:a0c5877bd360 88
fahadmirza 0:a0c5877bd360 89 /* Private functions ---------------------------------------------------------*/
fahadmirza 0:a0c5877bd360 90 static void Lora_ReadData(sRecvDataBinary_t *receivedData);
fahadmirza 0:a0c5877bd360 91 static void Lora_OnLedTimerEvent(void);
fahadmirza 0:a0c5877bd360 92 static void Lora_OnJoinRequestTimerEvt(void);
fahadmirza 0:a0c5877bd360 93 static void Lora_OnJoinStatusDelayTimerEvt(void);
fahadmirza 0:a0c5877bd360 94 static void Lora_OnSensorMeasureTimerEvt(void);
fahadmirza 0:a0c5877bd360 95 static void setJoinRequestTimer(void);
fahadmirza 0:a0c5877bd360 96
fahadmirza 0:a0c5877bd360 97
fahadmirza 0:a0c5877bd360 98 /* Function definitions ------------------------------------------------------*/
fahadmirza 0:a0c5877bd360 99 /******************************************************************************
fahadmirza 0:a0c5877bd360 100 * @Brief : Initialize LoRa Modem
fahadmirza 0:a0c5877bd360 101 * @Param : sLoraConfig_t
fahadmirza 0:a0c5877bd360 102 * @Return : none
fahadmirza 0:a0c5877bd360 103 ******************************************************************************/
fahadmirza 0:a0c5877bd360 104 void Lora_init(sLoraConfig_t *loraConfig, sLoraDriverParam_t *loraDriverParam)
fahadmirza 0:a0c5877bd360 105 {
fahadmirza 0:a0c5877bd360 106
fahadmirza 0:a0c5877bd360 107 LoraConfigParam = loraConfig;
fahadmirza 0:a0c5877bd360 108 LoraDriverParam = loraDriverParam;
fahadmirza 0:a0c5877bd360 109
fahadmirza 0:a0c5877bd360 110 if(Modem_Init() != AT_OK)
fahadmirza 0:a0c5877bd360 111 {
fahadmirza 0:a0c5877bd360 112 DBG_PRINTF("Modem_Init failed\r\n");
fahadmirza 0:a0c5877bd360 113 }
fahadmirza 0:a0c5877bd360 114
fahadmirza 0:a0c5877bd360 115 // Initialize RNG for join request send randomization
fahadmirza 0:a0c5877bd360 116 HAL_RNG_Init(&RngHandle);
fahadmirza 0:a0c5877bd360 117
fahadmirza 0:a0c5877bd360 118
fahadmirza 0:a0c5877bd360 119 // Timer for join request send
fahadmirza 0:a0c5877bd360 120 TimerInit(&JoinRequestTimer, Lora_OnJoinRequestTimerEvt);
fahadmirza 0:a0c5877bd360 121 // Timer for join status check
fahadmirza 0:a0c5877bd360 122 TimerInit(&JoinStatusDelayTimer, Lora_OnJoinStatusDelayTimerEvt);
fahadmirza 0:a0c5877bd360 123 // Timer for sensor occurrence measure
fahadmirza 0:a0c5877bd360 124 TimerInit(&SensorMeasureTimer, Lora_OnSensorMeasureTimerEvt);
fahadmirza 0:a0c5877bd360 125 // Timer for Nucleo LED
fahadmirza 0:a0c5877bd360 126 TimerInit(&NucleoLedTimer, Lora_OnLedTimerEvent);
fahadmirza 0:a0c5877bd360 127 }
fahadmirza 0:a0c5877bd360 128
fahadmirza 0:a0c5877bd360 129 /******************************************************************************
fahadmirza 0:a0c5877bd360 130 * @Brief : Check if the modem responds
fahadmirza 0:a0c5877bd360 131 * @Param : void
fahadmirza 0:a0c5877bd360 132 * @Return : AT_OK or other eAtStatus_t
fahadmirza 0:a0c5877bd360 133 ******************************************************************************/
fahadmirza 0:a0c5877bd360 134 static eAtStatus_t is_modem_working(void)
fahadmirza 0:a0c5877bd360 135 {
fahadmirza 0:a0c5877bd360 136 return Modem_AT_Cmd(AT_CTRL, AT, NULL);
fahadmirza 0:a0c5877bd360 137 }
fahadmirza 0:a0c5877bd360 138
fahadmirza 0:a0c5877bd360 139 /******************************************************************************
fahadmirza 0:a0c5877bd360 140 * @Brief : Set Device EUI
fahadmirza 0:a0c5877bd360 141 * @Param : Pointer to Device EUI
fahadmirza 0:a0c5877bd360 142 * @Return : AT_OK or other eAtStatus_t
fahadmirza 0:a0c5877bd360 143 ******************************************************************************/
fahadmirza 0:a0c5877bd360 144 eAtStatus_t Lora_setDevEui(char *devEui)
fahadmirza 0:a0c5877bd360 145 {
fahadmirza 0:a0c5877bd360 146 return Modem_AT_Cmd(AT_SET, AT_DEVEUI, devEui);
fahadmirza 0:a0c5877bd360 147 }
fahadmirza 0:a0c5877bd360 148
fahadmirza 0:a0c5877bd360 149 /******************************************************************************
fahadmirza 0:a0c5877bd360 150 * @Brief : Set Application EUI
fahadmirza 0:a0c5877bd360 151 * @Param : Pointer to Application EUI
fahadmirza 0:a0c5877bd360 152 * @Return : AT_OK or other eAtStatus_t
fahadmirza 0:a0c5877bd360 153 ******************************************************************************/
fahadmirza 0:a0c5877bd360 154 eAtStatus_t Lora_setAppEui(char *appEui)
fahadmirza 0:a0c5877bd360 155 {
fahadmirza 0:a0c5877bd360 156 return Modem_AT_Cmd(AT_SET, AT_APPEUI, appEui);
fahadmirza 0:a0c5877bd360 157 }
fahadmirza 0:a0c5877bd360 158
fahadmirza 0:a0c5877bd360 159 /******************************************************************************
fahadmirza 0:a0c5877bd360 160 * @Brief : Set Application Key
fahadmirza 0:a0c5877bd360 161 * @Param : Pointer to Application Key
fahadmirza 0:a0c5877bd360 162 * @Return : AT_OK or other eAtStatus_t
fahadmirza 0:a0c5877bd360 163 ******************************************************************************/
fahadmirza 0:a0c5877bd360 164 eAtStatus_t Lora_setAppKey(char *appKey)
fahadmirza 0:a0c5877bd360 165 {
fahadmirza 0:a0c5877bd360 166 return Modem_AT_Cmd(AT_SET, AT_APPKEY, appKey);
fahadmirza 0:a0c5877bd360 167 }
fahadmirza 0:a0c5877bd360 168
fahadmirza 0:a0c5877bd360 169 /******************************************************************************
fahadmirza 0:a0c5877bd360 170 * @Brief : Set join mode
fahadmirza 0:a0c5877bd360 171 * @Param : OTAA or ABP
fahadmirza 0:a0c5877bd360 172 * @Retval : AT_OK if successful, otherwise other eAtStatus_t
fahadmirza 0:a0c5877bd360 173 ******************************************************************************/
fahadmirza 0:a0c5877bd360 174 eAtStatus_t Lora_setJoinMode(eJoinMode_t joinMode)
fahadmirza 0:a0c5877bd360 175 {
fahadmirza 0:a0c5877bd360 176 if(joinMode == OTAA)
fahadmirza 0:a0c5877bd360 177 {
fahadmirza 0:a0c5877bd360 178 return Modem_AT_Cmd(AT_SET, AT_NJM, "OTAA");
fahadmirza 0:a0c5877bd360 179 }
fahadmirza 0:a0c5877bd360 180
fahadmirza 0:a0c5877bd360 181 return Modem_AT_Cmd(AT_SET, AT_NJM, "ABP");
fahadmirza 0:a0c5877bd360 182 }
fahadmirza 0:a0c5877bd360 183
fahadmirza 0:a0c5877bd360 184 /******************************************************************************
fahadmirza 0:a0c5877bd360 185 * @Brief : Set Class
fahadmirza 0:a0c5877bd360 186 * @Param : CLASS_A or CLASS_C
fahadmirza 0:a0c5877bd360 187 * @Retval : AT_OK if successful, otherwise other eAtStatus_t
fahadmirza 0:a0c5877bd360 188 ******************************************************************************/
fahadmirza 0:a0c5877bd360 189 eAtStatus_t Lora_setClass(char class)
fahadmirza 0:a0c5877bd360 190 {
fahadmirza 0:a0c5877bd360 191 return Modem_AT_Cmd(AT_SET, AT_CLASS, &class);
fahadmirza 0:a0c5877bd360 192 }
fahadmirza 0:a0c5877bd360 193
fahadmirza 0:a0c5877bd360 194 /******************************************************************************
fahadmirza 0:a0c5877bd360 195 * @Brief : Join network and initiate join sleep transition timer
fahadmirza 0:a0c5877bd360 196 * @Param : None
fahadmirza 0:a0c5877bd360 197 * @Retval : AT_OK or other eAtStatus_t
fahadmirza 0:a0c5877bd360 198 ******************************************************************************/
fahadmirza 0:a0c5877bd360 199 static eAtStatus_t Lora_Join(void)
fahadmirza 0:a0c5877bd360 200 {
fahadmirza 0:a0c5877bd360 201 return Modem_AT_Cmd(AT_CTRL, AT_JOIN, NULL);
fahadmirza 0:a0c5877bd360 202 }
fahadmirza 0:a0c5877bd360 203
fahadmirza 0:a0c5877bd360 204 /******************************************************************************
fahadmirza 0:a0c5877bd360 205 * @Brief : Check JOIN status
fahadmirza 0:a0c5877bd360 206 * @Param : None
fahadmirza 0:a0c5877bd360 207 * @Retval : JOINED or NOT_JOINED
fahadmirza 0:a0c5877bd360 208 ******************************************************************************/
fahadmirza 0:a0c5877bd360 209 static eJoinStatus_t Lora_getJoinStatus(void)
fahadmirza 0:a0c5877bd360 210 {
fahadmirza 0:a0c5877bd360 211 char joinStatus[12]; // "NOT JOINED" is 10 characters + 1 Null char
fahadmirza 0:a0c5877bd360 212
fahadmirza 0:a0c5877bd360 213 Modem_AT_Cmd(AT_GET, AT_NJS, joinStatus);
fahadmirza 0:a0c5877bd360 214
fahadmirza 0:a0c5877bd360 215 if(strncmp("JOINED", joinStatus, 6) == 0)
fahadmirza 0:a0c5877bd360 216 {
fahadmirza 0:a0c5877bd360 217 return JOINED;
fahadmirza 0:a0c5877bd360 218 }
fahadmirza 0:a0c5877bd360 219
fahadmirza 0:a0c5877bd360 220 return NOT_JOINED;
fahadmirza 0:a0c5877bd360 221 }
fahadmirza 0:a0c5877bd360 222
fahadmirza 0:a0c5877bd360 223 /******************************************************************************
fahadmirza 0:a0c5877bd360 224 * @Brief : Send uplink packet using binary payload
fahadmirza 0:a0c5877bd360 225 * @Param : Pointer of sSendDataBinary_t variable
fahadmirza 0:a0c5877bd360 226 * @Retval : AT_OK or other eAtStatus_t statuses
fahadmirza 0:a0c5877bd360 227 ******************************************************************************/
fahadmirza 0:a0c5877bd360 228 static eAtStatus_t Lora_SendDataBinary(sSendDataBinary_t *binaryData)
fahadmirza 0:a0c5877bd360 229 {
fahadmirza 0:a0c5877bd360 230 return Modem_AT_Cmd(AT_SET, AT_SENDB, binaryData);
fahadmirza 0:a0c5877bd360 231 }
fahadmirza 0:a0c5877bd360 232
fahadmirza 0:a0c5877bd360 233 /******************************************************************************
fahadmirza 0:a0c5877bd360 234 * @Brief : LoRa Modem state machine
fahadmirza 0:a0c5877bd360 235 * @Param : Void
fahadmirza 0:a0c5877bd360 236 * @Return : None
fahadmirza 0:a0c5877bd360 237 ******************************************************************************/
fahadmirza 0:a0c5877bd360 238 void Lora_fsm(void)
fahadmirza 0:a0c5877bd360 239 {
fahadmirza 0:a0c5877bd360 240 switch(DeviceState)
fahadmirza 0:a0c5877bd360 241 {
fahadmirza 0:a0c5877bd360 242 case DEVICE_INIT:
fahadmirza 0:a0c5877bd360 243 {
fahadmirza 0:a0c5877bd360 244 if(is_modem_working() != AT_OK)
fahadmirza 0:a0c5877bd360 245 {
fahadmirza 1:168a6afffbff 246 DBG_PRINTF("AT failed. Resetting HW...\r\n");
fahadmirza 0:a0c5877bd360 247 // Modem isn't responding. Execute hard reset.
fahadmirza 0:a0c5877bd360 248 Modem_HardReset();
fahadmirza 0:a0c5877bd360 249 // We stay in DEVICE_INIT state and try again.
fahadmirza 0:a0c5877bd360 250 }
fahadmirza 0:a0c5877bd360 251 else
fahadmirza 0:a0c5877bd360 252 {
fahadmirza 0:a0c5877bd360 253 DeviceState = DEVICE_CONFIG;
fahadmirza 0:a0c5877bd360 254 }
fahadmirza 0:a0c5877bd360 255
fahadmirza 0:a0c5877bd360 256 break;
fahadmirza 0:a0c5877bd360 257 }
fahadmirza 0:a0c5877bd360 258 case DEVICE_CONFIG:
fahadmirza 0:a0c5877bd360 259 {
fahadmirza 0:a0c5877bd360 260 eAtStatus_t loraModemRetCode = Lora_setDevEui(LoraConfigParam->devEui);
fahadmirza 0:a0c5877bd360 261 loraModemRetCode |= Lora_setAppEui(LoraConfigParam->appEui);
fahadmirza 0:a0c5877bd360 262 loraModemRetCode |= Lora_setAppKey(LoraConfigParam->appKey);
fahadmirza 0:a0c5877bd360 263 loraModemRetCode |= Lora_setJoinMode(LoraConfigParam->joinMode);
fahadmirza 0:a0c5877bd360 264 loraModemRetCode |= Lora_setClass(LoraConfigParam->class_);
fahadmirza 0:a0c5877bd360 265 // ToDo: Maybe add FW version checking
fahadmirza 0:a0c5877bd360 266
fahadmirza 0:a0c5877bd360 267 if(loraModemRetCode == AT_OK)
fahadmirza 0:a0c5877bd360 268 {
fahadmirza 0:a0c5877bd360 269 setJoinRequestTimer();
fahadmirza 0:a0c5877bd360 270 DeviceState = SLEEP_DEVICE;
fahadmirza 0:a0c5877bd360 271 }
fahadmirza 0:a0c5877bd360 272 else if(loraModemRetCode == AT_TIMEOUT)
fahadmirza 0:a0c5877bd360 273 {
fahadmirza 0:a0c5877bd360 274 DeviceState = DEVICE_INIT;
fahadmirza 0:a0c5877bd360 275 }
fahadmirza 0:a0c5877bd360 276 else
fahadmirza 0:a0c5877bd360 277 {
fahadmirza 0:a0c5877bd360 278 DBG_PRINTF("Check your keys\r\n");
fahadmirza 0:a0c5877bd360 279 // We stay in DEVICE_CONFIG and try again
fahadmirza 0:a0c5877bd360 280 }
fahadmirza 0:a0c5877bd360 281
fahadmirza 0:a0c5877bd360 282 break;
fahadmirza 0:a0c5877bd360 283 }
fahadmirza 0:a0c5877bd360 284 case DEVICE_JOIN:
fahadmirza 0:a0c5877bd360 285 {
fahadmirza 1:168a6afffbff 286 DBG_PRINTF("Joining...\r\n");
fahadmirza 0:a0c5877bd360 287 // Indicate a Join request using Nucleo LED
fahadmirza 0:a0c5877bd360 288 BSP_LED_On(LED_GREEN);
fahadmirza 0:a0c5877bd360 289 TimerStart(&NucleoLedTimer, 200);
fahadmirza 0:a0c5877bd360 290
fahadmirza 0:a0c5877bd360 291 switch(Lora_Join())
fahadmirza 0:a0c5877bd360 292 {
fahadmirza 0:a0c5877bd360 293 case AT_OK:
fahadmirza 0:a0c5877bd360 294 {
fahadmirza 0:a0c5877bd360 295 // Start the Join status request timer and go to sleep
fahadmirza 0:a0c5877bd360 296 TimerStart(&JoinStatusDelayTimer, JOIN_STATUS_REQ_DELAY);
fahadmirza 0:a0c5877bd360 297 DeviceState = SLEEP_DEVICE;
fahadmirza 0:a0c5877bd360 298 break;
fahadmirza 0:a0c5877bd360 299 }
fahadmirza 0:a0c5877bd360 300 case AT_TIMEOUT:
fahadmirza 0:a0c5877bd360 301 {
fahadmirza 0:a0c5877bd360 302 // The modem isn't responding. Check if it is working
fahadmirza 0:a0c5877bd360 303 DeviceState = DEVICE_INIT;
fahadmirza 0:a0c5877bd360 304 break;
fahadmirza 0:a0c5877bd360 305 }
fahadmirza 0:a0c5877bd360 306 default:
fahadmirza 0:a0c5877bd360 307 {
fahadmirza 0:a0c5877bd360 308 DBG_PRINTF("Join cmd failed\n");
fahadmirza 0:a0c5877bd360 309 // We stay in DEVICE_JOIN state and redo Lora_Join()
fahadmirza 0:a0c5877bd360 310 break;
fahadmirza 0:a0c5877bd360 311 }
fahadmirza 0:a0c5877bd360 312 }
fahadmirza 0:a0c5877bd360 313
fahadmirza 0:a0c5877bd360 314 break;
fahadmirza 0:a0c5877bd360 315 }
fahadmirza 0:a0c5877bd360 316 case DEVICE_JOIN_STATUS_CHECK:
fahadmirza 0:a0c5877bd360 317 {
fahadmirza 0:a0c5877bd360 318 if(Lora_getJoinStatus() == JOINED)
fahadmirza 0:a0c5877bd360 319 {
fahadmirza 0:a0c5877bd360 320 DBG_PRINTF("Nwk Joined\n");
fahadmirza 0:a0c5877bd360 321 // Start timer for uplink transmission for sensor-data
fahadmirza 0:a0c5877bd360 322 TimerStart( &SensorMeasureTimer, LoraDriverParam->SensorMeasureTime);
fahadmirza 0:a0c5877bd360 323 DeviceState = SLEEP_DEVICE;
fahadmirza 0:a0c5877bd360 324 }
fahadmirza 0:a0c5877bd360 325 else
fahadmirza 0:a0c5877bd360 326 {
fahadmirza 0:a0c5877bd360 327 // Try joining again
fahadmirza 0:a0c5877bd360 328 setJoinRequestTimer();
fahadmirza 0:a0c5877bd360 329 DeviceState = SLEEP_DEVICE;
fahadmirza 0:a0c5877bd360 330 }
fahadmirza 0:a0c5877bd360 331 break;
fahadmirza 0:a0c5877bd360 332 }
fahadmirza 0:a0c5877bd360 333 case SLEEP_DEVICE:
fahadmirza 0:a0c5877bd360 334 {
fahadmirza 0:a0c5877bd360 335 /* Wake up through RTC events or asynchronous event coming from HXC modem*/
fahadmirza 0:a0c5877bd360 336 if(Modem_IsNewDataReceived() == true)
fahadmirza 0:a0c5877bd360 337 {
fahadmirza 0:a0c5877bd360 338 DeviceState = DEVICE_DATA_RECEIVED;
fahadmirza 0:a0c5877bd360 339 }
fahadmirza 0:a0c5877bd360 340 break;
fahadmirza 0:a0c5877bd360 341 }
fahadmirza 0:a0c5877bd360 342 case DEVICE_SEND:
fahadmirza 0:a0c5877bd360 343 {
fahadmirza 0:a0c5877bd360 344 // Read sensor data and populate payload
fahadmirza 0:a0c5877bd360 345 LoraDriverParam->SendDataHandler(SendDataBinary.Buffer, &SendDataBinary.DataSize, &SendDataBinary.Ack, &SendDataBinary.Port);
fahadmirza 0:a0c5877bd360 346
fahadmirza 0:a0c5877bd360 347 // Initiate uplink transmission
fahadmirza 0:a0c5877bd360 348 eAtStatus_t status = Lora_SendDataBinary(&SendDataBinary);
fahadmirza 0:a0c5877bd360 349 if (status == AT_OK)
fahadmirza 0:a0c5877bd360 350 {
fahadmirza 0:a0c5877bd360 351 // Schedule the next packet
fahadmirza 0:a0c5877bd360 352 TimerStart( &SensorMeasureTimer, LoraDriverParam->SensorMeasureTime );
fahadmirza 0:a0c5877bd360 353 DeviceState = SLEEP_DEVICE;
fahadmirza 0:a0c5877bd360 354 }
fahadmirza 0:a0c5877bd360 355 else if(status == AT_TIMEOUT)
fahadmirza 0:a0c5877bd360 356 {
fahadmirza 0:a0c5877bd360 357 // Device isn't responding. Go to init.
fahadmirza 0:a0c5877bd360 358 DeviceState = DEVICE_INIT;
fahadmirza 0:a0c5877bd360 359 }
fahadmirza 0:a0c5877bd360 360
fahadmirza 0:a0c5877bd360 361 break;
fahadmirza 0:a0c5877bd360 362 }
fahadmirza 0:a0c5877bd360 363 case DEVICE_DATA_RECEIVED:
fahadmirza 0:a0c5877bd360 364 {
fahadmirza 0:a0c5877bd360 365 uint8_t rBuffer[64];
fahadmirza 0:a0c5877bd360 366 sRecvDataBinary_t rxPacket = {.Buffer = rBuffer};
fahadmirza 0:a0c5877bd360 367
fahadmirza 0:a0c5877bd360 368 Lora_ReadData(&rxPacket);
fahadmirza 0:a0c5877bd360 369
fahadmirza 0:a0c5877bd360 370 // Execute users ReceivedPacketHandler function
fahadmirza 0:a0c5877bd360 371 LoraDriverParam->ReceiveDataHandler(rxPacket.Buffer, rxPacket.DataSize, rxPacket.Ack, rxPacket.Port);
fahadmirza 0:a0c5877bd360 372
fahadmirza 0:a0c5877bd360 373 DeviceState = SLEEP_DEVICE;
fahadmirza 0:a0c5877bd360 374 break;
fahadmirza 0:a0c5877bd360 375 }
fahadmirza 0:a0c5877bd360 376 default:
fahadmirza 0:a0c5877bd360 377 {
fahadmirza 0:a0c5877bd360 378 DeviceState = DEVICE_INIT;
fahadmirza 0:a0c5877bd360 379 break;
fahadmirza 0:a0c5877bd360 380 }
fahadmirza 0:a0c5877bd360 381 }
fahadmirza 0:a0c5877bd360 382 }
fahadmirza 0:a0c5877bd360 383
fahadmirza 0:a0c5877bd360 384 static void setJoinRequestTimer(void)
fahadmirza 0:a0c5877bd360 385 {
fahadmirza 0:a0c5877bd360 386 // Use a random delay to avoid synchronized join request from all LoRa node after power up
fahadmirza 0:a0c5877bd360 387 uint32_t joinDelay = (HAL_RNG_GetRandomNumber(&RngHandle) % JOIN_SEND_DELAY_MAX) + 1;
fahadmirza 0:a0c5877bd360 388 TimerStart( &JoinRequestTimer, joinDelay);
fahadmirza 0:a0c5877bd360 389 }
fahadmirza 0:a0c5877bd360 390
fahadmirza 0:a0c5877bd360 391 /******************************************************************************
fahadmirza 0:a0c5877bd360 392 * @Brief : Function executed on JoinStatusDelayTimer Timeout event
fahadmirza 0:a0c5877bd360 393 * @Param : none
fahadmirza 0:a0c5877bd360 394 * @Return : none
fahadmirza 0:a0c5877bd360 395 ******************************************************************************/
fahadmirza 0:a0c5877bd360 396 static void Lora_OnJoinRequestTimerEvt(void)
fahadmirza 0:a0c5877bd360 397 {
fahadmirza 0:a0c5877bd360 398 TimerStop(&JoinRequestTimer);
fahadmirza 0:a0c5877bd360 399 DeviceState = DEVICE_JOIN;
fahadmirza 0:a0c5877bd360 400 }
fahadmirza 0:a0c5877bd360 401
fahadmirza 0:a0c5877bd360 402 /******************************************************************************
fahadmirza 0:a0c5877bd360 403 * @Brief : Function executed on NucleoLedTimer Timeout event
fahadmirza 0:a0c5877bd360 404 * @Param : none
fahadmirza 0:a0c5877bd360 405 * @Return : none
fahadmirza 0:a0c5877bd360 406 ******************************************************************************/
fahadmirza 0:a0c5877bd360 407 static void Lora_OnLedTimerEvent(void)
fahadmirza 0:a0c5877bd360 408 {
fahadmirza 0:a0c5877bd360 409 TimerStop(&NucleoLedTimer);
fahadmirza 0:a0c5877bd360 410 BSP_LED_Off(LED_GREEN);
fahadmirza 0:a0c5877bd360 411 }
fahadmirza 0:a0c5877bd360 412
fahadmirza 0:a0c5877bd360 413 /******************************************************************************
fahadmirza 0:a0c5877bd360 414 * @Brief : Function executed on JoinStatusDelayTimer Timeout event
fahadmirza 0:a0c5877bd360 415 * @Param : none
fahadmirza 0:a0c5877bd360 416 * @Return : none
fahadmirza 0:a0c5877bd360 417 ******************************************************************************/
fahadmirza 0:a0c5877bd360 418 static void Lora_OnJoinStatusDelayTimerEvt(void)
fahadmirza 0:a0c5877bd360 419 {
fahadmirza 0:a0c5877bd360 420 TimerStop( &JoinStatusDelayTimer );
fahadmirza 0:a0c5877bd360 421 DeviceState = DEVICE_JOIN_STATUS_CHECK;
fahadmirza 0:a0c5877bd360 422 }
fahadmirza 0:a0c5877bd360 423
fahadmirza 0:a0c5877bd360 424 /******************************************************************************
fahadmirza 0:a0c5877bd360 425 * @Brief : Function executed on SensorMeasureTimer Timeout event
fahadmirza 0:a0c5877bd360 426 * @Param : none
fahadmirza 0:a0c5877bd360 427 * @Return : none
fahadmirza 0:a0c5877bd360 428 ******************************************************************************/
fahadmirza 0:a0c5877bd360 429 static void Lora_OnSensorMeasureTimerEvt(void)
fahadmirza 0:a0c5877bd360 430 {
fahadmirza 0:a0c5877bd360 431 TimerStop( &SensorMeasureTimer );
fahadmirza 0:a0c5877bd360 432 DeviceState = DEVICE_SEND;
fahadmirza 0:a0c5877bd360 433 }
fahadmirza 0:a0c5877bd360 434
fahadmirza 0:a0c5877bd360 435 /******************************************************************************
fahadmirza 0:a0c5877bd360 436 * @Brief : Read the received downlink packet
fahadmirza 0:a0c5877bd360 437 * @Param : Pointer to sRecvDataBinary_t variable
fahadmirza 0:a0c5877bd360 438 * @Return : none
fahadmirza 0:a0c5877bd360 439 ******************************************************************************/
fahadmirza 0:a0c5877bd360 440 static void Lora_ReadData(sRecvDataBinary_t *receivedData)
fahadmirza 0:a0c5877bd360 441 {
fahadmirza 0:a0c5877bd360 442 char receiveString[64];
fahadmirza 0:a0c5877bd360 443
fahadmirza 0:a0c5877bd360 444 Modem_AT_Cmd(AT_GET, AT_RECVB, receiveString);
fahadmirza 0:a0c5877bd360 445
fahadmirza 0:a0c5877bd360 446 tiny_sscanf(receiveString, "%hhu,%hhu", &(receivedData->Ack), &(receivedData->Port));
fahadmirza 0:a0c5877bd360 447
fahadmirza 0:a0c5877bd360 448 // Find the position after the second comma
fahadmirza 0:a0c5877bd360 449 char *hexString = strchr((strchr(receiveString,',') + 1),',') + 1;
fahadmirza 0:a0c5877bd360 450
fahadmirza 0:a0c5877bd360 451 receivedData->DataSize = stringHexToByteArray(hexString, receivedData->Buffer, 64);
fahadmirza 0:a0c5877bd360 452 }
fahadmirza 0:a0c5877bd360 453
fahadmirza 0:a0c5877bd360 454 /******************************************************************************
fahadmirza 0:a0c5877bd360 455 * @brief RNG MSP Initialization
fahadmirza 0:a0c5877bd360 456 * This function configures the hardware resources used in this example:
fahadmirza 0:a0c5877bd360 457 * - Peripheral's clock enable
fahadmirza 0:a0c5877bd360 458 * @param hrng: RNG handle pointer
fahadmirza 0:a0c5877bd360 459 * @retval None
fahadmirza 0:a0c5877bd360 460 ******************************************************************************/
fahadmirza 0:a0c5877bd360 461 void HAL_RNG_MspInit(RNG_HandleTypeDef *hrng)
fahadmirza 0:a0c5877bd360 462 {
fahadmirza 0:a0c5877bd360 463 /* RNG Peripheral clock enable */
fahadmirza 0:a0c5877bd360 464 __HAL_RCC_RNG_CLK_ENABLE();
fahadmirza 0:a0c5877bd360 465 }
fahadmirza 0:a0c5877bd360 466
fahadmirza 0:a0c5877bd360 467