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@1:53c30224eda8, 2017-05-22 (annotated)

Committer:
dudmuck
Date:
Mon May 22 16:43:39 2017 -0700
Revision:
1:53c30224eda8
Parent:
0:8f0d0ae0a077
Child:
2:f2d9aa163652
prevent lockup from printing in ISR

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 0:8f0d0ae0a077 167
dudmuck 0:8f0d0ae0a077 168 /*!
dudmuck 0:8f0d0ae0a077 169 * \brief Prepares the payload of the frame
dudmuck 0:8f0d0ae0a077 170 */
dudmuck 0:8f0d0ae0a077 171 static void PrepareTxFrame( uint8_t port )
dudmuck 0:8f0d0ae0a077 172 {
dudmuck 0:8f0d0ae0a077 173 switch( port )
dudmuck 0:8f0d0ae0a077 174 {
dudmuck 0:8f0d0ae0a077 175 case 15:
dudmuck 0:8f0d0ae0a077 176 {
dudmuck 0:8f0d0ae0a077 177 AppData[0] = AppLedStateOn;
dudmuck 0:8f0d0ae0a077 178 if( IsTxConfirmed == true )
dudmuck 0:8f0d0ae0a077 179 {
dudmuck 0:8f0d0ae0a077 180 AppData[1] = LoRaMacDownlinkStatus.DownlinkCounter >> 8;
dudmuck 0:8f0d0ae0a077 181 AppData[2] = LoRaMacDownlinkStatus.DownlinkCounter;
dudmuck 0:8f0d0ae0a077 182 AppData[3] = LoRaMacDownlinkStatus.Rssi >> 8;
dudmuck 0:8f0d0ae0a077 183 AppData[4] = LoRaMacDownlinkStatus.Rssi;
dudmuck 0:8f0d0ae0a077 184 AppData[5] = LoRaMacDownlinkStatus.Snr;
dudmuck 0:8f0d0ae0a077 185 }
dudmuck 0:8f0d0ae0a077 186 }
dudmuck 0:8f0d0ae0a077 187 break;
dudmuck 0:8f0d0ae0a077 188 default:
dudmuck 0:8f0d0ae0a077 189 break;
dudmuck 0:8f0d0ae0a077 190 }
dudmuck 0:8f0d0ae0a077 191 }
dudmuck 0:8f0d0ae0a077 192
dudmuck 0:8f0d0ae0a077 193 void
dudmuck 0:8f0d0ae0a077 194 LoRaMacEventInfoStatus_to_string(LoRaMacEventInfoStatus_t status, char* dst)
dudmuck 0:8f0d0ae0a077 195 {
dudmuck 0:8f0d0ae0a077 196 const char* ptr = NULL;
dudmuck 0:8f0d0ae0a077 197
dudmuck 0:8f0d0ae0a077 198 switch (status) {
dudmuck 0:8f0d0ae0a077 199 case LORAMAC_EVENT_INFO_STATUS_RX_ERROR: ptr = "RX_ERROR"; break;
dudmuck 0:8f0d0ae0a077 200 case LORAMAC_EVENT_INFO_STATUS_OK: ptr = "OK"; break;
dudmuck 0:8f0d0ae0a077 201 case LORAMAC_EVENT_INFO_STATUS_ERROR: ptr = "ERROR"; break;
dudmuck 0:8f0d0ae0a077 202 case LORAMAC_EVENT_INFO_STATUS_TX_TIMEOUT: ptr = "TX_TIMEOUT"; break;
dudmuck 0:8f0d0ae0a077 203 case LORAMAC_EVENT_INFO_STATUS_RX_TIMEOUT: ptr = "RX_TIMEOUT"; break;
dudmuck 0:8f0d0ae0a077 204 case LORAMAC_EVENT_INFO_STATUS_JOIN_FAIL: ptr = "JOIN_FAIL"; break;
dudmuck 0:8f0d0ae0a077 205 case LORAMAC_EVENT_INFO_STATUS_DOWNLINK_REPEATED: ptr = "DOWNLINK_REPEATED"; break;
dudmuck 0:8f0d0ae0a077 206 case LORAMAC_EVENT_INFO_STATUS_TX_DR_PAYLOAD_SIZE_ERROR: ptr = "TX_DR_PAYLOAD_SIZE_ERROR"; break;
dudmuck 0:8f0d0ae0a077 207 case LORAMAC_EVENT_INFO_STATUS_DOWNLINK_TOO_MANY_FRAMES_LOSS: ptr = "DOWNLINK_TOO_MANY_FRAMES_LOSS"; break;
dudmuck 0:8f0d0ae0a077 208 case LORAMAC_EVENT_INFO_STATUS_ADDRESS_FAIL: ptr = "ADDRESS_FAIL"; break;
dudmuck 0:8f0d0ae0a077 209 case LORAMAC_EVENT_INFO_STATUS_MIC_FAIL: ptr = "MIC_FAIL"; break;
dudmuck 0:8f0d0ae0a077 210 case LORAMAC_EVENT_INFO_STATUS_BEACON_LOCKED: ptr = "BEACON_LOCKED"; break;
dudmuck 0:8f0d0ae0a077 211 case LORAMAC_EVENT_INFO_STATUS_BEACON_LOST: ptr = "BEACON_LOST"; break;
dudmuck 0:8f0d0ae0a077 212 case LORAMAC_EVENT_INFO_STATUS_BEACON_NOT_FOUND: ptr = "BEACON_NOT_FOUND"; break;
dudmuck 0:8f0d0ae0a077 213 }
dudmuck 0:8f0d0ae0a077 214
dudmuck 0:8f0d0ae0a077 215 if (ptr != NULL)
dudmuck 0:8f0d0ae0a077 216 strcpy(dst, ptr);
dudmuck 0:8f0d0ae0a077 217 }
dudmuck 0:8f0d0ae0a077 218
dudmuck 0:8f0d0ae0a077 219 void
dudmuck 0:8f0d0ae0a077 220 LoRaMacStatus_to_string(LoRaMacStatus_t status, char* dst)
dudmuck 0:8f0d0ae0a077 221 {
dudmuck 0:8f0d0ae0a077 222 const char* ptr = NULL;
dudmuck 0:8f0d0ae0a077 223
dudmuck 0:8f0d0ae0a077 224 switch (status) {
dudmuck 0:8f0d0ae0a077 225 case LORAMAC_STATUS_OK: ptr = "OK"; break;
dudmuck 0:8f0d0ae0a077 226 case LORAMAC_STATUS_BUSY: ptr = "BUSY"; break;
dudmuck 0:8f0d0ae0a077 227 case LORAMAC_STATUS_SERVICE_UNKNOWN: ptr = "SERVICE_UNKNOWN"; break;
dudmuck 0:8f0d0ae0a077 228 case LORAMAC_STATUS_PARAMETER_INVALID: ptr = "PARAMETER_INVALID"; break;
dudmuck 0:8f0d0ae0a077 229 case LORAMAC_STATUS_FREQUENCY_INVALID: ptr = "FREQUENCY_INVALID"; break;
dudmuck 0:8f0d0ae0a077 230 case LORAMAC_STATUS_DATARATE_INVALID: ptr = "DATARATE_INVALID"; break;
dudmuck 0:8f0d0ae0a077 231 case LORAMAC_STATUS_FREQ_AND_DR_INVALID: ptr = "FREQ_AND_DR_INVALID"; break;
dudmuck 0:8f0d0ae0a077 232 case LORAMAC_STATUS_NO_NETWORK_JOINED: ptr = "NO_NETWORK_JOINED"; break;
dudmuck 0:8f0d0ae0a077 233 case LORAMAC_STATUS_LENGTH_ERROR: ptr = "LENGTH_ERROR"; break;
dudmuck 0:8f0d0ae0a077 234 case LORAMAC_STATUS_MAC_CMD_LENGTH_ERROR: ptr = "MAC_CMD_LENGTH_ERROR"; break;
dudmuck 0:8f0d0ae0a077 235 case LORAMAC_STATUS_DEVICE_OFF: ptr = "DEVICE_OFF"; break;
dudmuck 0:8f0d0ae0a077 236 }
dudmuck 0:8f0d0ae0a077 237 if (ptr != NULL)
dudmuck 0:8f0d0ae0a077 238 strcpy(dst, ptr);
dudmuck 0:8f0d0ae0a077 239 }
dudmuck 0:8f0d0ae0a077 240
dudmuck 0:8f0d0ae0a077 241 /*!
dudmuck 0:8f0d0ae0a077 242 * \brief Prepares the payload of the frame
dudmuck 0:8f0d0ae0a077 243 *
dudmuck 0:8f0d0ae0a077 244 * \retval [0: frame could be send, 1: error]
dudmuck 0:8f0d0ae0a077 245 */
dudmuck 0:8f0d0ae0a077 246 static bool SendFrame( void )
dudmuck 0:8f0d0ae0a077 247 {
dudmuck 0:8f0d0ae0a077 248 McpsReq_t mcpsReq;
dudmuck 0:8f0d0ae0a077 249 LoRaMacTxInfo_t txInfo;
dudmuck 0:8f0d0ae0a077 250 LoRaMacStatus_t status;
dudmuck 0:8f0d0ae0a077 251 char str[64];
dudmuck 0:8f0d0ae0a077 252
dudmuck 0:8f0d0ae0a077 253 if( LoRaMacQueryTxPossible( AppDataSize, &txInfo ) != LORAMAC_STATUS_OK )
dudmuck 0:8f0d0ae0a077 254 {
dudmuck 0:8f0d0ae0a077 255 // Send empty frame in order to flush MAC commands
dudmuck 0:8f0d0ae0a077 256 mcpsReq.Type = MCPS_UNCONFIRMED;
dudmuck 0:8f0d0ae0a077 257 mcpsReq.Req.Unconfirmed.fBuffer = NULL;
dudmuck 0:8f0d0ae0a077 258 mcpsReq.Req.Unconfirmed.fBufferSize = 0;
dudmuck 0:8f0d0ae0a077 259 //mcpsReq.Req.Unconfirmed.Datarate = LORAWAN_DEFAULT_DATARATE;
dudmuck 0:8f0d0ae0a077 260
dudmuck 0:8f0d0ae0a077 261 LoRaMacUplinkStatus.Acked = false;
dudmuck 0:8f0d0ae0a077 262 LoRaMacUplinkStatus.Port = 0;
dudmuck 0:8f0d0ae0a077 263 LoRaMacUplinkStatus.Buffer = NULL;
dudmuck 0:8f0d0ae0a077 264 LoRaMacUplinkStatus.BufferSize = 0;
dudmuck 0:8f0d0ae0a077 265 }
dudmuck 0:8f0d0ae0a077 266 else
dudmuck 0:8f0d0ae0a077 267 {
dudmuck 0:8f0d0ae0a077 268 LoRaMacUplinkStatus.Acked = false;
dudmuck 0:8f0d0ae0a077 269 LoRaMacUplinkStatus.Port = AppPort;
dudmuck 0:8f0d0ae0a077 270 LoRaMacUplinkStatus.Buffer = AppData;
dudmuck 0:8f0d0ae0a077 271 LoRaMacUplinkStatus.BufferSize = AppDataSize;
dudmuck 0:8f0d0ae0a077 272
dudmuck 0:8f0d0ae0a077 273 if( IsTxConfirmed == false )
dudmuck 0:8f0d0ae0a077 274 {
dudmuck 0:8f0d0ae0a077 275 mcpsReq.Type = MCPS_UNCONFIRMED;
dudmuck 0:8f0d0ae0a077 276 mcpsReq.Req.Unconfirmed.fPort = AppPort;
dudmuck 0:8f0d0ae0a077 277 mcpsReq.Req.Unconfirmed.fBuffer = AppData;
dudmuck 0:8f0d0ae0a077 278 mcpsReq.Req.Unconfirmed.fBufferSize = AppDataSize;
dudmuck 0:8f0d0ae0a077 279 //mcpsReq.Req.Unconfirmed.Datarate = LORAWAN_DEFAULT_DATARATE;
dudmuck 0:8f0d0ae0a077 280 }
dudmuck 0:8f0d0ae0a077 281 else
dudmuck 0:8f0d0ae0a077 282 {
dudmuck 0:8f0d0ae0a077 283 mcpsReq.Type = MCPS_CONFIRMED;
dudmuck 0:8f0d0ae0a077 284 mcpsReq.Req.Confirmed.fPort = AppPort;
dudmuck 0:8f0d0ae0a077 285 mcpsReq.Req.Confirmed.fBuffer = AppData;
dudmuck 0:8f0d0ae0a077 286 mcpsReq.Req.Confirmed.fBufferSize = AppDataSize;
dudmuck 0:8f0d0ae0a077 287 mcpsReq.Req.Confirmed.NbTrials = 8;
dudmuck 0:8f0d0ae0a077 288 //mcpsReq.Req.Confirmed.Datarate = LORAWAN_DEFAULT_DATARATE;
dudmuck 0:8f0d0ae0a077 289 }
dudmuck 0:8f0d0ae0a077 290 }
dudmuck 0:8f0d0ae0a077 291
dudmuck 0:8f0d0ae0a077 292 status = LoRaMacMcpsRequest( &mcpsReq );
dudmuck 0:8f0d0ae0a077 293 if( status == LORAMAC_STATUS_OK )
dudmuck 0:8f0d0ae0a077 294 {
dudmuck 0:8f0d0ae0a077 295 awaiting_mcps_indic = true;
dudmuck 0:8f0d0ae0a077 296 return false;
dudmuck 0:8f0d0ae0a077 297 }
dudmuck 0:8f0d0ae0a077 298 LoRaMacStatus_to_string(status, str);
dudmuck 1:53c30224eda8 299 isr_printf("send failed:%s\r\n", str);
dudmuck 0:8f0d0ae0a077 300 send_at_beacon = true;
dudmuck 0:8f0d0ae0a077 301 return true;
dudmuck 0:8f0d0ae0a077 302 }
dudmuck 0:8f0d0ae0a077 303
dudmuck 0:8f0d0ae0a077 304 /*!
dudmuck 0:8f0d0ae0a077 305 * \brief Function executed on TxNextPacket Timeout event
dudmuck 0:8f0d0ae0a077 306 */
dudmuck 0:8f0d0ae0a077 307 static void OnTxNextPacketTimerEvent( void )
dudmuck 0:8f0d0ae0a077 308 {
dudmuck 0:8f0d0ae0a077 309 MibRequestConfirm_t mibReq;
dudmuck 0:8f0d0ae0a077 310 LoRaMacStatus_t status;
dudmuck 0:8f0d0ae0a077 311
dudmuck 0:8f0d0ae0a077 312 mibReq.Type = MIB_NETWORK_JOINED;
dudmuck 0:8f0d0ae0a077 313 status = LoRaMacMibGetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 314
dudmuck 0:8f0d0ae0a077 315 if( status == LORAMAC_STATUS_OK )
dudmuck 0:8f0d0ae0a077 316 {
dudmuck 0:8f0d0ae0a077 317 if( mibReq.Param.IsNetworkJoined == true )
dudmuck 0:8f0d0ae0a077 318 {
dudmuck 0:8f0d0ae0a077 319 DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 320 NextTx = true;
dudmuck 0:8f0d0ae0a077 321 }
dudmuck 0:8f0d0ae0a077 322 else
dudmuck 0:8f0d0ae0a077 323 {
dudmuck 0:8f0d0ae0a077 324 DeviceState = DEVICE_STATE_JOIN;
dudmuck 0:8f0d0ae0a077 325 }
dudmuck 0:8f0d0ae0a077 326 }
dudmuck 0:8f0d0ae0a077 327 }
dudmuck 0:8f0d0ae0a077 328
dudmuck 0:8f0d0ae0a077 329 void
dudmuck 0:8f0d0ae0a077 330 send_uplink()
dudmuck 0:8f0d0ae0a077 331 {
dudmuck 0:8f0d0ae0a077 332 AppDataSize = uplink_length;
dudmuck 1:53c30224eda8 333 NextTx = true;
dudmuck 1:53c30224eda8 334 DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 335 }
dudmuck 0:8f0d0ae0a077 336
dudmuck 0:8f0d0ae0a077 337
dudmuck 0:8f0d0ae0a077 338 /*!
dudmuck 0:8f0d0ae0a077 339 * \brief MCPS-Confirm event function
dudmuck 0:8f0d0ae0a077 340 *
dudmuck 0:8f0d0ae0a077 341 * \param [IN] mcpsConfirm - Pointer to the confirm structure,
dudmuck 0:8f0d0ae0a077 342 * containing confirm attributes.
dudmuck 0:8f0d0ae0a077 343 */
dudmuck 0:8f0d0ae0a077 344 static void McpsConfirm( McpsConfirm_t *mcpsConfirm )
dudmuck 0:8f0d0ae0a077 345 {
dudmuck 0:8f0d0ae0a077 346 char str[64];
dudmuck 1:53c30224eda8 347 isr_printf("McpsConfirm ");
dudmuck 0:8f0d0ae0a077 348 if( mcpsConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 349 {
dudmuck 1:53c30224eda8 350 isr_printf("OK ");
dudmuck 0:8f0d0ae0a077 351 switch( mcpsConfirm->McpsRequest )
dudmuck 0:8f0d0ae0a077 352 {
dudmuck 0:8f0d0ae0a077 353 case MCPS_UNCONFIRMED:
dudmuck 0:8f0d0ae0a077 354 {
dudmuck 1:53c30224eda8 355 isr_printf("UNCONFIRMED");
dudmuck 0:8f0d0ae0a077 356 // Check Datarate
dudmuck 0:8f0d0ae0a077 357 // Check TxPower
dudmuck 0:8f0d0ae0a077 358 break;
dudmuck 0:8f0d0ae0a077 359 }
dudmuck 0:8f0d0ae0a077 360 case MCPS_CONFIRMED:
dudmuck 0:8f0d0ae0a077 361 {
dudmuck 1:53c30224eda8 362 isr_printf("CONFIRMED");
dudmuck 0:8f0d0ae0a077 363 // Check Datarate
dudmuck 0:8f0d0ae0a077 364 // Check TxPower
dudmuck 0:8f0d0ae0a077 365 // Check AckReceived
dudmuck 0:8f0d0ae0a077 366 // Check NbTrials
dudmuck 0:8f0d0ae0a077 367 LoRaMacUplinkStatus.Acked = mcpsConfirm->AckReceived;
dudmuck 0:8f0d0ae0a077 368 break;
dudmuck 0:8f0d0ae0a077 369 }
dudmuck 0:8f0d0ae0a077 370 case MCPS_PROPRIETARY:
dudmuck 0:8f0d0ae0a077 371 {
dudmuck 0:8f0d0ae0a077 372 break;
dudmuck 0:8f0d0ae0a077 373 }
dudmuck 0:8f0d0ae0a077 374 default:
dudmuck 0:8f0d0ae0a077 375 break;
dudmuck 0:8f0d0ae0a077 376 }
dudmuck 0:8f0d0ae0a077 377 //LoRaMacUplinkStatus.Datarate = mcpsConfirm->Datarate;
dudmuck 0:8f0d0ae0a077 378 LoRaMacUplinkStatus.UplinkCounter = mcpsConfirm->UpLinkCounter;
dudmuck 0:8f0d0ae0a077 379
dudmuck 0:8f0d0ae0a077 380 } else {
dudmuck 0:8f0d0ae0a077 381 LoRaMacEventInfoStatus_to_string(mcpsConfirm->Status, str);
dudmuck 1:53c30224eda8 382 isr_printf("%s ", str);
dudmuck 0:8f0d0ae0a077 383
dudmuck 0:8f0d0ae0a077 384 #ifndef MANUAL_UPLINK
dudmuck 0:8f0d0ae0a077 385 /* mcpsIndication may not come. last uplink done, send another uplink */
dudmuck 0:8f0d0ae0a077 386 TxNextPacketTimer.attach_us(&send_uplink, 100000);
dudmuck 0:8f0d0ae0a077 387 #endif /* !MANUAL_UPLINK */
dudmuck 0:8f0d0ae0a077 388 }
dudmuck 0:8f0d0ae0a077 389
dudmuck 0:8f0d0ae0a077 390 NextTx = true;
dudmuck 1:53c30224eda8 391 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 392 }
dudmuck 0:8f0d0ae0a077 393
dudmuck 0:8f0d0ae0a077 394 /*!
dudmuck 0:8f0d0ae0a077 395 * \brief MCPS-Indication event function
dudmuck 0:8f0d0ae0a077 396 *
dudmuck 0:8f0d0ae0a077 397 * \param [IN] mcpsIndication - Pointer to the indication structure,
dudmuck 0:8f0d0ae0a077 398 * containing indication attributes.
dudmuck 0:8f0d0ae0a077 399 */
dudmuck 0:8f0d0ae0a077 400 static void McpsIndication( McpsIndication_t *mcpsIndication )
dudmuck 0:8f0d0ae0a077 401 {
dudmuck 1:53c30224eda8 402 isr_printf("McpsIndication ");
dudmuck 0:8f0d0ae0a077 403
dudmuck 0:8f0d0ae0a077 404 #ifndef MANUAL_UPLINK
dudmuck 0:8f0d0ae0a077 405 /* last uplink done, send another uplink */
dudmuck 0:8f0d0ae0a077 406 TxNextPacketTimer.attach_us(&send_uplink, 100000);
dudmuck 0:8f0d0ae0a077 407 #endif /* !MANUAL_UPLINK */
dudmuck 0:8f0d0ae0a077 408
dudmuck 0:8f0d0ae0a077 409 if( mcpsIndication->Status != LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 410 {
dudmuck 1:53c30224eda8 411 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 412 return;
dudmuck 0:8f0d0ae0a077 413 }
dudmuck 0:8f0d0ae0a077 414
dudmuck 0:8f0d0ae0a077 415 awaiting_mcps_indic = false;
dudmuck 0:8f0d0ae0a077 416
dudmuck 0:8f0d0ae0a077 417 switch( mcpsIndication->McpsIndication )
dudmuck 0:8f0d0ae0a077 418 {
dudmuck 0:8f0d0ae0a077 419 case MCPS_UNCONFIRMED:
dudmuck 0:8f0d0ae0a077 420 {
dudmuck 1:53c30224eda8 421 isr_printf("UNCONFIRMED ");
dudmuck 0:8f0d0ae0a077 422 break;
dudmuck 0:8f0d0ae0a077 423 }
dudmuck 0:8f0d0ae0a077 424 case MCPS_CONFIRMED:
dudmuck 0:8f0d0ae0a077 425 {
dudmuck 1:53c30224eda8 426 isr_printf("CONFIRMED ");
dudmuck 0:8f0d0ae0a077 427 break;
dudmuck 0:8f0d0ae0a077 428 }
dudmuck 0:8f0d0ae0a077 429 case MCPS_PROPRIETARY:
dudmuck 0:8f0d0ae0a077 430 {
dudmuck 0:8f0d0ae0a077 431 break;
dudmuck 0:8f0d0ae0a077 432 }
dudmuck 0:8f0d0ae0a077 433 case MCPS_MULTICAST:
dudmuck 0:8f0d0ae0a077 434 {
dudmuck 0:8f0d0ae0a077 435 break;
dudmuck 0:8f0d0ae0a077 436 }
dudmuck 0:8f0d0ae0a077 437 default:
dudmuck 0:8f0d0ae0a077 438 break;
dudmuck 0:8f0d0ae0a077 439 }
dudmuck 0:8f0d0ae0a077 440
dudmuck 0:8f0d0ae0a077 441 // Check Multicast
dudmuck 0:8f0d0ae0a077 442 // Check Port
dudmuck 0:8f0d0ae0a077 443 // Check Datarate
dudmuck 0:8f0d0ae0a077 444 // Check FramePending
dudmuck 0:8f0d0ae0a077 445 // Check Buffer
dudmuck 0:8f0d0ae0a077 446 // Check BufferSize
dudmuck 0:8f0d0ae0a077 447 // Check Rssi
dudmuck 0:8f0d0ae0a077 448 // Check Snr
dudmuck 0:8f0d0ae0a077 449 // Check RxSlot
dudmuck 0:8f0d0ae0a077 450 LoRaMacDownlinkStatus.Rssi = mcpsIndication->Rssi;
dudmuck 0:8f0d0ae0a077 451 if( mcpsIndication->Snr & 0x80 ) // The SNR sign bit is 1
dudmuck 0:8f0d0ae0a077 452 {
dudmuck 0:8f0d0ae0a077 453 // Invert and divide by 4
dudmuck 0:8f0d0ae0a077 454 LoRaMacDownlinkStatus.Snr = ( ( ~mcpsIndication->Snr + 1 ) & 0xFF ) >> 2;
dudmuck 0:8f0d0ae0a077 455 LoRaMacDownlinkStatus.Snr = -LoRaMacDownlinkStatus.Snr;
dudmuck 0:8f0d0ae0a077 456 }
dudmuck 0:8f0d0ae0a077 457 else
dudmuck 0:8f0d0ae0a077 458 {
dudmuck 0:8f0d0ae0a077 459 // Divide by 4
dudmuck 0:8f0d0ae0a077 460 LoRaMacDownlinkStatus.Snr = ( mcpsIndication->Snr & 0xFF ) >> 2;
dudmuck 0:8f0d0ae0a077 461 }
dudmuck 0:8f0d0ae0a077 462 LoRaMacDownlinkStatus.DownlinkCounter++;
dudmuck 0:8f0d0ae0a077 463 LoRaMacDownlinkStatus.RxData = mcpsIndication->RxData;
dudmuck 0:8f0d0ae0a077 464 LoRaMacDownlinkStatus.Port = mcpsIndication->Port;
dudmuck 0:8f0d0ae0a077 465 LoRaMacDownlinkStatus.Buffer = mcpsIndication->Buffer;
dudmuck 0:8f0d0ae0a077 466 LoRaMacDownlinkStatus.BufferSize = mcpsIndication->BufferSize;
dudmuck 0:8f0d0ae0a077 467
dudmuck 0:8f0d0ae0a077 468 if( mcpsIndication->RxData == true )
dudmuck 0:8f0d0ae0a077 469 {
dudmuck 0:8f0d0ae0a077 470 int i;
dudmuck 1:53c30224eda8 471 isr_printf("RxData %u ", mcpsIndication->BufferSize);
dudmuck 0:8f0d0ae0a077 472 for (i = 0; i < mcpsIndication->BufferSize; i++) {
dudmuck 1:53c30224eda8 473 isr_printf("%02x ", mcpsIndication->Buffer[i]);
dudmuck 0:8f0d0ae0a077 474 }
dudmuck 1:53c30224eda8 475 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 476
dudmuck 0:8f0d0ae0a077 477 switch( mcpsIndication->Port )
dudmuck 0:8f0d0ae0a077 478 {
dudmuck 0:8f0d0ae0a077 479 case 1: // The application LED can be controlled on port 1 or 2
dudmuck 0:8f0d0ae0a077 480 case 2:
dudmuck 0:8f0d0ae0a077 481 if( mcpsIndication->BufferSize == 1 )
dudmuck 0:8f0d0ae0a077 482 {
dudmuck 0:8f0d0ae0a077 483 AppLedStateOn = mcpsIndication->Buffer[0] & 0x01;
dudmuck 0:8f0d0ae0a077 484 //Led3StateChanged = true;
dudmuck 0:8f0d0ae0a077 485 }
dudmuck 0:8f0d0ae0a077 486 break;
dudmuck 0:8f0d0ae0a077 487 default:
dudmuck 0:8f0d0ae0a077 488 break;
dudmuck 0:8f0d0ae0a077 489 }
dudmuck 0:8f0d0ae0a077 490 }
dudmuck 0:8f0d0ae0a077 491
dudmuck 1:53c30224eda8 492 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 493 }
dudmuck 0:8f0d0ae0a077 494
dudmuck 0:8f0d0ae0a077 495 /*!
dudmuck 0:8f0d0ae0a077 496 * \brief MLME-Confirm event function
dudmuck 0:8f0d0ae0a077 497 *
dudmuck 0:8f0d0ae0a077 498 * \param [IN] mlmeConfirm - Pointer to the confirm structure,
dudmuck 0:8f0d0ae0a077 499 * containing confirm attributes.
dudmuck 0:8f0d0ae0a077 500 */
dudmuck 0:8f0d0ae0a077 501 static void MlmeConfirm( MlmeConfirm_t *mlmeConfirm )
dudmuck 0:8f0d0ae0a077 502 {
dudmuck 1:53c30224eda8 503 isr_printf("MlmeConfirm ");
dudmuck 0:8f0d0ae0a077 504 switch( mlmeConfirm->MlmeRequest )
dudmuck 0:8f0d0ae0a077 505 {
dudmuck 0:8f0d0ae0a077 506 case MLME_JOIN:
dudmuck 0:8f0d0ae0a077 507 {
dudmuck 1:53c30224eda8 508 isr_printf("MLME_JOIN ");
dudmuck 0:8f0d0ae0a077 509 if( mlmeConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 510 {
dudmuck 0:8f0d0ae0a077 511 // Status is OK, node has joined the network
dudmuck 0:8f0d0ae0a077 512 //DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 513 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 1:53c30224eda8 514 isr_printf("ok");
dudmuck 0:8f0d0ae0a077 515 }
dudmuck 0:8f0d0ae0a077 516 else
dudmuck 0:8f0d0ae0a077 517 {
dudmuck 0:8f0d0ae0a077 518 // Join was not successful. Try to join again
dudmuck 0:8f0d0ae0a077 519 DeviceState = DEVICE_STATE_JOIN;
dudmuck 1:53c30224eda8 520 isr_printf("fail");
dudmuck 0:8f0d0ae0a077 521 }
dudmuck 0:8f0d0ae0a077 522 break;
dudmuck 0:8f0d0ae0a077 523 }
dudmuck 0:8f0d0ae0a077 524 case MLME_LINK_CHECK:
dudmuck 0:8f0d0ae0a077 525 {
dudmuck 1:53c30224eda8 526 isr_printf("LINK_CHECK");
dudmuck 0:8f0d0ae0a077 527 if( mlmeConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
dudmuck 0:8f0d0ae0a077 528 {
dudmuck 0:8f0d0ae0a077 529 // Check DemodMargin
dudmuck 0:8f0d0ae0a077 530 //mlmeConfirm->DemodMargin;
dudmuck 0:8f0d0ae0a077 531 // Check NbGateways
dudmuck 0:8f0d0ae0a077 532 //mlmeConfirm->NbGateways;
dudmuck 0:8f0d0ae0a077 533 }
dudmuck 0:8f0d0ae0a077 534 break;
dudmuck 0:8f0d0ae0a077 535 }
dudmuck 0:8f0d0ae0a077 536 default:
dudmuck 0:8f0d0ae0a077 537 break;
dudmuck 0:8f0d0ae0a077 538 }
dudmuck 0:8f0d0ae0a077 539 NextTx = true;
dudmuck 1:53c30224eda8 540 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 541 }
dudmuck 0:8f0d0ae0a077 542
dudmuck 0:8f0d0ae0a077 543
dudmuck 0:8f0d0ae0a077 544 static void MlmeIndication( MlmeIndication_t *MlmeIndication )
dudmuck 0:8f0d0ae0a077 545 {
dudmuck 0:8f0d0ae0a077 546 char str[64];
dudmuck 0:8f0d0ae0a077 547 //MibRequestConfirm_t mibReq;
dudmuck 0:8f0d0ae0a077 548
dudmuck 1:53c30224eda8 549 isr_printf("MlmeIndication ");
dudmuck 0:8f0d0ae0a077 550 switch( MlmeIndication->MlmeIndication )
dudmuck 0:8f0d0ae0a077 551 {
dudmuck 0:8f0d0ae0a077 552 case MLME_BEACON:
dudmuck 0:8f0d0ae0a077 553 {
dudmuck 1:53c30224eda8 554 isr_printf("send_at_beacon%u BEACON ", send_at_beacon);
dudmuck 0:8f0d0ae0a077 555 LoRaMacEventInfoStatus_to_string(MlmeIndication->Status, str);
dudmuck 1:53c30224eda8 556 isr_printf("%s ", str);
dudmuck 0:8f0d0ae0a077 557 #ifndef MANUAL_UPLINK
dudmuck 0:8f0d0ae0a077 558 if (send_at_beacon) {
dudmuck 0:8f0d0ae0a077 559 TxNextPacketTimer.attach_us(&send_uplink, 100000);
dudmuck 0:8f0d0ae0a077 560 send_at_beacon = false;
dudmuck 0:8f0d0ae0a077 561 }
dudmuck 0:8f0d0ae0a077 562
dudmuck 0:8f0d0ae0a077 563 #endif /* !MANUAL_UPLINK */
dudmuck 0:8f0d0ae0a077 564 break;
dudmuck 0:8f0d0ae0a077 565
dudmuck 0:8f0d0ae0a077 566 }
dudmuck 0:8f0d0ae0a077 567 default:
dudmuck 1:53c30224eda8 568 isr_printf("<%d> ", MlmeIndication->MlmeIndication);
dudmuck 0:8f0d0ae0a077 569 break;
dudmuck 0:8f0d0ae0a077 570 }
dudmuck 0:8f0d0ae0a077 571
dudmuck 1:53c30224eda8 572 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 573 }
dudmuck 0:8f0d0ae0a077 574
dudmuck 0:8f0d0ae0a077 575 void
dudmuck 0:8f0d0ae0a077 576 send_pcbuf_uplink()
dudmuck 0:8f0d0ae0a077 577 {
dudmuck 0:8f0d0ae0a077 578 bool ret;
dudmuck 0:8f0d0ae0a077 579 memcpy(AppData, pcbuf, pcbuf_len);
dudmuck 0:8f0d0ae0a077 580 AppDataSize = pcbuf_len;
dudmuck 0:8f0d0ae0a077 581
dudmuck 0:8f0d0ae0a077 582 ret = SendFrame( );
dudmuck 1:53c30224eda8 583 isr_printf("%d = SendFrame()\r\n", ret);
dudmuck 0:8f0d0ae0a077 584 }
dudmuck 0:8f0d0ae0a077 585
dudmuck 0:8f0d0ae0a077 586 void cmd_status(uint8_t idx)
dudmuck 0:8f0d0ae0a077 587 {
dudmuck 1:53c30224eda8 588 isr_printf("DeviceState:%d\r\n", DeviceState);
dudmuck 1:53c30224eda8 589 isr_printf("send_at_beacon:%d\r\n", send_at_beacon);
dudmuck 1:53c30224eda8 590 isr_printf("awaiting_mcps_indic:%d\r\n", awaiting_mcps_indic);
dudmuck 0:8f0d0ae0a077 591 loramac_print_status();
dudmuck 0:8f0d0ae0a077 592 }
dudmuck 0:8f0d0ae0a077 593
dudmuck 0:8f0d0ae0a077 594 void cmd_uplink_length(uint8_t idx)
dudmuck 0:8f0d0ae0a077 595 {
dudmuck 0:8f0d0ae0a077 596 if (pcbuf[idx] >= '0' && pcbuf[idx] <= '9') {
dudmuck 0:8f0d0ae0a077 597 sscanf(pcbuf+idx, "%u", &uplink_length);
dudmuck 0:8f0d0ae0a077 598 }
dudmuck 1:53c30224eda8 599 isr_printf("uplink_length:%u\r\n", uplink_length);
dudmuck 0:8f0d0ae0a077 600 }
dudmuck 0:8f0d0ae0a077 601
dudmuck 0:8f0d0ae0a077 602 typedef struct {
dudmuck 0:8f0d0ae0a077 603 const char* const cmd;
dudmuck 0:8f0d0ae0a077 604 void (*handler)(uint8_t args_at);
dudmuck 0:8f0d0ae0a077 605 const char* const arg_descr;
dudmuck 0:8f0d0ae0a077 606 const char* const description;
dudmuck 0:8f0d0ae0a077 607 } menu_item_t;
dudmuck 0:8f0d0ae0a077 608
dudmuck 0:8f0d0ae0a077 609 void cmd_help(uint8_t args_at);
dudmuck 0:8f0d0ae0a077 610
dudmuck 0:8f0d0ae0a077 611 const menu_item_t menu_items[] =
dudmuck 0:8f0d0ae0a077 612 { /* after first character, command names must be [A-Za-z] */
dudmuck 0:8f0d0ae0a077 613 { "?", cmd_help, "","show available commands"},
dudmuck 0:8f0d0ae0a077 614 { ".", cmd_status, "","print status"},
dudmuck 0:8f0d0ae0a077 615 { "ul", cmd_uplink_length, "","set uplink payload length"},
dudmuck 0:8f0d0ae0a077 616 { NULL, NULL, NULL, NULL }
dudmuck 0:8f0d0ae0a077 617 };
dudmuck 0:8f0d0ae0a077 618
dudmuck 0:8f0d0ae0a077 619 void cmd_help(uint8_t args_at)
dudmuck 0:8f0d0ae0a077 620 {
dudmuck 0:8f0d0ae0a077 621 int i;
dudmuck 0:8f0d0ae0a077 622
dudmuck 0:8f0d0ae0a077 623 for (i = 0; menu_items[i].cmd != NULL ; i++) {
dudmuck 1:53c30224eda8 624 isr_printf("%s%s\t%s\r\n", menu_items[i].cmd, menu_items[i].arg_descr, menu_items[i].description);
dudmuck 0:8f0d0ae0a077 625 }
dudmuck 0:8f0d0ae0a077 626
dudmuck 0:8f0d0ae0a077 627 }
dudmuck 0:8f0d0ae0a077 628
dudmuck 0:8f0d0ae0a077 629 void
dudmuck 0:8f0d0ae0a077 630 console()
dudmuck 0:8f0d0ae0a077 631 {
dudmuck 0:8f0d0ae0a077 632 bool parsed;
dudmuck 0:8f0d0ae0a077 633 int i;
dudmuck 0:8f0d0ae0a077 634 uint8_t user_cmd_len;
dudmuck 0:8f0d0ae0a077 635
dudmuck 0:8f0d0ae0a077 636 if (pcbuf_len < 0) { // ctrl-C
dudmuck 1:53c30224eda8 637 //isr_printf("abort\r\n");
dudmuck 0:8f0d0ae0a077 638 return;
dudmuck 0:8f0d0ae0a077 639 }
dudmuck 0:8f0d0ae0a077 640 if (pcbuf_len == 0)
dudmuck 0:8f0d0ae0a077 641 return;
dudmuck 0:8f0d0ae0a077 642
dudmuck 1:53c30224eda8 643 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 644
dudmuck 0:8f0d0ae0a077 645 /* get end of user-entered command */
dudmuck 0:8f0d0ae0a077 646 user_cmd_len = 1; // first character can be any character
dudmuck 0:8f0d0ae0a077 647 for (i = 1; i <= pcbuf_len; i++) {
dudmuck 0:8f0d0ae0a077 648 if (pcbuf[i] < 'A' || (pcbuf[i] > 'Z' && pcbuf[i] < 'a') || pcbuf[i] > 'z') {
dudmuck 0:8f0d0ae0a077 649 user_cmd_len = i;
dudmuck 0:8f0d0ae0a077 650 break;
dudmuck 0:8f0d0ae0a077 651 }
dudmuck 0:8f0d0ae0a077 652 }
dudmuck 0:8f0d0ae0a077 653
dudmuck 0:8f0d0ae0a077 654 parsed = false;
dudmuck 0:8f0d0ae0a077 655 for (i = 0; menu_items[i].cmd != NULL ; i++) {
dudmuck 0:8f0d0ae0a077 656 int mi_len = strlen(menu_items[i].cmd);
dudmuck 0:8f0d0ae0a077 657
dudmuck 0:8f0d0ae0a077 658 if (menu_items[i].handler && user_cmd_len == mi_len && (strncmp(pcbuf, menu_items[i].cmd, mi_len) == 0)) {
dudmuck 0:8f0d0ae0a077 659 while (pcbuf[mi_len] == ' ') // skip past spaces
dudmuck 0:8f0d0ae0a077 660 mi_len++;
dudmuck 0:8f0d0ae0a077 661 menu_items[i].handler(mi_len);
dudmuck 0:8f0d0ae0a077 662 parsed = true;
dudmuck 0:8f0d0ae0a077 663 break;
dudmuck 0:8f0d0ae0a077 664 }
dudmuck 0:8f0d0ae0a077 665 }
dudmuck 0:8f0d0ae0a077 666
dudmuck 0:8f0d0ae0a077 667 if (!parsed)
dudmuck 0:8f0d0ae0a077 668 send_pcbuf_uplink();
dudmuck 0:8f0d0ae0a077 669
dudmuck 0:8f0d0ae0a077 670 pcbuf_len = 0;
dudmuck 1:53c30224eda8 671 isr_printf("> ");
dudmuck 0:8f0d0ae0a077 672 fflush(stdout);
dudmuck 0:8f0d0ae0a077 673 }
dudmuck 0:8f0d0ae0a077 674
dudmuck 0:8f0d0ae0a077 675 void rx_callback()
dudmuck 0:8f0d0ae0a077 676 {
dudmuck 0:8f0d0ae0a077 677 static uint8_t pcbuf_idx = 0;
dudmuck 0:8f0d0ae0a077 678 static uint8_t prev_len = 0;;
dudmuck 0:8f0d0ae0a077 679 char c = pc.getc();
dudmuck 0:8f0d0ae0a077 680
dudmuck 0:8f0d0ae0a077 681 if (c == 8) {
dudmuck 0:8f0d0ae0a077 682 if (pcbuf_idx > 0) {
dudmuck 0:8f0d0ae0a077 683 pc.putc(8);
dudmuck 0:8f0d0ae0a077 684 pc.putc(' ');
dudmuck 0:8f0d0ae0a077 685 pc.putc(8);
dudmuck 0:8f0d0ae0a077 686 pcbuf_idx--;
dudmuck 0:8f0d0ae0a077 687 }
dudmuck 0:8f0d0ae0a077 688 } else if (c == 3) { // ctrl-C
dudmuck 0:8f0d0ae0a077 689 pcbuf_len = -1;
dudmuck 0:8f0d0ae0a077 690 } else if (c == '\r') {
dudmuck 0:8f0d0ae0a077 691 if (pcbuf_idx == 0) {
dudmuck 0:8f0d0ae0a077 692 pcbuf_len = prev_len;
dudmuck 0:8f0d0ae0a077 693 } else {
dudmuck 0:8f0d0ae0a077 694 pcbuf[pcbuf_idx] = 0; // null terminate
dudmuck 0:8f0d0ae0a077 695 prev_len = pcbuf_idx;
dudmuck 0:8f0d0ae0a077 696 pcbuf_idx = 0;
dudmuck 0:8f0d0ae0a077 697 pcbuf_len = prev_len;
dudmuck 0:8f0d0ae0a077 698 }
dudmuck 0:8f0d0ae0a077 699 } else if (pcbuf_idx < sizeof(pcbuf)) {
dudmuck 0:8f0d0ae0a077 700 pcbuf[pcbuf_idx++] = c;
dudmuck 0:8f0d0ae0a077 701 pc.putc(c);
dudmuck 0:8f0d0ae0a077 702 }
dudmuck 0:8f0d0ae0a077 703 }
dudmuck 0:8f0d0ae0a077 704
dudmuck 0:8f0d0ae0a077 705 /**
dudmuck 0:8f0d0ae0a077 706 * Main application entry point.
dudmuck 0:8f0d0ae0a077 707 */
dudmuck 0:8f0d0ae0a077 708 int main( void )
dudmuck 0:8f0d0ae0a077 709 {
dudmuck 0:8f0d0ae0a077 710 LoRaMacPrimitives_t LoRaMacPrimitives;
dudmuck 0:8f0d0ae0a077 711 LoRaMacCallback_t LoRaMacCallbacks;
dudmuck 0:8f0d0ae0a077 712 MibRequestConfirm_t mibReq;
dudmuck 0:8f0d0ae0a077 713
dudmuck 0:8f0d0ae0a077 714 BoardInit( );
dudmuck 0:8f0d0ae0a077 715 pc.baud(115200);
dudmuck 1:53c30224eda8 716 isr_printf("\r\nreset\r\n");
dudmuck 0:8f0d0ae0a077 717 DeviceState = DEVICE_STATE_INIT;
dudmuck 0:8f0d0ae0a077 718
dudmuck 0:8f0d0ae0a077 719 while( 1 )
dudmuck 0:8f0d0ae0a077 720 {
dudmuck 0:8f0d0ae0a077 721 console();
dudmuck 1:53c30224eda8 722 if (pc.readable())
dudmuck 1:53c30224eda8 723 rx_callback();
dudmuck 0:8f0d0ae0a077 724
dudmuck 0:8f0d0ae0a077 725 switch( DeviceState )
dudmuck 0:8f0d0ae0a077 726 {
dudmuck 0:8f0d0ae0a077 727 case DEVICE_STATE_INIT:
dudmuck 0:8f0d0ae0a077 728 {
dudmuck 1:53c30224eda8 729 isr_printf("DEVICE_STATE_INIT\r\n");
dudmuck 0:8f0d0ae0a077 730 uplink_length = 2;
dudmuck 0:8f0d0ae0a077 731 LoRaMacPrimitives.MacMcpsConfirm = McpsConfirm;
dudmuck 0:8f0d0ae0a077 732 LoRaMacPrimitives.MacMcpsIndication = McpsIndication;
dudmuck 0:8f0d0ae0a077 733 LoRaMacPrimitives.MacMlmeConfirm = MlmeConfirm;
dudmuck 0:8f0d0ae0a077 734 LoRaMacPrimitives.MacMlmeIndication = MlmeIndication;
dudmuck 0:8f0d0ae0a077 735 LoRaMacCallbacks.GetBatteryLevel = BoardGetBatteryLevel;
dudmuck 0:8f0d0ae0a077 736 if (LORAMAC_STATUS_OK != LoRaMacInitialization( &LoRaMacPrimitives, &LoRaMacCallbacks )) {
dudmuck 1:53c30224eda8 737 isr_printf("LoRaMacInitialization() failed\r\n");
dudmuck 0:8f0d0ae0a077 738 for (;;) ;
dudmuck 0:8f0d0ae0a077 739 }
dudmuck 1:53c30224eda8 740 isr_printf("INIT-ok\r\n");
dudmuck 0:8f0d0ae0a077 741
dudmuck 0:8f0d0ae0a077 742 mibReq.Type = MIB_PUBLIC_NETWORK;
dudmuck 0:8f0d0ae0a077 743 mibReq.Param.EnablePublicNetwork = LORAWAN_PUBLIC_NETWORK;
dudmuck 0:8f0d0ae0a077 744 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 745
dudmuck 0:8f0d0ae0a077 746 LoRaMacDownlinkStatus.DownlinkCounter = 0;
dudmuck 0:8f0d0ae0a077 747
dudmuck 0:8f0d0ae0a077 748 DeviceState = DEVICE_STATE_JOIN;
dudmuck 0:8f0d0ae0a077 749 break;
dudmuck 0:8f0d0ae0a077 750 }
dudmuck 0:8f0d0ae0a077 751 case DEVICE_STATE_JOIN:
dudmuck 0:8f0d0ae0a077 752 {
dudmuck 0:8f0d0ae0a077 753 send_at_beacon = true;
dudmuck 0:8f0d0ae0a077 754 #if( OVER_THE_AIR_ACTIVATION != 0 )
dudmuck 0:8f0d0ae0a077 755 MlmeReq_t mlmeReq;
dudmuck 0:8f0d0ae0a077 756 // override software definition with hardware value
dudmuck 0:8f0d0ae0a077 757 BoardGetUniqueId(DevEui);
dudmuck 1:53c30224eda8 758 isr_printf("DevEUI ");
dudmuck 0:8f0d0ae0a077 759 for (int i = 0; i < 8; i++)
dudmuck 1:53c30224eda8 760 isr_printf("%02x ", DevEui[i]);
dudmuck 1:53c30224eda8 761 isr_printf("\r\n");
dudmuck 0:8f0d0ae0a077 762
dudmuck 0:8f0d0ae0a077 763 mlmeReq.Type = MLME_JOIN;
dudmuck 0:8f0d0ae0a077 764
dudmuck 0:8f0d0ae0a077 765 mlmeReq.Req.Join.DevEui = DevEui;
dudmuck 0:8f0d0ae0a077 766 mlmeReq.Req.Join.AppEui = AppEui;
dudmuck 0:8f0d0ae0a077 767 mlmeReq.Req.Join.AppKey = AppKey;
dudmuck 0:8f0d0ae0a077 768 mlmeReq.Req.Join.NbTrials = 255;
dudmuck 0:8f0d0ae0a077 769
dudmuck 0:8f0d0ae0a077 770 if( NextTx == true )
dudmuck 0:8f0d0ae0a077 771 {
dudmuck 0:8f0d0ae0a077 772 LoRaMacMlmeRequest( &mlmeReq );
dudmuck 0:8f0d0ae0a077 773 }
dudmuck 0:8f0d0ae0a077 774 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 0:8f0d0ae0a077 775 #else
dudmuck 0:8f0d0ae0a077 776 mibReq.Type = MIB_NET_ID;
dudmuck 0:8f0d0ae0a077 777 mibReq.Param.NetID = LORAWAN_NETWORK_ID;
dudmuck 0:8f0d0ae0a077 778 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 779
dudmuck 0:8f0d0ae0a077 780 mibReq.Type = MIB_DEV_ADDR;
dudmuck 0:8f0d0ae0a077 781 mibReq.Param.DevAddr = DevAddr;
dudmuck 0:8f0d0ae0a077 782 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 783
dudmuck 0:8f0d0ae0a077 784 mibReq.Type = MIB_NWK_SKEY;
dudmuck 0:8f0d0ae0a077 785 mibReq.Param.NwkSKey = NwkSKey;
dudmuck 0:8f0d0ae0a077 786 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 787
dudmuck 0:8f0d0ae0a077 788 mibReq.Type = MIB_APP_SKEY;
dudmuck 0:8f0d0ae0a077 789 mibReq.Param.AppSKey = AppSKey;
dudmuck 0:8f0d0ae0a077 790 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 791
dudmuck 0:8f0d0ae0a077 792 mibReq.Type = MIB_NETWORK_JOINED;
dudmuck 0:8f0d0ae0a077 793 mibReq.Param.IsNetworkJoined = true;
dudmuck 0:8f0d0ae0a077 794 LoRaMacMibSetRequestConfirm( &mibReq );
dudmuck 0:8f0d0ae0a077 795
dudmuck 0:8f0d0ae0a077 796 DeviceState = DEVICE_STATE_SEND;
dudmuck 0:8f0d0ae0a077 797 #endif
dudmuck 0:8f0d0ae0a077 798 break;
dudmuck 0:8f0d0ae0a077 799 }
dudmuck 0:8f0d0ae0a077 800 case DEVICE_STATE_SEND:
dudmuck 0:8f0d0ae0a077 801 {
dudmuck 0:8f0d0ae0a077 802 if( NextTx == true )
dudmuck 0:8f0d0ae0a077 803 {
dudmuck 0:8f0d0ae0a077 804 PrepareTxFrame( AppPort );
dudmuck 0:8f0d0ae0a077 805
dudmuck 0:8f0d0ae0a077 806 NextTx = SendFrame( );
dudmuck 0:8f0d0ae0a077 807 }
dudmuck 0:8f0d0ae0a077 808 // Schedule next packet transmission
dudmuck 0:8f0d0ae0a077 809 TxDutyCycleTime = APP_TX_DUTYCYCLE + randr( -APP_TX_DUTYCYCLE_RND, APP_TX_DUTYCYCLE_RND );
dudmuck 1:53c30224eda8 810 DeviceState = DEVICE_STATE_SLEEP /*DEVICE_STATE_CYCLE*/;
dudmuck 0:8f0d0ae0a077 811 break;
dudmuck 0:8f0d0ae0a077 812 }
dudmuck 0:8f0d0ae0a077 813 case DEVICE_STATE_CYCLE:
dudmuck 0:8f0d0ae0a077 814 {
dudmuck 0:8f0d0ae0a077 815 DeviceState = DEVICE_STATE_SLEEP;
dudmuck 0:8f0d0ae0a077 816
dudmuck 0:8f0d0ae0a077 817 // Schedule next packet transmission
dudmuck 0:8f0d0ae0a077 818 TxNextPacketTimer.attach_us(&OnTxNextPacketTimerEvent, TxDutyCycleTime * 1000);
dudmuck 0:8f0d0ae0a077 819 break;
dudmuck 0:8f0d0ae0a077 820 }
dudmuck 0:8f0d0ae0a077 821 case DEVICE_STATE_SLEEP:
dudmuck 0:8f0d0ae0a077 822 {
dudmuck 1:53c30224eda8 823 //isr_printf("sleep %u\r\n", queue.tick());
dudmuck 0:8f0d0ae0a077 824 // Wake up through events
dudmuck 0:8f0d0ae0a077 825 break;
dudmuck 0:8f0d0ae0a077 826 }
dudmuck 0:8f0d0ae0a077 827 default:
dudmuck 0:8f0d0ae0a077 828 {
dudmuck 0:8f0d0ae0a077 829 DeviceState = DEVICE_STATE_INIT;
dudmuck 0:8f0d0ae0a077 830 break;
dudmuck 0:8f0d0ae0a077 831 }
dudmuck 0:8f0d0ae0a077 832 }
dudmuck 1:53c30224eda8 833
dudmuck 1:53c30224eda8 834 bottom_half();
dudmuck 1:53c30224eda8 835
dudmuck 1:53c30224eda8 836 } // ..while( 1 )
dudmuck 0:8f0d0ae0a077 837 }