Santiago García Eleisequi / Mbed OS EXPO_ANDA

Version del programa usado para la Expo IOT 2018 - Strada Hotel

Dependencies:   DHT HX711 libmDot-mbed5 ISL29011

Fork of Dot-Examples by Rajnish Narayan

examples/src/peer_to_peer_example.cpp@16:a3832552dfe1, 2016-10-19 (annotated)

Committer:
Mike Fiore
Date:
Wed Oct 19 11:53:17 2016 -0500
Revision:
16:a3832552dfe1
Parent:
14:19fae4509473
Child:
17:d4f82e16de5f
print mbed-os library version in examples

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
Mike Fiore 11:d2e31743433a 6 /////////////////////////////////////////////////////////////
Mike Fiore 11:d2e31743433a 7 // * these options must match between the two devices in //
Mike Fiore 11:d2e31743433a 8 // order for communication to be successful
Mike Fiore 11:d2e31743433a 9 /////////////////////////////////////////////////////////////
Mike Fiore 11:d2e31743433a 10 static uint8_t network_address[] = { 0x01, 0x02, 0x03, 0x04 };
Mike Fiore 11:d2e31743433a 11 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 12 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 13
Mike Fiore 11:d2e31743433a 14 mDot* dot = NULL;
Mike Fiore 11:d2e31743433a 15
Mike Fiore 11:d2e31743433a 16 Serial pc(USBTX, USBRX);
Mike Fiore 11:d2e31743433a 17
Mike Fiore 11:d2e31743433a 18 #if defined(TARGET_XDOT_L151CC)
Mike Fiore 11:d2e31743433a 19 I2C i2c(I2C_SDA, I2C_SCL);
Mike Fiore 11:d2e31743433a 20 ISL29011 lux(i2c);
Mike Fiore 11:d2e31743433a 21 #else
Mike Fiore 11:d2e31743433a 22 AnalogIn lux(XBEE_AD0);
Mike Fiore 11:d2e31743433a 23 #endif
Mike Fiore 11:d2e31743433a 24
Mike Fiore 11:d2e31743433a 25 int main() {
Mike Fiore 14:19fae4509473 26 // Custom event handler for automatically displaying RX data
Mike Fiore 11:d2e31743433a 27 RadioEvent events;
Mike Fiore 11:d2e31743433a 28 uint32_t tx_frequency;
Mike Fiore 11:d2e31743433a 29 uint8_t tx_datarate;
Mike Fiore 11:d2e31743433a 30 uint8_t tx_power;
Mike Fiore 11:d2e31743433a 31 uint8_t frequency_band;
Mike Fiore 11:d2e31743433a 32
Mike Fiore 11:d2e31743433a 33 pc.baud(115200);
Mike Fiore 11:d2e31743433a 34
Mike Fiore 11:d2e31743433a 35 mts::MTSLog::setLogLevel(mts::MTSLog::TRACE_LEVEL);
Mike Fiore 11:d2e31743433a 36
Mike Fiore 11:d2e31743433a 37 dot = mDot::getInstance();
Mike Fiore 11:d2e31743433a 38
Mike Fiore 16:a3832552dfe1 39 logInfo("mbed-os library version: %d", MBED_LIBRARY_VERSION);
Mike Fiore 16:a3832552dfe1 40
Mike Fiore 12:ec9768677cea 41 // start from a well-known state
Mike Fiore 12:ec9768677cea 42 logInfo("defaulting Dot configuration");
Mike Fiore 12:ec9768677cea 43 dot->resetConfig();
Mike Fiore 12:ec9768677cea 44
Mike Fiore 11:d2e31743433a 45 // make sure library logging is turned on
Mike Fiore 11:d2e31743433a 46 dot->setLogLevel(mts::MTSLog::INFO_LEVEL);
Mike Fiore 11:d2e31743433a 47
Mike Fiore 11:d2e31743433a 48 // attach the custom events handler
Mike Fiore 11:d2e31743433a 49 dot->setEvents(&events);
Mike Fiore 11:d2e31743433a 50
Mike Fiore 11:d2e31743433a 51 // update configuration if necessary
Mike Fiore 11:d2e31743433a 52 if (dot->getJoinMode() != mDot::PEER_TO_PEER) {
Mike Fiore 11:d2e31743433a 53 logInfo("changing network join mode to PEER_TO_PEER");
Mike Fiore 11:d2e31743433a 54 if (dot->setJoinMode(mDot::PEER_TO_PEER) != mDot::MDOT_OK) {
Mike Fiore 11:d2e31743433a 55 logError("failed to set network join mode to PEER_TO_PEER");
Mike Fiore 11:d2e31743433a 56 }
Mike Fiore 11:d2e31743433a 57 }
Mike Fiore 11:d2e31743433a 58 frequency_band = dot->getFrequencyBand();
Mike Fiore 11:d2e31743433a 59 switch (frequency_band) {
Mike Fiore 11:d2e31743433a 60 case mDot::FB_EU868:
Mike Fiore 11:d2e31743433a 61 // 250kHz channels achieve higher throughput
Mike Fiore 11:d2e31743433a 62 // DR6 : SF7 @ 250kHz
Mike Fiore 11:d2e31743433a 63 // DR0 - DR5 (125kHz channels) available but much slower
Mike Fiore 11:d2e31743433a 64 tx_frequency = 869850000;
Mike Fiore 11:d2e31743433a 65 tx_datarate = mDot::DR6;
Mike Fiore 11:d2e31743433a 66 // 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 67 tx_power = 4;
Mike Fiore 11:d2e31743433a 68 break;
Mike Fiore 11:d2e31743433a 69 case mDot::FB_US915:
Mike Fiore 11:d2e31743433a 70 case mDot::FB_AU915:
Mike Fiore 11:d2e31743433a 71 default:
Mike Fiore 11:d2e31743433a 72 // 500kHz channels achieve highest throughput
Mike Fiore 11:d2e31743433a 73 // DR8 : SF12 @ 500kHz
Mike Fiore 11:d2e31743433a 74 // DR9 : SF11 @ 500kHz
Mike Fiore 11:d2e31743433a 75 // DR10 : SF10 @ 500kHz
Mike Fiore 11:d2e31743433a 76 // DR11 : SF9 @ 500kHz
Mike Fiore 11:d2e31743433a 77 // DR12 : SF8 @ 500kHz
Mike Fiore 11:d2e31743433a 78 // DR13 : SF7 @ 500kHz
Mike Fiore 11:d2e31743433a 79 // DR0 - DR3 (125kHz channels) available but much slower
Mike Fiore 11:d2e31743433a 80 tx_frequency = 915500000;
Mike Fiore 11:d2e31743433a 81 tx_datarate = mDot::DR13;
Mike Fiore 11:d2e31743433a 82 // 915 bands have no duty cycle restrictions, set tx power to max
Mike Fiore 11:d2e31743433a 83 tx_power = 20;
Mike Fiore 11:d2e31743433a 84 break;
Mike Fiore 11:d2e31743433a 85 }
Mike Fiore 11:d2e31743433a 86 // in PEER_TO_PEER mode there is no join request/response transaction
Mike Fiore 11:d2e31743433a 87 // as long as both Dots are configured correctly, they should be able to communicate
Mike Fiore 11:d2e31743433a 88 update_peer_to_peer_config(network_address, network_session_key, data_session_key, tx_frequency, tx_datarate, tx_power);
Mike Fiore 11:d2e31743433a 89
Mike Fiore 11:d2e31743433a 90 // save changes to configuration
Mike Fiore 11:d2e31743433a 91 logInfo("saving configuration");
Mike Fiore 11:d2e31743433a 92 if (!dot->saveConfig()) {
Mike Fiore 11:d2e31743433a 93 logError("failed to save configuration");
Mike Fiore 11:d2e31743433a 94 }
Mike Fiore 11:d2e31743433a 95
Mike Fiore 11:d2e31743433a 96 // display configuration
Mike Fiore 11:d2e31743433a 97 display_config();
Mike Fiore 11:d2e31743433a 98
Mike Fiore 11:d2e31743433a 99 #if defined(TARGET_XDOT_L151CC)
Mike Fiore 11:d2e31743433a 100 // configure the ISL29011 sensor on the xDot-DK for continuous ambient light sampling, 16 bit conversion, and maximum range
Mike Fiore 11:d2e31743433a 101 lux.setMode(ISL29011::ALS_CONT);
Mike Fiore 11:d2e31743433a 102 lux.setResolution(ISL29011::ADC_16BIT);
Mike Fiore 11:d2e31743433a 103 lux.setRange(ISL29011::RNG_64000);
Mike Fiore 11:d2e31743433a 104 #endif
Mike Fiore 11:d2e31743433a 105
Mike Fiore 11:d2e31743433a 106 while (true) {
Mike Fiore 11:d2e31743433a 107 uint16_t light;
Mike Fiore 11:d2e31743433a 108 std::vector<uint8_t> tx_data;
Mike Fiore 11:d2e31743433a 109
Mike Fiore 11:d2e31743433a 110 // join network if not joined
Mike Fiore 11:d2e31743433a 111 if (!dot->getNetworkJoinStatus()) {
Mike Fiore 11:d2e31743433a 112 join_network();
Mike Fiore 11:d2e31743433a 113 }
Mike Fiore 11:d2e31743433a 114
Mike Fiore 11:d2e31743433a 115 #if defined(TARGET_XDOT_L151CC)
Mike Fiore 11:d2e31743433a 116 // get the latest light sample and send it to the gateway
Mike Fiore 11:d2e31743433a 117 light = lux.getData();
Mike Fiore 11:d2e31743433a 118 tx_data.push_back((light >> 8) & 0xFF);
Mike Fiore 11:d2e31743433a 119 tx_data.push_back(light & 0xFF);
Mike Fiore 11:d2e31743433a 120 logInfo("light: %lu [0x%04X]", light, light);
Mike Fiore 11:d2e31743433a 121 send_data(tx_data);
Mike Fiore 11:d2e31743433a 122 #else
Mike Fiore 11:d2e31743433a 123 // get some dummy data and send it to the gateway
Mike Fiore 11:d2e31743433a 124 light = lux.read_u16();
Mike Fiore 11:d2e31743433a 125 tx_data.push_back((light >> 8) & 0xFF);
Mike Fiore 11:d2e31743433a 126 tx_data.push_back(light & 0xFF);
Mike Fiore 11:d2e31743433a 127 logInfo("light: %lu [0x%04X]", light, light);
Mike Fiore 11:d2e31743433a 128 send_data(tx_data);
Mike Fiore 11:d2e31743433a 129 #endif
Mike Fiore 11:d2e31743433a 130
Mike Fiore 11:d2e31743433a 131 // the Dot can't sleep in PEER_TO_PEER mode
Mike Fiore 11:d2e31743433a 132 // it must be waiting for data from the other Dot
Mike Fiore 11:d2e31743433a 133 // send data every 5 seconds
Mike Fiore 11:d2e31743433a 134 logInfo("waiting for 5s");
Mike Fiore 11:d2e31743433a 135 wait(5);
Mike Fiore 11:d2e31743433a 136 }
Mike Fiore 11:d2e31743433a 137
Mike Fiore 11:d2e31743433a 138 return 0;
Mike Fiore 11:d2e31743433a 139 }
Mike Fiore 11:d2e31743433a 140
Mike Fiore 11:d2e31743433a 141 #endif
Mike Fiore 11:d2e31743433a 142