Jose Rios / Mbed OS xdot-test

Basic xdot code to check how many memory is available for user APP after initializing libxdot lorawan stack

examples/src/class_c_example.cpp@12:ec9768677cea, 2016-10-11 (annotated)

Committer:
Mike Fiore
Date:
Tue Oct 11 13:17:42 2016 -0500
Revision:
12:ec9768677cea
Parent:
10:4d0b765f7b9e
Child:
14:19fae4509473
default configuration and session in each example when starting for the first time

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Mike Fiore 10:4d0b765f7b9e 1 #include "dot_util.h"
Mike Fiore 10:4d0b765f7b9e 2 #include "mDotEvent.h"
Mike Fiore 10:4d0b765f7b9e 3
Mike Fiore 10:4d0b765f7b9e 4 #if ACTIVE_EXAMPLE == CLASS_C_EXAMPLE
Mike Fiore 10:4d0b765f7b9e 5
Mike Fiore 10:4d0b765f7b9e 6 /////////////////////////////////////////////////////////////
Mike Fiore 10:4d0b765f7b9e 7 // * these options must match the settings on your gateway //
Mike Fiore 10:4d0b765f7b9e 8 // * edit their values to match your configuration //
Mike Fiore 10:4d0b765f7b9e 9 // * frequency sub band is only relevant for the 915 bands //
Mike Fiore 10:4d0b765f7b9e 10 // * either the network name and passphrase can be used or //
Mike Fiore 10:4d0b765f7b9e 11 // the network ID (8 bytes) and KEY (16 bytes) //
Mike Fiore 10:4d0b765f7b9e 12 /////////////////////////////////////////////////////////////
Mike Fiore 10:4d0b765f7b9e 13 static std::string network_name = "MultiTech";
Mike Fiore 10:4d0b765f7b9e 14 static std::string network_passphrase = "MultiTech";
Mike Fiore 10:4d0b765f7b9e 15 static uint8_t network_id[] = { 0x6C, 0x4E, 0xEF, 0x66, 0xF4, 0x79, 0x86, 0xA6 };
Mike Fiore 10:4d0b765f7b9e 16 static uint8_t network_key[] = { 0x1F, 0x33, 0xA1, 0x70, 0xA5, 0xF1, 0xFD, 0xA0, 0xAB, 0x69, 0x7A, 0xAE, 0x2B, 0x95, 0x91, 0x6B };
Mike Fiore 10:4d0b765f7b9e 17 static uint8_t frequency_sub_band = 0;
Mike Fiore 10:4d0b765f7b9e 18 static bool public_network = false;
Mike Fiore 10:4d0b765f7b9e 19 static uint8_t ack = 1;
Mike Fiore 10:4d0b765f7b9e 20
Mike Fiore 10:4d0b765f7b9e 21 mDot* dot = NULL;
Mike Fiore 10:4d0b765f7b9e 22
Mike Fiore 10:4d0b765f7b9e 23 Serial pc(USBTX, USBRX);
Mike Fiore 10:4d0b765f7b9e 24
Mike Fiore 10:4d0b765f7b9e 25 #if defined(TARGET_XDOT_L151CC)
Mike Fiore 10:4d0b765f7b9e 26 I2C i2c(I2C_SDA, I2C_SCL);
Mike Fiore 10:4d0b765f7b9e 27 ISL29011 lux(i2c);
Mike Fiore 10:4d0b765f7b9e 28 #else
Mike Fiore 10:4d0b765f7b9e 29 AnalogIn lux(XBEE_AD0);
Mike Fiore 10:4d0b765f7b9e 30 #endif
Mike Fiore 10:4d0b765f7b9e 31
Mike Fiore 10:4d0b765f7b9e 32 // Custom event handler for receiving Class C packets
Mike Fiore 10:4d0b765f7b9e 33 class RadioEvent : public mDotEvent
Mike Fiore 10:4d0b765f7b9e 34 {
Mike Fiore 10:4d0b765f7b9e 35
Mike Fiore 10:4d0b765f7b9e 36 public:
Mike Fiore 10:4d0b765f7b9e 37 RadioEvent() {}
Mike Fiore 10:4d0b765f7b9e 38
Mike Fiore 10:4d0b765f7b9e 39 virtual ~RadioEvent() {}
Mike Fiore 10:4d0b765f7b9e 40
Mike Fiore 10:4d0b765f7b9e 41 /*!
Mike Fiore 10:4d0b765f7b9e 42 * MAC layer event callback prototype.
Mike Fiore 10:4d0b765f7b9e 43 *
Mike Fiore 10:4d0b765f7b9e 44 * \param [IN] flags Bit field indicating the MAC events occurred
Mike Fiore 10:4d0b765f7b9e 45 * \param [IN] info Details about MAC events occurred
Mike Fiore 10:4d0b765f7b9e 46 */
Mike Fiore 10:4d0b765f7b9e 47 virtual void MacEvent(LoRaMacEventFlags* flags, LoRaMacEventInfo* info) {
Mike Fiore 10:4d0b765f7b9e 48
Mike Fiore 10:4d0b765f7b9e 49 if (mts::MTSLog::getLogLevel() == mts::MTSLog::TRACE_LEVEL) {
Mike Fiore 10:4d0b765f7b9e 50 std::string msg = "OK";
Mike Fiore 10:4d0b765f7b9e 51 switch (info->Status) {
Mike Fiore 10:4d0b765f7b9e 52 case LORAMAC_EVENT_INFO_STATUS_ERROR:
Mike Fiore 10:4d0b765f7b9e 53 msg = "ERROR";
Mike Fiore 10:4d0b765f7b9e 54 break;
Mike Fiore 10:4d0b765f7b9e 55 case LORAMAC_EVENT_INFO_STATUS_TX_TIMEOUT:
Mike Fiore 10:4d0b765f7b9e 56 msg = "TX_TIMEOUT";
Mike Fiore 10:4d0b765f7b9e 57 break;
Mike Fiore 10:4d0b765f7b9e 58 case LORAMAC_EVENT_INFO_STATUS_RX_TIMEOUT:
Mike Fiore 10:4d0b765f7b9e 59 msg = "RX_TIMEOUT";
Mike Fiore 10:4d0b765f7b9e 60 break;
Mike Fiore 10:4d0b765f7b9e 61 case LORAMAC_EVENT_INFO_STATUS_RX_ERROR:
Mike Fiore 10:4d0b765f7b9e 62 msg = "RX_ERROR";
Mike Fiore 10:4d0b765f7b9e 63 break;
Mike Fiore 10:4d0b765f7b9e 64 case LORAMAC_EVENT_INFO_STATUS_JOIN_FAIL:
Mike Fiore 10:4d0b765f7b9e 65 msg = "JOIN_FAIL";
Mike Fiore 10:4d0b765f7b9e 66 break;
Mike Fiore 10:4d0b765f7b9e 67 case LORAMAC_EVENT_INFO_STATUS_DOWNLINK_FAIL:
Mike Fiore 10:4d0b765f7b9e 68 msg = "DOWNLINK_FAIL";
Mike Fiore 10:4d0b765f7b9e 69 break;
Mike Fiore 10:4d0b765f7b9e 70 case LORAMAC_EVENT_INFO_STATUS_ADDRESS_FAIL:
Mike Fiore 10:4d0b765f7b9e 71 msg = "ADDRESS_FAIL";
Mike Fiore 10:4d0b765f7b9e 72 break;
Mike Fiore 10:4d0b765f7b9e 73 case LORAMAC_EVENT_INFO_STATUS_MIC_FAIL:
Mike Fiore 10:4d0b765f7b9e 74 msg = "MIC_FAIL";
Mike Fiore 10:4d0b765f7b9e 75 break;
Mike Fiore 10:4d0b765f7b9e 76 default:
Mike Fiore 10:4d0b765f7b9e 77 break;
Mike Fiore 10:4d0b765f7b9e 78 }
Mike Fiore 10:4d0b765f7b9e 79 logTrace("Event: %s", msg.c_str());
Mike Fiore 10:4d0b765f7b9e 80
Mike Fiore 10:4d0b765f7b9e 81 logTrace("Flags Tx: %d Rx: %d RxData: %d RxSlot: %d LinkCheck: %d JoinAccept: %d",
Mike Fiore 10:4d0b765f7b9e 82 flags->Bits.Tx, flags->Bits.Rx, flags->Bits.RxData, flags->Bits.RxSlot, flags->Bits.LinkCheck, flags->Bits.JoinAccept);
Mike Fiore 10:4d0b765f7b9e 83 logTrace("Info: Status: %d ACK: %d Retries: %d TxDR: %d RxPort: %d RxSize: %d RSSI: %d SNR: %d Energy: %d Margin: %d Gateways: %d",
Mike Fiore 10:4d0b765f7b9e 84 info->Status, info->TxAckReceived, info->TxNbRetries, info->TxDatarate, info->RxPort, info->RxBufferSize,
Mike Fiore 10:4d0b765f7b9e 85 info->RxRssi, info->RxSnr, info->Energy, info->DemodMargin, info->NbGateways);
Mike Fiore 10:4d0b765f7b9e 86 }
Mike Fiore 10:4d0b765f7b9e 87
Mike Fiore 10:4d0b765f7b9e 88 if (flags->Bits.Rx) {
Mike Fiore 10:4d0b765f7b9e 89
Mike Fiore 10:4d0b765f7b9e 90 logDebug("Rx %d bytes", info->RxBufferSize);
Mike Fiore 10:4d0b765f7b9e 91 if (info->RxBufferSize > 0) {
Mike Fiore 10:4d0b765f7b9e 92 // print RX data as hexadecimal
Mike Fiore 10:4d0b765f7b9e 93 //printf("Rx data: %s\r\n", mts::Text::bin2hexString(info->RxBuffer, info->RxBufferSize).c_str());
Mike Fiore 10:4d0b765f7b9e 94
Mike Fiore 10:4d0b765f7b9e 95 // print RX data as string
Mike Fiore 10:4d0b765f7b9e 96 pc.printf("Rx data: ");
Mike Fiore 10:4d0b765f7b9e 97 for (int i = 0; i < info->RxBufferSize; i++) {
Mike Fiore 10:4d0b765f7b9e 98 pc.putc(info->RxBuffer[i]);
Mike Fiore 10:4d0b765f7b9e 99 }
Mike Fiore 10:4d0b765f7b9e 100 pc.printf("\r\n");
Mike Fiore 10:4d0b765f7b9e 101 }
Mike Fiore 10:4d0b765f7b9e 102 }
Mike Fiore 10:4d0b765f7b9e 103 }
Mike Fiore 10:4d0b765f7b9e 104 };
Mike Fiore 10:4d0b765f7b9e 105
Mike Fiore 10:4d0b765f7b9e 106 int main() {
Mike Fiore 10:4d0b765f7b9e 107 RadioEvent events;
Mike Fiore 10:4d0b765f7b9e 108
Mike Fiore 10:4d0b765f7b9e 109 pc.baud(115200);
Mike Fiore 10:4d0b765f7b9e 110
Mike Fiore 10:4d0b765f7b9e 111 mts::MTSLog::setLogLevel(mts::MTSLog::TRACE_LEVEL);
Mike Fiore 10:4d0b765f7b9e 112
Mike Fiore 10:4d0b765f7b9e 113 dot = mDot::getInstance();
Mike Fiore 10:4d0b765f7b9e 114
Mike Fiore 12:ec9768677cea 115 // start from a well-known state
Mike Fiore 12:ec9768677cea 116 logInfo("defaulting Dot configuration");
Mike Fiore 12:ec9768677cea 117 dot->resetConfig();
Mike Fiore 12:ec9768677cea 118 dot->resetNetworkSession();
Mike Fiore 12:ec9768677cea 119
Mike Fiore 12:ec9768677cea 120 // make sure library logging is turned on
Mike Fiore 10:4d0b765f7b9e 121 dot->setLogLevel(mts::MTSLog::INFO_LEVEL);
Mike Fiore 10:4d0b765f7b9e 122
Mike Fiore 10:4d0b765f7b9e 123 // attach the custom events handler
Mike Fiore 10:4d0b765f7b9e 124 dot->setEvents(&events);
Mike Fiore 10:4d0b765f7b9e 125
Mike Fiore 10:4d0b765f7b9e 126 // update configuration if necessary
Mike Fiore 10:4d0b765f7b9e 127 if (dot->getJoinMode() != mDot::OTA) {
Mike Fiore 10:4d0b765f7b9e 128 logInfo("changing network join mode to OTA");
Mike Fiore 10:4d0b765f7b9e 129 if (dot->setJoinMode(mDot::OTA) != mDot::MDOT_OK) {
Mike Fiore 10:4d0b765f7b9e 130 logError("failed to set network join mode to OTA");
Mike Fiore 10:4d0b765f7b9e 131 }
Mike Fiore 10:4d0b765f7b9e 132 }
Mike Fiore 12:ec9768677cea 133 // in OTA and AUTO_OTA join modes, the credentials can be passed to the library as a name and passphrase or an ID and KEY
Mike Fiore 10:4d0b765f7b9e 134 // only one method or the other should be used!
Mike Fiore 10:4d0b765f7b9e 135 // network ID = crc64(network name)
Mike Fiore 10:4d0b765f7b9e 136 // network KEY = cmac(network passphrase)
Mike Fiore 10:4d0b765f7b9e 137 update_ota_config_name_phrase(network_name, network_passphrase, frequency_sub_band, public_network, ack);
Mike Fiore 10:4d0b765f7b9e 138 //update_ota_config_id_key(network_id, network_key, frequency_sub_band, public_network, ack);
Mike Fiore 10:4d0b765f7b9e 139
Mike Fiore 10:4d0b765f7b9e 140 // configure the Dot for class C operation
Mike Fiore 10:4d0b765f7b9e 141 // the Dot must also be configured on the gateway for class C
Mike Fiore 10:4d0b765f7b9e 142 // use the lora-query application to do this on a Conduit: http://www.multitech.net/developer/software/lora/lora-network-server/
Mike Fiore 10:4d0b765f7b9e 143 // to provision your Dot for class C operation with a 3rd party gateway, see the gateway or network provider documentation
Mike Fiore 10:4d0b765f7b9e 144 logInfo("changing network mode to class C");
Mike Fiore 10:4d0b765f7b9e 145 if (dot->setClass("C") != mDot::MDOT_OK) {
Mike Fiore 10:4d0b765f7b9e 146 logError("failed to set network mode to class C");
Mike Fiore 10:4d0b765f7b9e 147 }
Mike Fiore 10:4d0b765f7b9e 148
Mike Fiore 10:4d0b765f7b9e 149 // save changes to configuration
Mike Fiore 10:4d0b765f7b9e 150 logInfo("saving configuration");
Mike Fiore 10:4d0b765f7b9e 151 if (!dot->saveConfig()) {
Mike Fiore 10:4d0b765f7b9e 152 logError("failed to save configuration");
Mike Fiore 10:4d0b765f7b9e 153 }
Mike Fiore 10:4d0b765f7b9e 154
Mike Fiore 10:4d0b765f7b9e 155 // display configuration
Mike Fiore 10:4d0b765f7b9e 156 display_config();
Mike Fiore 10:4d0b765f7b9e 157
Mike Fiore 12:ec9768677cea 158 #if defined(TARGET_XDOT_L151CC)
Mike Fiore 10:4d0b765f7b9e 159 // configure the ISL29011 sensor on the xDot-DK for continuous ambient light sampling, 16 bit conversion, and maximum range
Mike Fiore 10:4d0b765f7b9e 160 lux.setMode(ISL29011::ALS_CONT);
Mike Fiore 10:4d0b765f7b9e 161 lux.setResolution(ISL29011::ADC_16BIT);
Mike Fiore 10:4d0b765f7b9e 162 lux.setRange(ISL29011::RNG_64000);
Mike Fiore 12:ec9768677cea 163 #endif
Mike Fiore 10:4d0b765f7b9e 164
Mike Fiore 10:4d0b765f7b9e 165 while (true) {
Mike Fiore 10:4d0b765f7b9e 166 uint16_t light;
Mike Fiore 10:4d0b765f7b9e 167 std::vector<uint8_t> tx_data;
Mike Fiore 10:4d0b765f7b9e 168
Mike Fiore 10:4d0b765f7b9e 169 // join network if not joined
Mike Fiore 10:4d0b765f7b9e 170 if (!dot->getNetworkJoinStatus()) {
Mike Fiore 10:4d0b765f7b9e 171 join_network();
Mike Fiore 10:4d0b765f7b9e 172 }
Mike Fiore 10:4d0b765f7b9e 173
Mike Fiore 10:4d0b765f7b9e 174 #if defined(TARGET_XDOT_L151CC)
Mike Fiore 10:4d0b765f7b9e 175 // get the latest light sample and send it to the gateway
Mike Fiore 10:4d0b765f7b9e 176 light = lux.getData();
Mike Fiore 10:4d0b765f7b9e 177 tx_data.push_back((light >> 8) & 0xFF);
Mike Fiore 10:4d0b765f7b9e 178 tx_data.push_back(light & 0xFF);
Mike Fiore 10:4d0b765f7b9e 179 logInfo("light: %lu [0x%04X]", light, light);
Mike Fiore 10:4d0b765f7b9e 180 send_data(tx_data);
Mike Fiore 10:4d0b765f7b9e 181 #else
Mike Fiore 10:4d0b765f7b9e 182 // get some dummy data and send it to the gateway
Mike Fiore 10:4d0b765f7b9e 183 light = lux.read_u16();
Mike Fiore 10:4d0b765f7b9e 184 tx_data.push_back((light >> 8) & 0xFF);
Mike Fiore 10:4d0b765f7b9e 185 tx_data.push_back(light & 0xFF);
Mike Fiore 10:4d0b765f7b9e 186 logInfo("light: %lu [0x%04X]", light, light);
Mike Fiore 10:4d0b765f7b9e 187 send_data(tx_data);
Mike Fiore 10:4d0b765f7b9e 188 #endif
Mike Fiore 10:4d0b765f7b9e 189
Mike Fiore 10:4d0b765f7b9e 190 // the Dot can't sleep in class C mode
Mike Fiore 10:4d0b765f7b9e 191 // it must be waiting for data from the gateway
Mike Fiore 10:4d0b765f7b9e 192 // send data every 30s
Mike Fiore 10:4d0b765f7b9e 193 logInfo("waiting for 30s");
Mike Fiore 10:4d0b765f7b9e 194 wait(30);
Mike Fiore 10:4d0b765f7b9e 195 }
Mike Fiore 10:4d0b765f7b9e 196
Mike Fiore 10:4d0b765f7b9e 197 return 0;
Mike Fiore 10:4d0b765f7b9e 198 }
Mike Fiore 10:4d0b765f7b9e 199
Mike Fiore 10:4d0b765f7b9e 200 #endif
Mike Fiore 10:4d0b765f7b9e 201