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/peer_to_peer_example.cpp@30:2f5ae37e6c47, 2018-04-30 (annotated)

Committer:
Evan Hosseini
Date:
Mon Apr 30 14:46:28 2018 -0500
Revision:
30:2f5ae37e6c47
Parent:
25:56f7775c702f
Child:
33:15ea8f985c54
Add ambient light sensor code back for xDot

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Mike Fiore 11:d2e31743433a 1 #include "dot_util.h"
Mike Fiore 14:19fae4509473 2 #include "RadioEvent.h"
Mike Fiore 11:d2e31743433a 3
Mike Fiore 11:d2e31743433a 4 #if ACTIVE_EXAMPLE == PEER_TO_PEER_EXAMPLE
Mike Fiore 11:d2e31743433a 5
mfiore 17:d4f82e16de5f 6 /////////////////////////////////////////////////////////////////////////////
mfiore 17:d4f82e16de5f 7 // -------------------- DOT LIBRARY REQUIRED ------------------------------//
mfiore 17:d4f82e16de5f 8 // * Because these example programs can be used for both mDot and xDot //
mfiore 17:d4f82e16de5f 9 // devices, the LoRa stack is not included. The libmDot library should //
mfiore 17:d4f82e16de5f 10 // be imported if building for mDot devices. The libxDot library //
mfiore 17:d4f82e16de5f 11 // should be imported if building for xDot devices. //
mfiore 17:d4f82e16de5f 12 // * https://developer.mbed.org/teams/MultiTech/code/libmDot-dev-mbed5/ //
mfiore 17:d4f82e16de5f 13 // * https://developer.mbed.org/teams/MultiTech/code/libmDot-mbed5/ //
mfiore 17:d4f82e16de5f 14 // * https://developer.mbed.org/teams/MultiTech/code/libxDot-dev-mbed5/ //
mfiore 17:d4f82e16de5f 15 // * https://developer.mbed.org/teams/MultiTech/code/libxDot-mbed5/ //
mfiore 17:d4f82e16de5f 16 /////////////////////////////////////////////////////////////////////////////
mfiore 17:d4f82e16de5f 17
Mike Fiore 11:d2e31743433a 18 /////////////////////////////////////////////////////////////
Mike Fiore 11:d2e31743433a 19 // * these options must match between the two devices in //
Mike Fiore 11:d2e31743433a 20 // order for communication to be successful
Mike Fiore 11:d2e31743433a 21 /////////////////////////////////////////////////////////////
Mike Fiore 11:d2e31743433a 22 static uint8_t network_address[] = { 0x01, 0x02, 0x03, 0x04 };
Mike Fiore 11:d2e31743433a 23 static uint8_t network_session_key[] = { 0x01, 0x02, 0x03, 0x04, 0x01, 0x02, 0x03, 0x04, 0x01, 0x02, 0x03, 0x04, 0x01, 0x02, 0x03, 0x04 };
Mike Fiore 11:d2e31743433a 24 static uint8_t data_session_key[] = { 0x01, 0x02, 0x03, 0x04, 0x01, 0x02, 0x03, 0x04, 0x01, 0x02, 0x03, 0x04, 0x01, 0x02, 0x03, 0x04 };
Mike Fiore 11:d2e31743433a 25
Mike Fiore 11:d2e31743433a 26 mDot* dot = NULL;
Mike Fiore 21:09d05faf0e13 27 lora::ChannelPlan* plan = NULL;
Mike Fiore 11:d2e31743433a 28
Mike Fiore 11:d2e31743433a 29 Serial pc(USBTX, USBRX);
Mike Fiore 11:d2e31743433a 30
Evan Hosseini 30:2f5ae37e6c47 31 #if defined(TARGET_XDOT_L151CC)
Evan Hosseini 30:2f5ae37e6c47 32 I2C i2c(I2C_SDA, I2C_SCL);
Evan Hosseini 30:2f5ae37e6c47 33 ISL29011 lux(i2c);
Evan Hosseini 30:2f5ae37e6c47 34 #else
Evan Hosseini 30:2f5ae37e6c47 35 AnalogIn lux(XBEE_AD0);
Evan Hosseini 30:2f5ae37e6c47 36 #endif
Evan Hosseini 30:2f5ae37e6c47 37
Mike Fiore 11:d2e31743433a 38 int main() {
Mike Fiore 14:19fae4509473 39 // Custom event handler for automatically displaying RX data
Mike Fiore 11:d2e31743433a 40 RadioEvent events;
Mike Fiore 11:d2e31743433a 41 uint32_t tx_frequency;
Mike Fiore 11:d2e31743433a 42 uint8_t tx_datarate;
Mike Fiore 11:d2e31743433a 43 uint8_t tx_power;
Mike Fiore 11:d2e31743433a 44 uint8_t frequency_band;
Mike Fiore 11:d2e31743433a 45
Mike Fiore 11:d2e31743433a 46 pc.baud(115200);
Mike Fiore 11:d2e31743433a 47
Evan Hosseini 30:2f5ae37e6c47 48 #if defined(TARGET_XDOT_L151CC)
Evan Hosseini 30:2f5ae37e6c47 49 i2c.frequency(400000);
Evan Hosseini 30:2f5ae37e6c47 50 #endif
Evan Hosseini 30:2f5ae37e6c47 51
Mike Fiore 11:d2e31743433a 52 mts::MTSLog::setLogLevel(mts::MTSLog::TRACE_LEVEL);
Mike Fiore 11:d2e31743433a 53
Mike Fiore 21:09d05faf0e13 54 #if CHANNEL_PLAN == CP_US915
Mike Fiore 21:09d05faf0e13 55 plan = new lora::ChannelPlan_US915();
Mike Fiore 21:09d05faf0e13 56 #elif CHANNEL_PLAN == CP_AU915
Mike Fiore 21:09d05faf0e13 57 plan = new lora::ChannelPlan_AU915();
Mike Fiore 21:09d05faf0e13 58 #elif CHANNEL_PLAN == CP_EU868
Mike Fiore 21:09d05faf0e13 59 plan = new lora::ChannelPlan_EU868();
Mike Fiore 21:09d05faf0e13 60 #elif CHANNEL_PLAN == CP_KR920
Mike Fiore 21:09d05faf0e13 61 plan = new lora::ChannelPlan_KR920();
Mike Fiore 21:09d05faf0e13 62 #elif CHANNEL_PLAN == CP_AS923
Mike Fiore 21:09d05faf0e13 63 plan = new lora::ChannelPlan_AS923();
Mike Fiore 21:09d05faf0e13 64 #elif CHANNEL_PLAN == CP_AS923_JAPAN
Mike Fiore 21:09d05faf0e13 65 plan = new lora::ChannelPlan_AS923_Japan();
mfiore 22:d9bc10bbc433 66 #elif CHANNEL_PLAN == CP_IN865
mfiore 22:d9bc10bbc433 67 plan = new lora::ChannelPlan_IN865();
Mike Fiore 21:09d05faf0e13 68 #endif
Mike Fiore 21:09d05faf0e13 69 assert(plan);
Mike Fiore 21:09d05faf0e13 70
Mike Fiore 21:09d05faf0e13 71 dot = mDot::getInstance(plan);
Mike Fiore 21:09d05faf0e13 72 assert(dot);
Mike Fiore 11:d2e31743433a 73
Mike Fiore 16:a3832552dfe1 74 logInfo("mbed-os library version: %d", MBED_LIBRARY_VERSION);
Mike Fiore 16:a3832552dfe1 75
Mike Fiore 12:ec9768677cea 76 // start from a well-known state
Mike Fiore 12:ec9768677cea 77 logInfo("defaulting Dot configuration");
Mike Fiore 12:ec9768677cea 78 dot->resetConfig();
Mike Fiore 12:ec9768677cea 79
Mike Fiore 11:d2e31743433a 80 // make sure library logging is turned on
Mike Fiore 11:d2e31743433a 81 dot->setLogLevel(mts::MTSLog::INFO_LEVEL);
Mike Fiore 11:d2e31743433a 82
Mike Fiore 11:d2e31743433a 83 // attach the custom events handler
Mike Fiore 11:d2e31743433a 84 dot->setEvents(&events);
Mike Fiore 11:d2e31743433a 85
Mike Fiore 11:d2e31743433a 86 // update configuration if necessary
Mike Fiore 11:d2e31743433a 87 if (dot->getJoinMode() != mDot::PEER_TO_PEER) {
Mike Fiore 11:d2e31743433a 88 logInfo("changing network join mode to PEER_TO_PEER");
Mike Fiore 11:d2e31743433a 89 if (dot->setJoinMode(mDot::PEER_TO_PEER) != mDot::MDOT_OK) {
Mike Fiore 11:d2e31743433a 90 logError("failed to set network join mode to PEER_TO_PEER");
Mike Fiore 11:d2e31743433a 91 }
Mike Fiore 11:d2e31743433a 92 }
Mike Fiore 11:d2e31743433a 93 frequency_band = dot->getFrequencyBand();
Mike Fiore 11:d2e31743433a 94 switch (frequency_band) {
Mike Fiore 21:09d05faf0e13 95 case lora::ChannelPlan::EU868_OLD:
Mike Fiore 21:09d05faf0e13 96 case lora::ChannelPlan::EU868:
Mike Fiore 11:d2e31743433a 97 // 250kHz channels achieve higher throughput
Mike Fiore 21:09d05faf0e13 98 // DR_6 : SF7 @ 250kHz
Mike Fiore 21:09d05faf0e13 99 // DR_0 - DR_5 (125kHz channels) available but much slower
Mike Fiore 11:d2e31743433a 100 tx_frequency = 869850000;
Mike Fiore 21:09d05faf0e13 101 tx_datarate = lora::DR_6;
Mike Fiore 11:d2e31743433a 102 // the 869850000 frequency is 100% duty cycle if the total power is under 7 dBm - tx power 4 + antenna gain 3 = 7
Mike Fiore 11:d2e31743433a 103 tx_power = 4;
Mike Fiore 11:d2e31743433a 104 break;
Mike Fiore 21:09d05faf0e13 105
Mike Fiore 21:09d05faf0e13 106 case lora::ChannelPlan::US915_OLD:
Mike Fiore 21:09d05faf0e13 107 case lora::ChannelPlan::US915:
Mike Fiore 21:09d05faf0e13 108 case lora::ChannelPlan::AU915_OLD:
Mike Fiore 21:09d05faf0e13 109 case lora::ChannelPlan::AU915:
Mike Fiore 11:d2e31743433a 110 // 500kHz channels achieve highest throughput
Mike Fiore 21:09d05faf0e13 111 // DR_8 : SF12 @ 500kHz
Mike Fiore 21:09d05faf0e13 112 // DR_9 : SF11 @ 500kHz
Mike Fiore 21:09d05faf0e13 113 // DR_10 : SF10 @ 500kHz
Mike Fiore 21:09d05faf0e13 114 // DR_11 : SF9 @ 500kHz
Mike Fiore 21:09d05faf0e13 115 // DR_12 : SF8 @ 500kHz
Mike Fiore 21:09d05faf0e13 116 // DR_13 : SF7 @ 500kHz
Mike Fiore 21:09d05faf0e13 117 // DR_0 - DR_3 (125kHz channels) available but much slower
Mike Fiore 11:d2e31743433a 118 tx_frequency = 915500000;
Mike Fiore 21:09d05faf0e13 119 tx_datarate = lora::DR_13;
Mike Fiore 11:d2e31743433a 120 // 915 bands have no duty cycle restrictions, set tx power to max
Mike Fiore 11:d2e31743433a 121 tx_power = 20;
Mike Fiore 11:d2e31743433a 122 break;
Mike Fiore 21:09d05faf0e13 123
Mike Fiore 21:09d05faf0e13 124 case lora::ChannelPlan::AS923:
Mike Fiore 21:09d05faf0e13 125 case lora::ChannelPlan::AS923_JAPAN:
Mike Fiore 21:09d05faf0e13 126 // 250kHz channels achieve higher throughput
Mike Fiore 21:09d05faf0e13 127 // DR_6 : SF7 @ 250kHz
Mike Fiore 21:09d05faf0e13 128 // DR_0 - DR_5 (125kHz channels) available but much slower
Mike Fiore 21:09d05faf0e13 129 tx_frequency = 924800000;
Mike Fiore 21:09d05faf0e13 130 tx_datarate = lora::DR_6;
Mike Fiore 21:09d05faf0e13 131 tx_power = 16;
Mike Fiore 21:09d05faf0e13 132 break;
Mike Fiore 21:09d05faf0e13 133
Mike Fiore 21:09d05faf0e13 134 case lora::ChannelPlan::KR920:
Mike Fiore 21:09d05faf0e13 135 // DR_5 : SF7 @ 125kHz
Mike Fiore 21:09d05faf0e13 136 tx_frequency = 922700000;
Mike Fiore 21:09d05faf0e13 137 tx_datarate = lora::DR_5;
Mike Fiore 21:09d05faf0e13 138 tx_power = 14;
Mike Fiore 21:09d05faf0e13 139 break;
Mike Fiore 21:09d05faf0e13 140
Mike Fiore 21:09d05faf0e13 141 default:
Mike Fiore 21:09d05faf0e13 142 while (true) {
Mike Fiore 21:09d05faf0e13 143 logFatal("no known channel plan in use - extra configuration is needed!");
Mike Fiore 21:09d05faf0e13 144 wait(5);
Mike Fiore 21:09d05faf0e13 145 }
Mike Fiore 21:09d05faf0e13 146 break;
Mike Fiore 11:d2e31743433a 147 }
Mike Fiore 11:d2e31743433a 148 // in PEER_TO_PEER mode there is no join request/response transaction
Mike Fiore 11:d2e31743433a 149 // as long as both Dots are configured correctly, they should be able to communicate
Mike Fiore 11:d2e31743433a 150 update_peer_to_peer_config(network_address, network_session_key, data_session_key, tx_frequency, tx_datarate, tx_power);
Mike Fiore 11:d2e31743433a 151
Mike Fiore 11:d2e31743433a 152 // save changes to configuration
Mike Fiore 11:d2e31743433a 153 logInfo("saving configuration");
Mike Fiore 11:d2e31743433a 154 if (!dot->saveConfig()) {
Mike Fiore 11:d2e31743433a 155 logError("failed to save configuration");
Mike Fiore 11:d2e31743433a 156 }
Mike Fiore 11:d2e31743433a 157
Mike Fiore 11:d2e31743433a 158 // display configuration
Mike Fiore 11:d2e31743433a 159 display_config();
Mike Fiore 11:d2e31743433a 160
Mike Fiore 11:d2e31743433a 161 while (true) {
Evan Hosseini 30:2f5ae37e6c47 162 uint16_t light;
Mike Fiore 11:d2e31743433a 163 std::vector<uint8_t> tx_data;
Mike Fiore 11:d2e31743433a 164
Mike Fiore 11:d2e31743433a 165 // join network if not joined
Mike Fiore 11:d2e31743433a 166 if (!dot->getNetworkJoinStatus()) {
Mike Fiore 11:d2e31743433a 167 join_network();
Mike Fiore 11:d2e31743433a 168 }
Mike Fiore 11:d2e31743433a 169
Evan Hosseini 30:2f5ae37e6c47 170 #if defined(TARGET_XDOT_L151CC)
Evan Hosseini 30:2f5ae37e6c47 171 // configure the ISL29011 sensor on the xDot-DK for continuous ambient light sampling, 16 bit conversion, and maximum range
Evan Hosseini 30:2f5ae37e6c47 172 lux.setMode(ISL29011::ALS_CONT);
Evan Hosseini 30:2f5ae37e6c47 173 lux.setResolution(ISL29011::ADC_16BIT);
Evan Hosseini 30:2f5ae37e6c47 174 lux.setRange(ISL29011::RNG_64000);
Evan Hosseini 30:2f5ae37e6c47 175
Evan Hosseini 30:2f5ae37e6c47 176 // get the latest light sample and send it to the gateway
Evan Hosseini 30:2f5ae37e6c47 177 light = lux.getData();
Evan Hosseini 30:2f5ae37e6c47 178 tx_data.push_back((light >> 8) & 0xFF);
Evan Hosseini 30:2f5ae37e6c47 179 tx_data.push_back(light & 0xFF);
Evan Hosseini 30:2f5ae37e6c47 180 logInfo("light: %lu [0x%04X]", light, light);
Mike Fiore 11:d2e31743433a 181 send_data(tx_data);
Mike Fiore 11:d2e31743433a 182
Evan Hosseini 30:2f5ae37e6c47 183 // put the LSL29011 ambient light sensor into a low power state
Evan Hosseini 30:2f5ae37e6c47 184 lux.setMode(ISL29011::PWR_DOWN);
Evan Hosseini 30:2f5ae37e6c47 185 #else
Evan Hosseini 30:2f5ae37e6c47 186 // get some dummy data and send it to the gateway
Evan Hosseini 30:2f5ae37e6c47 187 light = lux.read_u16();
Evan Hosseini 30:2f5ae37e6c47 188 tx_data.push_back((light >> 8) & 0xFF);
Evan Hosseini 30:2f5ae37e6c47 189 tx_data.push_back(light & 0xFF);
Evan Hosseini 30:2f5ae37e6c47 190 logInfo("light: %lu [0x%04X]", light, light);
Evan Hosseini 30:2f5ae37e6c47 191 send_data(tx_data);
Evan Hosseini 30:2f5ae37e6c47 192 #endif
Evan Hosseini 30:2f5ae37e6c47 193
Mike Fiore 11:d2e31743433a 194 // the Dot can't sleep in PEER_TO_PEER mode
Mike Fiore 11:d2e31743433a 195 // it must be waiting for data from the other Dot
Mike Fiore 11:d2e31743433a 196 // send data every 5 seconds
Mike Fiore 11:d2e31743433a 197 logInfo("waiting for 5s");
Mike Fiore 11:d2e31743433a 198 wait(5);
Mike Fiore 11:d2e31743433a 199 }
Mike Fiore 11:d2e31743433a 200
Mike Fiore 11:d2e31743433a 201 return 0;
Mike Fiore 11:d2e31743433a 202 }
Mike Fiore 11:d2e31743433a 203
Mike Fiore 11:d2e31743433a 204 #endif