wayne roberts / Mbed OS LoRaWAN_singlechannel_endnode

end node on synchronous star LoRa network.

Dependencies:   SX127x sx12xx_hal TSL2561

radio chip selection

Radio chip driver is not included, allowing choice of radio device.
If you're using SX1272 or SX1276, then import sx127x driver into your program.
if you're using SX1261 or SX1262, then import sx126x driver into your program.
if you're using SX1280, then import sx1280 driver into your program.
If you're using NAmote72 or Murata discovery, then you must import only sx127x driver.

This project for use with LoRaWAN_singlechannel_gateway project.

Alternately gateway running on raspberry pi can be used as gateway.

LoRaWAN on single radio channel

Network description is at gateway project page. Synchronous star network.

Hardware Support

This project supports SX1276 and SX1272, sx126x kit, sx126x shield, and sx128x 2.4GHz. The ST board B-L072Z-LRWAN1 is also supported (TypeABZ module). When B-L072Z-LRWAN1 target is selected, TARGET_DISCO_L072CZ_LRWAN1 is defined by tools, allowing correct radio driver configuration for this platform. Alternately, any mbed board that can use LoRa radio shield board should work, but NUCLEO boards are tested.

End-node Unique ID

DevEUI is created from CPU serial number. AppEUI and AppKey are declared as software constants.

End-node Configuration

Data rate definition LORAMAC_DEFAULT_DATARATE configured in LoRaMac-definitions.h. See gateway project page for configuration of gateway.
LoRaWAN addressing is configured in Comissioning.h; only OTA mode is functional.
Header file board/lora_config.h, selects application layer options (i.e. sensors) to be compiled in.

Serial Interface

Serial port operates at 115200bps.
Application layer single_us915_main.cpp User button triggers uplink (i.e. blue button on nucleo board), or jumper enables continuously sends repeated uplink packets. The MAC layer holds each uplink request until the allocated timeslot.

commandargumentsdescription
?-print available commands
. (period)-print status (DevEUI, DevAddr, etc)
ullength integerset payload length of test uplink packets

sensor demo

Selected grove sensors may be plugged into SX1272 shield.
To enable, edit lora_config.h to define SENSORS.

Sensor connections on SX1272MB2xAS:

D8 D9: buttonRX TX: (unused)A3 A4: Rotary Angle Sensor
D6 D7: RGB LEDSCL SDA: digital light sensorA1 A2: Rotary Angle Sensor

Digital input pin, state reported via uplink: PC8
Digital output pin, controlled via downlink: PC6
PWM out: PB_10

Jumper enables auto-repeated transmit: PC10 and PC12 on NUCLEO board, located on end of morpho headers nearby JP4.

app/single_us915_main.cpp@2:f2d9aa163652, 2017-05-23 (annotated)

Committer:
dudmuck
Date:
Tue May 23 17:50:14 2017 +0000
Revision:
2:f2d9aa163652
Parent:
1:53c30224eda8
Child:
4:d9201410c87b
rejoin network after several missed beacons

Who changed what in which revision?

UserRevisionLine numberNew contents of line
dudmuck 0:8f0d0ae0a077 1 /*
dudmuck 0:8f0d0ae0a077 2 / _____) _ | |
dudmuck 0:8f0d0ae0a077 3 ( (____ _____ ____ _| |_ _____ ____| |__
dudmuck 0:8f0d0ae0a077 4 \____ \| ___ | (_ _) ___ |/ ___) _ \
dudmuck 0:8f0d0ae0a077 5 _____) ) ____| | | || |_| ____( (___| | | |
dudmuck 0:8f0d0ae0a077 6 (______/|_____)_|_|_| \__)_____)\____)_| |_|
dudmuck 0:8f0d0ae0a077 7 (C)2015 Semtech
dudmuck 0:8f0d0ae0a077 8
dudmuck 0:8f0d0ae0a077 9 Description: LoRaMac classA device implementation
dudmuck 0:8f0d0ae0a077 10
dudmuck 0:8f0d0ae0a077 11 License: Revised BSD License, see LICENSE.TXT file include in the project
dudmuck 0:8f0d0ae0a077 12
dudmuck 0:8f0d0ae0a077 13 Maintainer: Miguel Luis and Gregory Cristian
dudmuck 0:8f0d0ae0a077 14 */
dudmuck 0:8f0d0ae0a077 15 #include "mbed.h"
dudmuck 0:8f0d0ae0a077 16 #include "board.h"
dudmuck 0:8f0d0ae0a077 17 #include "radio.h"
dudmuck 0:8f0d0ae0a077 18
dudmuck 0:8f0d0ae0a077 19 #include "LoRaMac.h"
dudmuck 0:8f0d0ae0a077 20 #include "Commissioning.h"
dudmuck 0:8f0d0ae0a077 21
dudmuck 0:8f0d0ae0a077 22 Serial pc( USBTX, USBRX );
dudmuck 0:8f0d0ae0a077 23 char pcbuf[128];
dudmuck 0:8f0d0ae0a077 24 int pcbuf_len;
dudmuck 0:8f0d0ae0a077 25
dudmuck 0:8f0d0ae0a077 26 /*!
dudmuck 0:8f0d0ae0a077 27 * Defines the application data transmission duty cycle. 5s, value in [ms].
dudmuck 0:8f0d0ae0a077 28 */
dudmuck 0:8f0d0ae0a077 29 #define APP_TX_DUTYCYCLE 5000
dudmuck 0:8f0d0ae0a077 30
dudmuck 0:8f0d0ae0a077 31 /*!
dudmuck 0:8f0d0ae0a077 32 * Defines a random delay for application data transmission duty cycle. 1s,
dudmuck 0:8f0d0ae0a077 33 * value in [ms].
dudmuck 0:8f0d0ae0a077 34 */
dudmuck 0:8f0d0ae0a077 35 #define APP_TX_DUTYCYCLE_RND 1000
dudmuck 0:8f0d0ae0a077 36
dudmuck 0:8f0d0ae0a077 37 /*!
dudmuck 0:8f0d0ae0a077 38 * Default datarate
dudmuck 0:8f0d0ae0a077 39 */
dudmuck 0:8f0d0ae0a077 40 #define LORAWAN_DEFAULT_DATARATE DR_10
dudmuck 0:8f0d0ae0a077 41
dudmuck 0:8f0d0ae0a077 42 /*!
dudmuck 0:8f0d0ae0a077 43 * LoRaWAN confirmed messages
dudmuck 0:8f0d0ae0a077 44 */
dudmuck 0:8f0d0ae0a077 45 #define LORAWAN_CONFIRMED_MSG_ON true
dudmuck 0:8f0d0ae0a077 46
dudmuck 0:8f0d0ae0a077 47 /*!
dudmuck 0:8f0d0ae0a077 48 * LoRaWAN application port
dudmuck 0:8f0d0ae0a077 49 */
dudmuck 0:8f0d0ae0a077 50 #define LORAWAN_APP_PORT 15
dudmuck 0:8f0d0ae0a077 51
dudmuck 0:8f0d0ae0a077 52 /*!
dudmuck 0:8f0d0ae0a077 53 * User application data buffer size
dudmuck 0:8f0d0ae0a077 54 */
dudmuck 0:8f0d0ae0a077 55 #if ( LORAWAN_CONFIRMED_MSG_ON == 1 )
dudmuck 0:8f0d0ae0a077 56 #define LORAWAN_APP_DATA_SIZE 6
dudmuck 0:8f0d0ae0a077 57
dudmuck 0:8f0d0ae0a077 58 #else
dudmuck 0:8f0d0ae0a077 59 #define LORAWAN_APP_DATA_SIZE 1
dudmuck 0:8f0d0ae0a077 60
dudmuck 0:8f0d0ae0a077 61 #endif
dudmuck 0:8f0d0ae0a077 62
dudmuck 0:8f0d0ae0a077 63 static uint8_t DevEui[] = LORAWAN_DEVICE_EUI;
dudmuck 0:8f0d0ae0a077 64 static uint8_t AppEui[] = LORAWAN_APPLICATION_EUI;
dudmuck 0:8f0d0ae0a077 65 static uint8_t AppKey[] = LORAWAN_APPLICATION_KEY;
dudmuck 0:8f0d0ae0a077 66
dudmuck 0:8f0d0ae0a077 67 #if( OVER_THE_AIR_ACTIVATION == 0 )
dudmuck 0:8f0d0ae0a077 68
dudmuck 0:8f0d0ae0a077 69 static uint8_t NwkSKey[] = LORAWAN_NWKSKEY;
dudmuck 0:8f0d0ae0a077 70 static uint8_t AppSKey[] = LORAWAN_APPSKEY;
dudmuck 0:8f0d0ae0a077 71
dudmuck 0:8f0d0ae0a077 72 /*!
dudmuck 0:8f0d0ae0a077 73 * Device address
dudmuck 0:8f0d0ae0a077 74 */
dudmuck 0:8f0d0ae0a077 75 static uint32_t DevAddr = LORAWAN_DEVICE_ADDRESS;
dudmuck 0:8f0d0ae0a077 76
dudmuck 0:8f0d0ae0a077 77 #endif
dudmuck 0:8f0d0ae0a077 78
dudmuck 0:8f0d0ae0a077 79 /*!
dudmuck 0:8f0d0ae0a077 80 * Application port
dudmuck 0:8f0d0ae0a077 81 */
dudmuck 0:8f0d0ae0a077 82 static uint8_t AppPort = LORAWAN_APP_PORT;
dudmuck 0:8f0d0ae0a077 83
dudmuck 0:8f0d0ae0a077 84 /*!
dudmuck 0:8f0d0ae0a077 85 * User application data size
dudmuck 0:8f0d0ae0a077 86 */
dudmuck 0:8f0d0ae0a077 87 static uint8_t AppDataSize = LORAWAN_APP_DATA_SIZE;
dudmuck 0:8f0d0ae0a077 88 static unsigned int uplink_length; // user assigned
dudmuck 0:8f0d0ae0a077 89
dudmuck 0:8f0d0ae0a077 90 /*!
dudmuck 0:8f0d0ae0a077 91 * User application data buffer size
dudmuck 0:8f0d0ae0a077 92 */
dudmuck 0:8f0d0ae0a077 93 #define LORAWAN_APP_DATA_MAX_SIZE 128
dudmuck 0:8f0d0ae0a077 94
dudmuck 0:8f0d0ae0a077 95 /*!
dudmuck 0:8f0d0ae0a077 96 * User application data
dudmuck 0:8f0d0ae0a077 97 */
dudmuck 0:8f0d0ae0a077 98 static uint8_t AppData[LORAWAN_APP_DATA_MAX_SIZE];
dudmuck 0:8f0d0ae0a077 99
dudmuck 0:8f0d0ae0a077 100 /*!
dudmuck 0:8f0d0ae0a077 101 * Indicates if the node is sending confirmed or unconfirmed messages
dudmuck 0:8f0d0ae0a077 102 */
dudmuck 0:8f0d0ae0a077 103 static uint8_t IsTxConfirmed = LORAWAN_CONFIRMED_MSG_ON;
dudmuck 0:8f0d0ae0a077 104
dudmuck 0:8f0d0ae0a077 105 /*!
dudmuck 0:8f0d0ae0a077 106 * Defines the application data transmission duty cycle
dudmuck 0:8f0d0ae0a077 107 */
dudmuck 0:8f0d0ae0a077 108 static uint32_t TxDutyCycleTime;
dudmuck 0:8f0d0ae0a077 109
dudmuck 0:8f0d0ae0a077 110 /*!
dudmuck 0:8f0d0ae0a077 111 * Timer to handle the application data transmission duty cycle
dudmuck 0:8f0d0ae0a077 112 */
dudmuck 0:8f0d0ae0a077 113 LowPowerTimeout TxNextPacketTimer;
dudmuck 0:8f0d0ae0a077 114
dudmuck 0:8f0d0ae0a077 115 volatile bool send_at_beacon;
dudmuck 0:8f0d0ae0a077 116 volatile bool awaiting_mcps_indic;
dudmuck 0:8f0d0ae0a077 117 /*!
dudmuck 0:8f0d0ae0a077 118 * Specifies the state of the application LED
dudmuck 0:8f0d0ae0a077 119 */
dudmuck 0:8f0d0ae0a077 120 static bool AppLedStateOn = false;
dudmuck 0:8f0d0ae0a077 121
dudmuck 0:8f0d0ae0a077 122 /*!
dudmuck 0:8f0d0ae0a077 123 * Indicates if a new packet can be sent
dudmuck 0:8f0d0ae0a077 124 */
dudmuck 0:8f0d0ae0a077 125 static bool NextTx = true;
dudmuck 0:8f0d0ae0a077 126
dudmuck 0:8f0d0ae0a077 127 /*!
dudmuck 0:8f0d0ae0a077 128 * Device states
dudmuck 0:8f0d0ae0a077 129 */
dudmuck 0:8f0d0ae0a077 130 static enum eDeviceState
dudmuck 0:8f0d0ae0a077 131 {
dudmuck 0:8f0d0ae0a077 132 DEVICE_STATE_INIT,
dudmuck 0:8f0d0ae0a077 133 DEVICE_STATE_JOIN,
dudmuck 0:8f0d0ae0a077 134 DEVICE_STATE_SEND,
dudmuck 0:8f0d0ae0a077 135 DEVICE_STATE_CYCLE,
dudmuck 0:8f0d0ae0a077 136 DEVICE_STATE_SLEEP
dudmuck 0:8f0d0ae0a077 137 }DeviceState;
dudmuck 0:8f0d0ae0a077 138
dudmuck 0:8f0d0ae0a077 139 /*!
dudmuck 0:8f0d0ae0a077 140 * Strucure containing the Uplink status
dudmuck 0:8f0d0ae0a077 141 */
dudmuck 0:8f0d0ae0a077 142 struct sLoRaMacUplinkStatus
dudmuck 0:8f0d0ae0a077 143 {
dudmuck 0:8f0d0ae0a077 144 uint8_t Acked;
dudmuck 0:8f0d0ae0a077 145 //int8_t Datarate;
dudmuck 0:8f0d0ae0a077 146 uint16_t UplinkCounter;
dudmuck 0:8f0d0ae0a077 147 uint8_t Port;
dudmuck 0:8f0d0ae0a077 148 uint8_t *Buffer;
dudmuck 0:8f0d0ae0a077 149 uint8_t BufferSize;
dudmuck 0:8f0d0ae0a077 150 }LoRaMacUplinkStatus;
dudmuck 0:8f0d0ae0a077 151 //volatile bool UplinkStatusUpdated = false;
dudmuck 0:8f0d0ae0a077 152
dudmuck 0:8f0d0ae0a077 153 /*!
dudmuck 0:8f0d0ae0a077 154 * Strucure containing the Downlink status
dudmuck 0:8f0d0ae0a077 155 */
dudmuck 0:8f0d0ae0a077 156 struct sLoRaMacDownlinkStatus
dudmuck 0:8f0d0ae0a077 157 {
dudmuck 0:8f0d0ae0a077 158 int16_t Rssi;
dudmuck 0:8f0d0ae0a077 159 int8_t Snr;
dudmuck 0:8f0d0ae0a077 160 uint16_t DownlinkCounter;
dudmuck 0:8f0d0ae0a077 161 bool RxData;
dudmuck 0:8f0d0ae0a077 162 uint8_t Port;
dudmuck 0:8f0d0ae0a077 163 uint8_t *Buffer;
dudmuck 0:8f0d0ae0a077 164 uint8_t BufferSize;
dudmuck 0:8f0d0ae0a077 165 }LoRaMacDownlinkStatus;
dudmuck 0:8f0d0ae0a077 166
dudmuck 2:f2d9aa163652 167 static uint8_t missed_count;
dudmuck 2:f2d9aa163652 168
dudmuck 0:8f0d0ae0a077 169
dudmuck 0:8f0d0ae0a077 170 /*!
dudmuck 0:8f0d0ae0a077 171 * \brief Prepares the payload of the frame
dudmuck 0:8f0d0ae0a077 172 */
dudmuck 0:8f0d0ae0a077 173 static void PrepareTxFrame( uint8_t port )
dudmuck 0:8f0d0ae0a077 174 {
dudmuck 0:8f0d0ae0a077 175 switch( port )
dudmuck 0:8f0d0ae0a077 176 {
dudmuck 0:8f0d0ae0a077 177 case 15:
dudmuck 0:8f0d0ae0a077 178 {
dudmuck 0:8f0d0ae0a077 179 AppData[0] = AppLedStateOn;
dudmuck 0:8f0d0ae0a077 180 if( IsTxConfirmed == true )
dudmuck 0:8f0d0ae0a077 181 {
dudmuck 0:8f0d0ae0a077 182 AppData[1] = LoRaMacDownlinkStatus.DownlinkCounter >> 8;
dudmuck 0:8f0d0ae0a077 183 AppData[2] = LoRaMacDownlinkStatus.DownlinkCounter;
dudmuck 0:8f0d0ae0a077 184 AppData[3] = LoRaMacDownlinkStatus.Rssi >> 8;
dudmuck 0:8f0d0ae0a077 185 AppData[4] = LoRaMacDownlinkStatus.Rssi;
dudmuck 0:8f0d0ae0a077 186 AppData[5] = LoRaMacDownlinkStatus.Snr;
dudmuck 0:8f0d0ae0a077 187 }
dudmuck 0:8f0d0ae0a077 188 }
dudmuck 0:8f0d0ae0a077 189 break;
dudmuck 0:8f0d0ae0a077 190 default:
dudmuck 0:8f0d0ae0a077 191 break;
dudmuck 0:8f0d0ae0a077 192 }
dudmuck 0:8f0d0ae0a077 193 }
dudmuck 0:8f0d0ae0a077 194
dudmuck 0:8f0d0ae0a077 195 void
dudmuck 0:8f0d0ae0a077 196 LoRaMacEventInfoStatus_to_string(LoRaMacEventInfoStatus_t status, char* dst)
dudmuck 0:8f0d0ae0a077 197 {
dudmuck 0:8f0d0ae0a077 198 const char* ptr = NULL;
dudmuck 0:8f0d0ae0a077 199
dudmuck 0:8f0d0ae0a077 200 switch (status) {
dudmuck 0:8f0d0ae0a077 201 case LORAMAC_EVENT_INFO_STATUS_RX_ERROR: ptr = "RX_ERROR"; break;
dudmuck 0:8f0d0ae0a077 202 case LORAMAC_EVENT_INFO_STATUS_OK: ptr = "OK"; break;
dudmuck 2:f2d9aa163652 203 case LORAMAC_EVENT_INFO_STATUS_ERROR_RX_MTYPE: ptr = "ERROR_RX_MTYPE"; break;
dudmuck 2:f2d9aa163652 204 case LORAMAC_EVENT_INFO_STATUS_ERROR_SEND: ptr = "ERROR_SEND"; break;
dudmuck 2:f2d9aa163652 205 case LORAMAC_EVENT_INFO_STATUS_ERROR_JOIN_ACCEPT: ptr = "ERROR_JOIN_ACCEPT"; break;
dudmuck 2:f2d9aa163652 206 case LORAMAC_EVENT_INFO_STATUS_ERROR_MLMEREQ: ptr = "ERROR_MLMEREQ"; break;
dudmuck 2:f2d9aa163652 207 case LORAMAC_EVENT_INFO_STATUS_ERROR_MCPSREQ: ptr = "ERROR_MCPSREQ"; break;
dudmuck 2:f2d9aa163652 208 //case LORAMAC_EVENT_INFO_STATUS_ERROR: ptr = "ERROR"; break;
dudmuck 2:f2d9aa163652 209
dudmuck 0:8f0d0ae0a077 210 case LORAMAC_EVENT_INFO_STATUS_TX_TIMEOUT: ptr = "TX_TIMEOUT"; break;
dudmuck 0:8f0d0ae0a077 211 case LORAMAC_EVENT_INFO_STATUS_RX_TIMEOUT: ptr = "RX_TIMEOUT"; break;
dudmuck 0:8f0d0ae0a077 212 case LORAMAC_EVENT_INFO_STATUS_JOIN_FAIL: ptr = "JOIN_FAIL"; break;
dudmuck 0:8f0d0ae0a077 213 case LORAMAC_EVENT_INFO_STATUS_DOWNLINK_REPEATED: ptr = "DOWNLINK_REPEATED"; break;
dudmuck 0:8f0d0ae0a077 214 case LORAMAC_EVENT_INFO_STATUS_TX_DR_PAYLOAD_SIZE_ERROR: ptr = "TX_DR_PAYLOAD_SIZE_ERROR"; break;
dudmuck 0:8f0d0ae0a077 215 case LORAMAC_EVENT_INFO_STATUS_DOWNLINK_TOO_MANY_FRAMES_LOSS: ptr = "DOWNLINK_TOO_MANY_FRAMES_LOSS"; break;
dudmuck 0:8f0d0ae0a077 216 case LORAMAC_EVENT_INFO_STATUS_ADDRESS_FAIL: ptr = "ADDRESS_FAIL"; break;
dudmuck 0:8f0d0ae0a077 217 case LORAMAC_EVENT_INFO_STATUS_MIC_FAIL: ptr = "MIC_FAIL"; break;
dudmuck 0:8f0d0ae0a077 218 case LORAMAC_EVENT_INFO_STATUS_BEACON_LOCKED: ptr = "BEACON_LOCKED"; break;
dudmuck 0:8f0d0ae0a077 219 case LORAMAC_EVENT_INFO_STATUS_BEACON_LOST: ptr = "BEACON_LOST"; break;
dudmuck 0:8f0d0ae0a077 220 case LORAMAC_EVENT_INFO_STATUS_BEACON_NOT_FOUND: ptr = "BEACON_NOT_FOUND"; break;
dudmuck 0:8f0d0ae0a077 221 }
dudmuck 0:8f0d0ae0a077 222
dudmuck 0:8f0d0ae0a077 223 if (ptr != NULL)
dudmuck 0:8f0d0ae0a077 224 strcpy(dst, ptr);
dudmuck 0:8f0d0ae0a077 225 }
dudmuck 0:8f0d0ae0a077 226
dudmuck 0:8f0d0ae0a077 227 void
dudmuck 0:8f0d0ae0a077 228 LoRaMacStatus_to_string(LoRaMacStatus_t status, char* dst)
dudmuck 0:8f0d0ae0a077 229 {
dudmuck 0:8f0d0ae0a077 230 const char* ptr = NULL;
dudmuck 0:8f0d0ae0a077 231
dudmuck 0:8f0d0ae0a077 232 switch (status) {
dudmuck 0:8f0d0ae0a077 233 case LORAMAC_STATUS_OK: ptr = "OK"; break;
dudmuck 0:8f0d0ae0a077 234 case LORAMAC_STATUS_BUSY: ptr = "BUSY"; break;
dudmuck 0:8f0d0ae0a077 235 case LORAMAC_STATUS_SERVICE_UNKNOWN: ptr = "SERVICE_UNKNOWN"; break;
dudmuck 0:8f0d0ae0a077 236 case LORAMAC_STATUS_PARAMETER_INVALID: ptr = "PARAMETER_INVALID"; break;
dudmuck 0:8f0d0ae0a077 237 case LORAMAC_STATUS_FREQUENCY_INVALID: ptr = "FREQUENCY_INVALID"; break;
dudmuck 0:8f0d0ae0a077 238 case LORAMAC_STATUS_DATARATE_INVALID: ptr = "DATARATE_INVALID"; break;
dudmuck 0:8f0d0ae0a077 239 case LORAMAC_STATUS_FREQ_AND_DR_INVALID: ptr = "FREQ_AND_DR_INVALID"; break;
dudmuck 0:8f0d0ae0a077 240 case LORAMAC_STATUS_NO_NETWORK_JOINED: ptr = "NO_NETWORK_JOINED"; break;
dudmuck 0:8f0d0ae0a077 241 case LORAMAC_STATUS_LENGTH_ERROR: ptr = "LENGTH_ERROR"; break;
dudmuck 0:8f0d0ae0a077 242 case LORAMAC_STATUS_MAC_CMD_LENGTH_ERROR: ptr = "MAC_CMD_LENGTH_ERROR"; break;
dudmuck 0:8f0d0ae0a077 243 case LORAMAC_STATUS_DEVICE_OFF: ptr = "DEVICE_OFF"; break;
dudmuck 0:8f0d0ae0a077 244 }
dudmuck 0:8f0d0ae0a077 245 if (ptr != NULL)
dudmuck 0:8f0d0ae0a077 246 strcpy(dst, ptr);
dudmuck 0:8f0d0ae0a077 247 }
dudmuck 0:8f0d0ae0a077 248
dudmuck 0:8f0d0ae0a077 249 /*!
dudmuck 0:8f0d0ae0a077 250 * \brief Prepares the payload of the frame
dudmuck 0:8f0d0ae0a077 251 *
dudmuck 0:8f0d0ae0a077 252 * \retval [0: frame could be send, 1: error]
dudmuck 0:8f0d0ae0a077 253 */
dudmuck 0:8f0d0ae0a077 254 static bool SendFrame( void )
dudmuck 0:8f0d0ae0a077 255 {
dudmuck 0:8f0d0ae0a077 256 McpsReq_t mcpsReq;
dudmuck 0:8f0d0ae0a077 257 LoRaMacTxInfo_t txInfo;
dudmuck 0:8f0d0ae0a077 258 LoRaMacStatus_t status;
dudmuck 0:8f0d0ae0a077 259 char str[64];
dudmuck 0:8f0d0ae0a077 260
dudmuck 0:8f0d0ae0a077 261 if( LoRaMacQueryTxPossible( AppDataSize, &txInfo ) != LORAMAC_STATUS_OK )
dudmuck 0:8f0d0ae0a077 262 {
dudmuck 0:8f0d0ae0a077 263 // Send empty frame in order to flush MAC commands
dudmuck 0:8f0d0ae0a077 264 mcpsReq.Type = MCPS_UNCONFIRMED;
dudmuck 0:8f0d0ae0a077 265 mcpsReq.Req.Unconfirmed.fBuffer = NULL;
dudmuck 0:8f0d0ae0a077 266 mcpsReq.Req.Unconfirmed.fBufferSize = 0;
dudmuck 0:8f0d0ae0a077 267 //mcpsReq.Req.Unconfirmed.Datarate = LORAWAN_DEFAULT_DATARATE;
dudmuck 0:8f0d0ae0a077 268
dudmuck 0:8f0d0ae0a077 269 LoRaMacUplinkStatus.Acked = false;
dudmuck 0:8f0d0ae0a077 270 LoRaMacUplinkStatus.Port = 0;
dudmuck 0:8f0d0ae0a077 271 LoRaMacUplinkStatus.Buffer = NULL;
dudmuck 0:8f0d0ae0a077 272 LoRaMacUplinkStatus.BufferSize = 0;
dudmuck 0:8f0d0ae0a077 273 }
dudmuck 0:8f0d0ae0a077 274 else
dudmuck 0:8f0d0ae0a077 275 {
dudmuck 0:8f0d0ae0a077 276 LoRaMacUplinkStatus.Acked = false;
dudmuck 0:8f0d0ae0a077 277 LoRaMacUplinkStatus.Port = AppPort;
dudmuck 0:8f0d0ae0a077 278 LoRaMacUplinkStatus.Buffer = AppData;
dudmuck 0:8f0d0ae0a077 279 LoRaMacUplinkStatus.BufferSize = AppDataSize;
dudmuck 0:8f0d0ae0a077 280
dudmuck 0:8f0d0ae0a077 281 if( IsTxConfirmed == false )
dudmuck 0:8f0d0ae0a077 282 {
dudmuck 0:8f0d0ae0a077 283 mcpsReq.Type = MCPS_UNCONFIRMED;
dudmuck 0:8f0d0ae0a077 284 mcpsReq.Req.Unconfirmed.fPort = AppPort;
dudmuck 0:8f0d0ae0a077 285 mcpsReq.Req.Unconfirmed.fBuffer = AppData;
dudmuck 0:8f0d0ae0a077 286 mcpsReq.Req.Unconfirmed.fBufferSize = AppDataSize;
dudmuck 0:8f0d0ae0a077 287 //mcpsReq.Req.Unconfirmed.Datarate = LORAWAN_DEFAULT_DATARATE;
dudmuck 0:8f0d0ae0a077 288 }
dudmuck 0:8f0d0ae0a077 289 else
dudmuck 0:8f0d0ae0a077 290 {
dudmuck 0:8f0d0ae0a077 291 mcpsReq.Type = MCPS_CONFIRMED;
dudmuck 0:8f0d0ae0a077 292 mcpsReq.Req.Confirmed.fPort = AppPort;
dudmuck 0:8f0d0ae0a077 293 mcpsReq.Req.Confirmed.fBuffer = AppData;
dudmuck 0:8f0d0ae0a077 294 mcpsReq.Req.Confirmed.fBufferSize = AppDataSize;
dudmuck 0:8f0d0ae0a077 295 mcpsReq.Req.Confirmed.NbTrials = 8;
dudmuck 0:8f0d0ae0a077 296 //mcpsReq.Req.Confirmed.Datarate = LORAWAN_DEFAULT_DATARATE;
dudmuck 0:8f0d0ae0a077 297 }
dudmuck 0:8f0d0ae0a077 298 }
dudmuck 0:8f0d0ae0a077 299
dudmuck 0:8f0d0ae0a077 300 status = LoRaMacMcpsRequest( &mcpsReq );
dudmuck 0:8f0d0ae0a077 301 if( status == LORAMAC_STATUS_OK )
dudmuck 0:8f0d0ae0a077 302 {
dudmuck 0:8f0d0ae0a077 303 awaiting_mcps_indic = true;
dudmuck 0:8f0d0ae0a077 304 return false;
dudmuck 0:8f0d0ae0a077 305 }
dudmuck 0:8f0d0ae0a077 306 LoRaMacStatus_to_string(status, str);
dudmuck 1:53c30224eda8 307 isr_printf("send failed:%s\r\n", str);
dudmuck 0:8f0d0ae0a077 308 send_at_beacon = true;
dudmuck 0:8f0d0ae0a077 309 return true;
dudmuck 0:8f0d0ae0a077 310 }
dudmuck 0:8f0d0ae0a077 311
dudmuck 0:8f0d0ae0a077 312 /*!
dudmuck 0:8f0d0ae0a077 313 * \brief Function executed on TxNextPacket Timeout event
dudmuck 0:8f0d0ae0a077 314 */
dudmuck 0:8f0d0ae0a077 315 static void OnTxNextPacketTimerEvent( void )
dudmuck 0:8f0d0ae0a077 316 {
dudmuck 0:8f0d0ae0a077 317 MibRequestConfirm_t mibReq;
dudmuck 0:8f0d0ae0a077 318 LoRaMacStatus_t status;
dudmuck 0:8f0d0ae0a077 319
dudmuck 0:8f0d0ae0a077 320 mibReq.Type = MIB_NETWORK_JOINED;
dudmuck 0:8f0d0ae0a077 321 status = LoRaMacMibGetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 322
dudmuck 0:8f0d0ae0a077 323 if( status == LORAMAC_STATUS_OK )
dudmuck 0:8f0d0ae0a077 324 {
dudmuck 0:8f0d0ae0a077 325 if( mibReq.Param.IsNetworkJoined == true )
dudmuck 0:8f0d0ae0a077 326 {
dudmuck 0:8f0d0ae0a077 327 DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 328 NextTx = true;
dudmuck 0:8f0d0ae0a077 329 }
dudmuck 0:8f0d0ae0a077 330 else
dudmuck 0:8f0d0ae0a077 331 {
dudmuck 0:8f0d0ae0a077 332 DeviceState = DEVICE_STATE_JOIN;
dudmuck 0:8f0d0ae0a077 333 }
dudmuck 0:8f0d0ae0a077 334 }
dudmuck 0:8f0d0ae0a077 335 }
dudmuck 0:8f0d0ae0a077 336
dudmuck 0:8f0d0ae0a077 337 void
dudmuck 0:8f0d0ae0a077 338 send_uplink()
dudmuck 0:8f0d0ae0a077 339 {
dudmuck 0:8f0d0ae0a077 340 AppDataSize = uplink_length;
dudmuck 1:53c30224eda8 341 NextTx = true;
dudmuck 1:53c30224eda8 342 DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 343 }
dudmuck 0:8f0d0ae0a077 344
dudmuck 0:8f0d0ae0a077 345
dudmuck 0:8f0d0ae0a077 346 /*!
dudmuck 0:8f0d0ae0a077 347 * \brief MCPS-Confirm event function
dudmuck 0:8f0d0ae0a077 348 *
dudmuck 0:8f0d0ae0a077 349 * \param [IN] mcpsConfirm - Pointer to the confirm structure,
dudmuck 0:8f0d0ae0a077 350 * containing confirm attributes.
dudmuck 0:8f0d0ae0a077 351 */
dudmuck 0:8f0d0ae0a077 352 static void McpsConfirm( McpsConfirm_t *mcpsConfirm )
dudmuck 0:8f0d0ae0a077 353 {
dudmuck 2:f2d9aa163652 354 static uint8_t fail_count = 0;
dudmuck 0:8f0d0ae0a077 355 char str[64];
dudmuck 2:f2d9aa163652 356
dudmuck 1:53c30224eda8 357 isr_printf("McpsConfirm ");
dudmuck 0:8f0d0ae0a077 358 if( mcpsConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 359 {
dudmuck 2:f2d9aa163652 360 fail_count = 0;
dudmuck 1:53c30224eda8 361 isr_printf("OK ");
dudmuck 0:8f0d0ae0a077 362 switch( mcpsConfirm->McpsRequest )
dudmuck 0:8f0d0ae0a077 363 {
dudmuck 0:8f0d0ae0a077 364 case MCPS_UNCONFIRMED:
dudmuck 0:8f0d0ae0a077 365 {
dudmuck 1:53c30224eda8 366 isr_printf("UNCONFIRMED");
dudmuck 0:8f0d0ae0a077 367 // Check Datarate
dudmuck 0:8f0d0ae0a077 368 // Check TxPower
dudmuck 0:8f0d0ae0a077 369 break;
dudmuck 0:8f0d0ae0a077 370 }
dudmuck 0:8f0d0ae0a077 371 case MCPS_CONFIRMED:
dudmuck 0:8f0d0ae0a077 372 {
dudmuck 1:53c30224eda8 373 isr_printf("CONFIRMED");
dudmuck 0:8f0d0ae0a077 374 // Check Datarate
dudmuck 0:8f0d0ae0a077 375 // Check TxPower
dudmuck 0:8f0d0ae0a077 376 // Check AckReceived
dudmuck 0:8f0d0ae0a077 377 // Check NbTrials
dudmuck 0:8f0d0ae0a077 378 LoRaMacUplinkStatus.Acked = mcpsConfirm->AckReceived;
dudmuck 0:8f0d0ae0a077 379 break;
dudmuck 0:8f0d0ae0a077 380 }
dudmuck 0:8f0d0ae0a077 381 case MCPS_PROPRIETARY:
dudmuck 0:8f0d0ae0a077 382 {
dudmuck 0:8f0d0ae0a077 383 break;
dudmuck 0:8f0d0ae0a077 384 }
dudmuck 0:8f0d0ae0a077 385 default:
dudmuck 0:8f0d0ae0a077 386 break;
dudmuck 0:8f0d0ae0a077 387 }
dudmuck 0:8f0d0ae0a077 388 //LoRaMacUplinkStatus.Datarate = mcpsConfirm->Datarate;
dudmuck 0:8f0d0ae0a077 389 LoRaMacUplinkStatus.UplinkCounter = mcpsConfirm->UpLinkCounter;
dudmuck 0:8f0d0ae0a077 390
dudmuck 0:8f0d0ae0a077 391 } else {
dudmuck 0:8f0d0ae0a077 392 LoRaMacEventInfoStatus_to_string(mcpsConfirm->Status, str);
dudmuck 1:53c30224eda8 393 isr_printf("%s ", str);
dudmuck 0:8f0d0ae0a077 394
dudmuck 0:8f0d0ae0a077 395 #ifndef MANUAL_UPLINK
dudmuck 0:8f0d0ae0a077 396 /* mcpsIndication may not come. last uplink done, send another uplink */
dudmuck 0:8f0d0ae0a077 397 TxNextPacketTimer.attach_us(&send_uplink, 100000);
dudmuck 0:8f0d0ae0a077 398 #endif /* !MANUAL_UPLINK */
dudmuck 2:f2d9aa163652 399 if (++fail_count > 10) {
dudmuck 2:f2d9aa163652 400 /* cause re-join */
dudmuck 2:f2d9aa163652 401 MibRequestConfirm_t mibReq;
dudmuck 2:f2d9aa163652 402 mibReq.Type = MIB_NETWORK_JOINED;
dudmuck 2:f2d9aa163652 403 mibReq.Param.IsNetworkJoined = false;
dudmuck 2:f2d9aa163652 404 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 2:f2d9aa163652 405 }
dudmuck 0:8f0d0ae0a077 406 }
dudmuck 0:8f0d0ae0a077 407
dudmuck 0:8f0d0ae0a077 408 NextTx = true;
dudmuck 1:53c30224eda8 409 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 410 }
dudmuck 0:8f0d0ae0a077 411
dudmuck 0:8f0d0ae0a077 412 /*!
dudmuck 0:8f0d0ae0a077 413 * \brief MCPS-Indication event function
dudmuck 0:8f0d0ae0a077 414 *
dudmuck 0:8f0d0ae0a077 415 * \param [IN] mcpsIndication - Pointer to the indication structure,
dudmuck 0:8f0d0ae0a077 416 * containing indication attributes.
dudmuck 0:8f0d0ae0a077 417 */
dudmuck 0:8f0d0ae0a077 418 static void McpsIndication( McpsIndication_t *mcpsIndication )
dudmuck 0:8f0d0ae0a077 419 {
dudmuck 1:53c30224eda8 420 isr_printf("McpsIndication ");
dudmuck 0:8f0d0ae0a077 421
dudmuck 0:8f0d0ae0a077 422 #ifndef MANUAL_UPLINK
dudmuck 0:8f0d0ae0a077 423 /* last uplink done, send another uplink */
dudmuck 0:8f0d0ae0a077 424 TxNextPacketTimer.attach_us(&send_uplink, 100000);
dudmuck 0:8f0d0ae0a077 425 #endif /* !MANUAL_UPLINK */
dudmuck 0:8f0d0ae0a077 426
dudmuck 0:8f0d0ae0a077 427 if( mcpsIndication->Status != LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 428 {
dudmuck 1:53c30224eda8 429 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 430 return;
dudmuck 0:8f0d0ae0a077 431 }
dudmuck 0:8f0d0ae0a077 432
dudmuck 0:8f0d0ae0a077 433 awaiting_mcps_indic = false;
dudmuck 0:8f0d0ae0a077 434
dudmuck 0:8f0d0ae0a077 435 switch( mcpsIndication->McpsIndication )
dudmuck 0:8f0d0ae0a077 436 {
dudmuck 0:8f0d0ae0a077 437 case MCPS_UNCONFIRMED:
dudmuck 0:8f0d0ae0a077 438 {
dudmuck 1:53c30224eda8 439 isr_printf("UNCONFIRMED ");
dudmuck 0:8f0d0ae0a077 440 break;
dudmuck 0:8f0d0ae0a077 441 }
dudmuck 0:8f0d0ae0a077 442 case MCPS_CONFIRMED:
dudmuck 0:8f0d0ae0a077 443 {
dudmuck 1:53c30224eda8 444 isr_printf("CONFIRMED ");
dudmuck 0:8f0d0ae0a077 445 break;
dudmuck 0:8f0d0ae0a077 446 }
dudmuck 0:8f0d0ae0a077 447 case MCPS_PROPRIETARY:
dudmuck 0:8f0d0ae0a077 448 {
dudmuck 0:8f0d0ae0a077 449 break;
dudmuck 0:8f0d0ae0a077 450 }
dudmuck 0:8f0d0ae0a077 451 case MCPS_MULTICAST:
dudmuck 0:8f0d0ae0a077 452 {
dudmuck 0:8f0d0ae0a077 453 break;
dudmuck 0:8f0d0ae0a077 454 }
dudmuck 0:8f0d0ae0a077 455 default:
dudmuck 0:8f0d0ae0a077 456 break;
dudmuck 0:8f0d0ae0a077 457 }
dudmuck 0:8f0d0ae0a077 458
dudmuck 0:8f0d0ae0a077 459 // Check Multicast
dudmuck 0:8f0d0ae0a077 460 // Check Port
dudmuck 0:8f0d0ae0a077 461 // Check Datarate
dudmuck 0:8f0d0ae0a077 462 // Check FramePending
dudmuck 0:8f0d0ae0a077 463 // Check Buffer
dudmuck 0:8f0d0ae0a077 464 // Check BufferSize
dudmuck 0:8f0d0ae0a077 465 // Check Rssi
dudmuck 0:8f0d0ae0a077 466 // Check Snr
dudmuck 0:8f0d0ae0a077 467 // Check RxSlot
dudmuck 0:8f0d0ae0a077 468 LoRaMacDownlinkStatus.Rssi = mcpsIndication->Rssi;
dudmuck 0:8f0d0ae0a077 469 if( mcpsIndication->Snr & 0x80 ) // The SNR sign bit is 1
dudmuck 0:8f0d0ae0a077 470 {
dudmuck 0:8f0d0ae0a077 471 // Invert and divide by 4
dudmuck 0:8f0d0ae0a077 472 LoRaMacDownlinkStatus.Snr = ( ( ~mcpsIndication->Snr + 1 ) & 0xFF ) >> 2;
dudmuck 0:8f0d0ae0a077 473 LoRaMacDownlinkStatus.Snr = -LoRaMacDownlinkStatus.Snr;
dudmuck 0:8f0d0ae0a077 474 }
dudmuck 0:8f0d0ae0a077 475 else
dudmuck 0:8f0d0ae0a077 476 {
dudmuck 0:8f0d0ae0a077 477 // Divide by 4
dudmuck 0:8f0d0ae0a077 478 LoRaMacDownlinkStatus.Snr = ( mcpsIndication->Snr & 0xFF ) >> 2;
dudmuck 0:8f0d0ae0a077 479 }
dudmuck 0:8f0d0ae0a077 480 LoRaMacDownlinkStatus.DownlinkCounter++;
dudmuck 0:8f0d0ae0a077 481 LoRaMacDownlinkStatus.RxData = mcpsIndication->RxData;
dudmuck 0:8f0d0ae0a077 482 LoRaMacDownlinkStatus.Port = mcpsIndication->Port;
dudmuck 0:8f0d0ae0a077 483 LoRaMacDownlinkStatus.Buffer = mcpsIndication->Buffer;
dudmuck 0:8f0d0ae0a077 484 LoRaMacDownlinkStatus.BufferSize = mcpsIndication->BufferSize;
dudmuck 0:8f0d0ae0a077 485
dudmuck 0:8f0d0ae0a077 486 if( mcpsIndication->RxData == true )
dudmuck 0:8f0d0ae0a077 487 {
dudmuck 0:8f0d0ae0a077 488 int i;
dudmuck 1:53c30224eda8 489 isr_printf("RxData %u ", mcpsIndication->BufferSize);
dudmuck 0:8f0d0ae0a077 490 for (i = 0; i < mcpsIndication->BufferSize; i++) {
dudmuck 1:53c30224eda8 491 isr_printf("%02x ", mcpsIndication->Buffer[i]);
dudmuck 0:8f0d0ae0a077 492 }
dudmuck 1:53c30224eda8 493 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 494
dudmuck 0:8f0d0ae0a077 495 switch( mcpsIndication->Port )
dudmuck 0:8f0d0ae0a077 496 {
dudmuck 0:8f0d0ae0a077 497 case 1: // The application LED can be controlled on port 1 or 2
dudmuck 0:8f0d0ae0a077 498 case 2:
dudmuck 0:8f0d0ae0a077 499 if( mcpsIndication->BufferSize == 1 )
dudmuck 0:8f0d0ae0a077 500 {
dudmuck 0:8f0d0ae0a077 501 AppLedStateOn = mcpsIndication->Buffer[0] & 0x01;
dudmuck 0:8f0d0ae0a077 502 //Led3StateChanged = true;
dudmuck 0:8f0d0ae0a077 503 }
dudmuck 0:8f0d0ae0a077 504 break;
dudmuck 0:8f0d0ae0a077 505 default:
dudmuck 0:8f0d0ae0a077 506 break;
dudmuck 0:8f0d0ae0a077 507 }
dudmuck 0:8f0d0ae0a077 508 }
dudmuck 0:8f0d0ae0a077 509
dudmuck 1:53c30224eda8 510 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 511 }
dudmuck 0:8f0d0ae0a077 512
dudmuck 0:8f0d0ae0a077 513 /*!
dudmuck 0:8f0d0ae0a077 514 * \brief MLME-Confirm event function
dudmuck 0:8f0d0ae0a077 515 *
dudmuck 0:8f0d0ae0a077 516 * \param [IN] mlmeConfirm - Pointer to the confirm structure,
dudmuck 0:8f0d0ae0a077 517 * containing confirm attributes.
dudmuck 0:8f0d0ae0a077 518 */
dudmuck 0:8f0d0ae0a077 519 static void MlmeConfirm( MlmeConfirm_t *mlmeConfirm )
dudmuck 0:8f0d0ae0a077 520 {
dudmuck 1:53c30224eda8 521 isr_printf("MlmeConfirm ");
dudmuck 0:8f0d0ae0a077 522 switch( mlmeConfirm->MlmeRequest )
dudmuck 0:8f0d0ae0a077 523 {
dudmuck 0:8f0d0ae0a077 524 case MLME_JOIN:
dudmuck 0:8f0d0ae0a077 525 {
dudmuck 1:53c30224eda8 526 isr_printf("MLME_JOIN ");
dudmuck 0:8f0d0ae0a077 527 if( mlmeConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 528 {
dudmuck 0:8f0d0ae0a077 529 // Status is OK, node has joined the network
dudmuck 0:8f0d0ae0a077 530 //DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 531 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 1:53c30224eda8 532 isr_printf("ok");
dudmuck 2:f2d9aa163652 533 missed_count = 0;
dudmuck 0:8f0d0ae0a077 534 }
dudmuck 0:8f0d0ae0a077 535 else
dudmuck 0:8f0d0ae0a077 536 {
dudmuck 0:8f0d0ae0a077 537 // Join was not successful. Try to join again
dudmuck 0:8f0d0ae0a077 538 DeviceState = DEVICE_STATE_JOIN;
dudmuck 1:53c30224eda8 539 isr_printf("fail");
dudmuck 0:8f0d0ae0a077 540 }
dudmuck 0:8f0d0ae0a077 541 break;
dudmuck 0:8f0d0ae0a077 542 }
dudmuck 0:8f0d0ae0a077 543 case MLME_LINK_CHECK:
dudmuck 0:8f0d0ae0a077 544 {
dudmuck 1:53c30224eda8 545 isr_printf("LINK_CHECK");
dudmuck 0:8f0d0ae0a077 546 if( mlmeConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 547 {
dudmuck 0:8f0d0ae0a077 548 // Check DemodMargin
dudmuck 0:8f0d0ae0a077 549 //mlmeConfirm->DemodMargin;
dudmuck 0:8f0d0ae0a077 550 // Check NbGateways
dudmuck 0:8f0d0ae0a077 551 //mlmeConfirm->NbGateways;
dudmuck 0:8f0d0ae0a077 552 }
dudmuck 0:8f0d0ae0a077 553 break;
dudmuck 0:8f0d0ae0a077 554 }
dudmuck 0:8f0d0ae0a077 555 default:
dudmuck 0:8f0d0ae0a077 556 break;
dudmuck 0:8f0d0ae0a077 557 }
dudmuck 0:8f0d0ae0a077 558 NextTx = true;
dudmuck 1:53c30224eda8 559 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 560 }
dudmuck 0:8f0d0ae0a077 561
dudmuck 0:8f0d0ae0a077 562
dudmuck 0:8f0d0ae0a077 563 static void MlmeIndication( MlmeIndication_t *MlmeIndication )
dudmuck 0:8f0d0ae0a077 564 {
dudmuck 0:8f0d0ae0a077 565 char str[64];
dudmuck 0:8f0d0ae0a077 566 //MibRequestConfirm_t mibReq;
dudmuck 0:8f0d0ae0a077 567
dudmuck 1:53c30224eda8 568 isr_printf("MlmeIndication ");
dudmuck 0:8f0d0ae0a077 569 switch( MlmeIndication->MlmeIndication )
dudmuck 0:8f0d0ae0a077 570 {
dudmuck 0:8f0d0ae0a077 571 case MLME_BEACON:
dudmuck 0:8f0d0ae0a077 572 {
dudmuck 2:f2d9aa163652 573 isr_printf("missed:%u BEACON ", missed_count);
dudmuck 0:8f0d0ae0a077 574 LoRaMacEventInfoStatus_to_string(MlmeIndication->Status, str);
dudmuck 1:53c30224eda8 575 isr_printf("%s ", str);
dudmuck 0:8f0d0ae0a077 576 #ifndef MANUAL_UPLINK
dudmuck 0:8f0d0ae0a077 577 if (send_at_beacon) {
dudmuck 0:8f0d0ae0a077 578 TxNextPacketTimer.attach_us(&send_uplink, 100000);
dudmuck 0:8f0d0ae0a077 579 send_at_beacon = false;
dudmuck 0:8f0d0ae0a077 580 }
dudmuck 0:8f0d0ae0a077 581 #endif /* !MANUAL_UPLINK */
dudmuck 2:f2d9aa163652 582 if (LORAMAC_EVENT_INFO_STATUS_BEACON_LOCKED == MlmeIndication->Status)
dudmuck 2:f2d9aa163652 583 missed_count = 0;
dudmuck 2:f2d9aa163652 584 else if (++missed_count > 4) {
dudmuck 2:f2d9aa163652 585 /* cause re-join */
dudmuck 2:f2d9aa163652 586 MibRequestConfirm_t mibReq;
dudmuck 2:f2d9aa163652 587 mibReq.Type = MIB_NETWORK_JOINED;
dudmuck 2:f2d9aa163652 588 mibReq.Param.IsNetworkJoined = false;
dudmuck 2:f2d9aa163652 589 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 2:f2d9aa163652 590 TxNextPacketTimer.attach_us(&OnTxNextPacketTimerEvent, randr(1000000, 5000000) + 1000000);
dudmuck 2:f2d9aa163652 591 }
dudmuck 0:8f0d0ae0a077 592 break;
dudmuck 0:8f0d0ae0a077 593
dudmuck 0:8f0d0ae0a077 594 }
dudmuck 0:8f0d0ae0a077 595 default:
dudmuck 1:53c30224eda8 596 isr_printf("<%d> ", MlmeIndication->MlmeIndication);
dudmuck 0:8f0d0ae0a077 597 break;
dudmuck 0:8f0d0ae0a077 598 }
dudmuck 0:8f0d0ae0a077 599
dudmuck 1:53c30224eda8 600 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 601 }
dudmuck 0:8f0d0ae0a077 602
dudmuck 0:8f0d0ae0a077 603 void
dudmuck 0:8f0d0ae0a077 604 send_pcbuf_uplink()
dudmuck 0:8f0d0ae0a077 605 {
dudmuck 0:8f0d0ae0a077 606 bool ret;
dudmuck 0:8f0d0ae0a077 607 memcpy(AppData, pcbuf, pcbuf_len);
dudmuck 0:8f0d0ae0a077 608 AppDataSize = pcbuf_len;
dudmuck 0:8f0d0ae0a077 609
dudmuck 0:8f0d0ae0a077 610 ret = SendFrame( );
dudmuck 1:53c30224eda8 611 isr_printf("%d = SendFrame()\r\n", ret);
dudmuck 0:8f0d0ae0a077 612 }
dudmuck 0:8f0d0ae0a077 613
dudmuck 0:8f0d0ae0a077 614 void cmd_status(uint8_t idx)
dudmuck 0:8f0d0ae0a077 615 {
dudmuck 2:f2d9aa163652 616 MibRequestConfirm_t mibReq;
dudmuck 2:f2d9aa163652 617
dudmuck 2:f2d9aa163652 618 isr_printf("DevEUI ");
dudmuck 2:f2d9aa163652 619 for (int i = 0; i < 8; i++)
dudmuck 2:f2d9aa163652 620 isr_printf("%02x ", DevEui[i]);
dudmuck 2:f2d9aa163652 621 mibReq.Type = MIB_DEV_ADDR;
dudmuck 2:f2d9aa163652 622 LoRaMacMibGetRequestConfirm( &mibReq );
dudmuck 2:f2d9aa163652 623 isr_printf(", DevAddr:%x\r\n", mibReq.Param.DevAddr);
dudmuck 2:f2d9aa163652 624
dudmuck 1:53c30224eda8 625 isr_printf("DeviceState:%d\r\n", DeviceState);
dudmuck 1:53c30224eda8 626 isr_printf("send_at_beacon:%d\r\n", send_at_beacon);
dudmuck 1:53c30224eda8 627 isr_printf("awaiting_mcps_indic:%d\r\n", awaiting_mcps_indic);
dudmuck 0:8f0d0ae0a077 628 loramac_print_status();
dudmuck 0:8f0d0ae0a077 629 }
dudmuck 0:8f0d0ae0a077 630
dudmuck 0:8f0d0ae0a077 631 void cmd_uplink_length(uint8_t idx)
dudmuck 0:8f0d0ae0a077 632 {
dudmuck 0:8f0d0ae0a077 633 if (pcbuf[idx] >= '0' && pcbuf[idx] <= '9') {
dudmuck 0:8f0d0ae0a077 634 sscanf(pcbuf+idx, "%u", &uplink_length);
dudmuck 0:8f0d0ae0a077 635 }
dudmuck 1:53c30224eda8 636 isr_printf("uplink_length:%u\r\n", uplink_length);
dudmuck 0:8f0d0ae0a077 637 }
dudmuck 0:8f0d0ae0a077 638
dudmuck 0:8f0d0ae0a077 639 typedef struct {
dudmuck 0:8f0d0ae0a077 640 const char* const cmd;
dudmuck 0:8f0d0ae0a077 641 void (*handler)(uint8_t args_at);
dudmuck 0:8f0d0ae0a077 642 const char* const arg_descr;
dudmuck 0:8f0d0ae0a077 643 const char* const description;
dudmuck 0:8f0d0ae0a077 644 } menu_item_t;
dudmuck 0:8f0d0ae0a077 645
dudmuck 0:8f0d0ae0a077 646 void cmd_help(uint8_t args_at);
dudmuck 0:8f0d0ae0a077 647
dudmuck 0:8f0d0ae0a077 648 const menu_item_t menu_items[] =
dudmuck 0:8f0d0ae0a077 649 { /* after first character, command names must be [A-Za-z] */
dudmuck 0:8f0d0ae0a077 650 { "?", cmd_help, "","show available commands"},
dudmuck 0:8f0d0ae0a077 651 { ".", cmd_status, "","print status"},
dudmuck 0:8f0d0ae0a077 652 { "ul", cmd_uplink_length, "","set uplink payload length"},
dudmuck 0:8f0d0ae0a077 653 { NULL, NULL, NULL, NULL }
dudmuck 0:8f0d0ae0a077 654 };
dudmuck 0:8f0d0ae0a077 655
dudmuck 0:8f0d0ae0a077 656 void cmd_help(uint8_t args_at)
dudmuck 0:8f0d0ae0a077 657 {
dudmuck 0:8f0d0ae0a077 658 int i;
dudmuck 0:8f0d0ae0a077 659
dudmuck 0:8f0d0ae0a077 660 for (i = 0; menu_items[i].cmd != NULL ; i++) {
dudmuck 1:53c30224eda8 661 isr_printf("%s%s\t%s\r\n", menu_items[i].cmd, menu_items[i].arg_descr, menu_items[i].description);
dudmuck 0:8f0d0ae0a077 662 }
dudmuck 0:8f0d0ae0a077 663
dudmuck 0:8f0d0ae0a077 664 }
dudmuck 0:8f0d0ae0a077 665
dudmuck 0:8f0d0ae0a077 666 void
dudmuck 0:8f0d0ae0a077 667 console()
dudmuck 0:8f0d0ae0a077 668 {
dudmuck 0:8f0d0ae0a077 669 bool parsed;
dudmuck 0:8f0d0ae0a077 670 int i;
dudmuck 0:8f0d0ae0a077 671 uint8_t user_cmd_len;
dudmuck 0:8f0d0ae0a077 672
dudmuck 0:8f0d0ae0a077 673 if (pcbuf_len < 0) { // ctrl-C
dudmuck 1:53c30224eda8 674 //isr_printf("abort\r\n");
dudmuck 0:8f0d0ae0a077 675 return;
dudmuck 0:8f0d0ae0a077 676 }
dudmuck 0:8f0d0ae0a077 677 if (pcbuf_len == 0)
dudmuck 0:8f0d0ae0a077 678 return;
dudmuck 0:8f0d0ae0a077 679
dudmuck 1:53c30224eda8 680 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 681
dudmuck 0:8f0d0ae0a077 682 /* get end of user-entered command */
dudmuck 0:8f0d0ae0a077 683 user_cmd_len = 1; // first character can be any character
dudmuck 0:8f0d0ae0a077 684 for (i = 1; i <= pcbuf_len; i++) {
dudmuck 0:8f0d0ae0a077 685 if (pcbuf[i] < 'A' || (pcbuf[i] > 'Z' && pcbuf[i] < 'a') || pcbuf[i] > 'z') {
dudmuck 0:8f0d0ae0a077 686 user_cmd_len = i;
dudmuck 0:8f0d0ae0a077 687 break;
dudmuck 0:8f0d0ae0a077 688 }
dudmuck 0:8f0d0ae0a077 689 }
dudmuck 0:8f0d0ae0a077 690
dudmuck 0:8f0d0ae0a077 691 parsed = false;
dudmuck 0:8f0d0ae0a077 692 for (i = 0; menu_items[i].cmd != NULL ; i++) {
dudmuck 0:8f0d0ae0a077 693 int mi_len = strlen(menu_items[i].cmd);
dudmuck 0:8f0d0ae0a077 694
dudmuck 0:8f0d0ae0a077 695 if (menu_items[i].handler && user_cmd_len == mi_len && (strncmp(pcbuf, menu_items[i].cmd, mi_len) == 0)) {
dudmuck 0:8f0d0ae0a077 696 while (pcbuf[mi_len] == ' ') // skip past spaces
dudmuck 0:8f0d0ae0a077 697 mi_len++;
dudmuck 0:8f0d0ae0a077 698 menu_items[i].handler(mi_len);
dudmuck 0:8f0d0ae0a077 699 parsed = true;
dudmuck 0:8f0d0ae0a077 700 break;
dudmuck 0:8f0d0ae0a077 701 }
dudmuck 0:8f0d0ae0a077 702 }
dudmuck 0:8f0d0ae0a077 703
dudmuck 0:8f0d0ae0a077 704 if (!parsed)
dudmuck 0:8f0d0ae0a077 705 send_pcbuf_uplink();
dudmuck 0:8f0d0ae0a077 706
dudmuck 0:8f0d0ae0a077 707 pcbuf_len = 0;
dudmuck 1:53c30224eda8 708 isr_printf("> ");
dudmuck 0:8f0d0ae0a077 709 fflush(stdout);
dudmuck 0:8f0d0ae0a077 710 }
dudmuck 0:8f0d0ae0a077 711
dudmuck 0:8f0d0ae0a077 712 void rx_callback()
dudmuck 0:8f0d0ae0a077 713 {
dudmuck 0:8f0d0ae0a077 714 static uint8_t pcbuf_idx = 0;
dudmuck 0:8f0d0ae0a077 715 static uint8_t prev_len = 0;;
dudmuck 0:8f0d0ae0a077 716 char c = pc.getc();
dudmuck 0:8f0d0ae0a077 717
dudmuck 0:8f0d0ae0a077 718 if (c == 8) {
dudmuck 0:8f0d0ae0a077 719 if (pcbuf_idx > 0) {
dudmuck 0:8f0d0ae0a077 720 pc.putc(8);
dudmuck 0:8f0d0ae0a077 721 pc.putc(' ');
dudmuck 0:8f0d0ae0a077 722 pc.putc(8);
dudmuck 0:8f0d0ae0a077 723 pcbuf_idx--;
dudmuck 0:8f0d0ae0a077 724 }
dudmuck 0:8f0d0ae0a077 725 } else if (c == 3) { // ctrl-C
dudmuck 0:8f0d0ae0a077 726 pcbuf_len = -1;
dudmuck 0:8f0d0ae0a077 727 } else if (c == '\r') {
dudmuck 0:8f0d0ae0a077 728 if (pcbuf_idx == 0) {
dudmuck 0:8f0d0ae0a077 729 pcbuf_len = prev_len;
dudmuck 0:8f0d0ae0a077 730 } else {
dudmuck 0:8f0d0ae0a077 731 pcbuf[pcbuf_idx] = 0; // null terminate
dudmuck 0:8f0d0ae0a077 732 prev_len = pcbuf_idx;
dudmuck 0:8f0d0ae0a077 733 pcbuf_idx = 0;
dudmuck 0:8f0d0ae0a077 734 pcbuf_len = prev_len;
dudmuck 0:8f0d0ae0a077 735 }
dudmuck 0:8f0d0ae0a077 736 } else if (pcbuf_idx < sizeof(pcbuf)) {
dudmuck 0:8f0d0ae0a077 737 pcbuf[pcbuf_idx++] = c;
dudmuck 0:8f0d0ae0a077 738 pc.putc(c);
dudmuck 0:8f0d0ae0a077 739 }
dudmuck 0:8f0d0ae0a077 740 }
dudmuck 0:8f0d0ae0a077 741
dudmuck 0:8f0d0ae0a077 742 /**
dudmuck 0:8f0d0ae0a077 743 * Main application entry point.
dudmuck 0:8f0d0ae0a077 744 */
dudmuck 0:8f0d0ae0a077 745 int main( void )
dudmuck 0:8f0d0ae0a077 746 {
dudmuck 0:8f0d0ae0a077 747 LoRaMacPrimitives_t LoRaMacPrimitives;
dudmuck 0:8f0d0ae0a077 748 LoRaMacCallback_t LoRaMacCallbacks;
dudmuck 0:8f0d0ae0a077 749 MibRequestConfirm_t mibReq;
dudmuck 0:8f0d0ae0a077 750
dudmuck 0:8f0d0ae0a077 751 BoardInit( );
dudmuck 0:8f0d0ae0a077 752 pc.baud(115200);
dudmuck 1:53c30224eda8 753 isr_printf("\r\nreset\r\n");
dudmuck 0:8f0d0ae0a077 754 DeviceState = DEVICE_STATE_INIT;
dudmuck 0:8f0d0ae0a077 755
dudmuck 0:8f0d0ae0a077 756 while( 1 )
dudmuck 0:8f0d0ae0a077 757 {
dudmuck 0:8f0d0ae0a077 758 console();
dudmuck 1:53c30224eda8 759 if (pc.readable())
dudmuck 1:53c30224eda8 760 rx_callback();
dudmuck 0:8f0d0ae0a077 761
dudmuck 0:8f0d0ae0a077 762 switch( DeviceState )
dudmuck 0:8f0d0ae0a077 763 {
dudmuck 0:8f0d0ae0a077 764 case DEVICE_STATE_INIT:
dudmuck 0:8f0d0ae0a077 765 {
dudmuck 1:53c30224eda8 766 isr_printf("DEVICE_STATE_INIT\r\n");
dudmuck 0:8f0d0ae0a077 767 uplink_length = 2;
dudmuck 0:8f0d0ae0a077 768 LoRaMacPrimitives.MacMcpsConfirm = McpsConfirm;
dudmuck 0:8f0d0ae0a077 769 LoRaMacPrimitives.MacMcpsIndication = McpsIndication;
dudmuck 0:8f0d0ae0a077 770 LoRaMacPrimitives.MacMlmeConfirm = MlmeConfirm;
dudmuck 0:8f0d0ae0a077 771 LoRaMacPrimitives.MacMlmeIndication = MlmeIndication;
dudmuck 0:8f0d0ae0a077 772 LoRaMacCallbacks.GetBatteryLevel = BoardGetBatteryLevel;
dudmuck 0:8f0d0ae0a077 773 if (LORAMAC_STATUS_OK != LoRaMacInitialization( &LoRaMacPrimitives, &LoRaMacCallbacks )) {
dudmuck 1:53c30224eda8 774 isr_printf("LoRaMacInitialization() failed\r\n");
dudmuck 0:8f0d0ae0a077 775 for (;;) ;
dudmuck 0:8f0d0ae0a077 776 }
dudmuck 1:53c30224eda8 777 isr_printf("INIT-ok\r\n");
dudmuck 0:8f0d0ae0a077 778
dudmuck 0:8f0d0ae0a077 779 mibReq.Type = MIB_PUBLIC_NETWORK;
dudmuck 0:8f0d0ae0a077 780 mibReq.Param.EnablePublicNetwork = LORAWAN_PUBLIC_NETWORK;
dudmuck 0:8f0d0ae0a077 781 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 782
dudmuck 0:8f0d0ae0a077 783 LoRaMacDownlinkStatus.DownlinkCounter = 0;
dudmuck 0:8f0d0ae0a077 784
dudmuck 0:8f0d0ae0a077 785 DeviceState = DEVICE_STATE_JOIN;
dudmuck 0:8f0d0ae0a077 786 break;
dudmuck 0:8f0d0ae0a077 787 }
dudmuck 0:8f0d0ae0a077 788 case DEVICE_STATE_JOIN:
dudmuck 0:8f0d0ae0a077 789 {
dudmuck 0:8f0d0ae0a077 790 send_at_beacon = true;
dudmuck 0:8f0d0ae0a077 791 #if( OVER_THE_AIR_ACTIVATION != 0 )
dudmuck 0:8f0d0ae0a077 792 MlmeReq_t mlmeReq;
dudmuck 0:8f0d0ae0a077 793 // override software definition with hardware value
dudmuck 0:8f0d0ae0a077 794 BoardGetUniqueId(DevEui);
dudmuck 1:53c30224eda8 795 isr_printf("DevEUI ");
dudmuck 0:8f0d0ae0a077 796 for (int i = 0; i < 8; i++)
dudmuck 1:53c30224eda8 797 isr_printf("%02x ", DevEui[i]);
dudmuck 1:53c30224eda8 798 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 799
dudmuck 0:8f0d0ae0a077 800 mlmeReq.Type = MLME_JOIN;
dudmuck 0:8f0d0ae0a077 801
dudmuck 0:8f0d0ae0a077 802 mlmeReq.Req.Join.DevEui = DevEui;
dudmuck 0:8f0d0ae0a077 803 mlmeReq.Req.Join.AppEui = AppEui;
dudmuck 0:8f0d0ae0a077 804 mlmeReq.Req.Join.AppKey = AppKey;
dudmuck 0:8f0d0ae0a077 805 mlmeReq.Req.Join.NbTrials = 255;
dudmuck 0:8f0d0ae0a077 806
dudmuck 0:8f0d0ae0a077 807 if( NextTx == true )
dudmuck 0:8f0d0ae0a077 808 {
dudmuck 0:8f0d0ae0a077 809 LoRaMacMlmeRequest( &mlmeReq );
dudmuck 0:8f0d0ae0a077 810 }
dudmuck 0:8f0d0ae0a077 811 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 0:8f0d0ae0a077 812 #else
dudmuck 0:8f0d0ae0a077 813 mibReq.Type = MIB_NET_ID;
dudmuck 0:8f0d0ae0a077 814 mibReq.Param.NetID = LORAWAN_NETWORK_ID;
dudmuck 0:8f0d0ae0a077 815 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 816
dudmuck 0:8f0d0ae0a077 817 mibReq.Type = MIB_DEV_ADDR;
dudmuck 0:8f0d0ae0a077 818 mibReq.Param.DevAddr = DevAddr;
dudmuck 0:8f0d0ae0a077 819 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 820
dudmuck 0:8f0d0ae0a077 821 mibReq.Type = MIB_NWK_SKEY;
dudmuck 0:8f0d0ae0a077 822 mibReq.Param.NwkSKey = NwkSKey;
dudmuck 0:8f0d0ae0a077 823 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 824
dudmuck 0:8f0d0ae0a077 825 mibReq.Type = MIB_APP_SKEY;
dudmuck 0:8f0d0ae0a077 826 mibReq.Param.AppSKey = AppSKey;
dudmuck 0:8f0d0ae0a077 827 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 828
dudmuck 0:8f0d0ae0a077 829 mibReq.Type = MIB_NETWORK_JOINED;
dudmuck 0:8f0d0ae0a077 830 mibReq.Param.IsNetworkJoined = true;
dudmuck 0:8f0d0ae0a077 831 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 832
dudmuck 0:8f0d0ae0a077 833 DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 834 #endif
dudmuck 0:8f0d0ae0a077 835 break;
dudmuck 0:8f0d0ae0a077 836 }
dudmuck 0:8f0d0ae0a077 837 case DEVICE_STATE_SEND:
dudmuck 0:8f0d0ae0a077 838 {
dudmuck 0:8f0d0ae0a077 839 if( NextTx == true )
dudmuck 0:8f0d0ae0a077 840 {
dudmuck 0:8f0d0ae0a077 841 PrepareTxFrame( AppPort );
dudmuck 0:8f0d0ae0a077 842
dudmuck 0:8f0d0ae0a077 843 NextTx = SendFrame( );
dudmuck 0:8f0d0ae0a077 844 }
dudmuck 2:f2d9aa163652 845
dudmuck 0:8f0d0ae0a077 846 // Schedule next packet transmission
dudmuck 0:8f0d0ae0a077 847 TxDutyCycleTime = APP_TX_DUTYCYCLE + randr( -APP_TX_DUTYCYCLE_RND, APP_TX_DUTYCYCLE_RND );
dudmuck 2:f2d9aa163652 848 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 0:8f0d0ae0a077 849 break;
dudmuck 0:8f0d0ae0a077 850 }
dudmuck 0:8f0d0ae0a077 851 case DEVICE_STATE_CYCLE:
dudmuck 0:8f0d0ae0a077 852 {
dudmuck 0:8f0d0ae0a077 853 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 0:8f0d0ae0a077 854
dudmuck 0:8f0d0ae0a077 855 // Schedule next packet transmission
dudmuck 0:8f0d0ae0a077 856 TxNextPacketTimer.attach_us(&OnTxNextPacketTimerEvent, TxDutyCycleTime * 1000);
dudmuck 0:8f0d0ae0a077 857 break;
dudmuck 0:8f0d0ae0a077 858 }
dudmuck 0:8f0d0ae0a077 859 case DEVICE_STATE_SLEEP:
dudmuck 0:8f0d0ae0a077 860 {
dudmuck 1:53c30224eda8 861 //isr_printf("sleep %u\r\n", queue.tick());
dudmuck 0:8f0d0ae0a077 862 // Wake up through events
dudmuck 0:8f0d0ae0a077 863 break;
dudmuck 0:8f0d0ae0a077 864 }
dudmuck 0:8f0d0ae0a077 865 default:
dudmuck 0:8f0d0ae0a077 866 {
dudmuck 0:8f0d0ae0a077 867 DeviceState = DEVICE_STATE_INIT;
dudmuck 0:8f0d0ae0a077 868 break;
dudmuck 0:8f0d0ae0a077 869 }
dudmuck 0:8f0d0ae0a077 870 }
dudmuck 1:53c30224eda8 871
dudmuck 1:53c30224eda8 872 bottom_half();
dudmuck 1:53c30224eda8 873
dudmuck 1:53c30224eda8 874 } // ..while( 1 )
dudmuck 0:8f0d0ae0a077 875 }