Synchronous wireless star LoRa network, central device.

Dependencies:   SX127x sx12xx_hal

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.


Alternate to this project gateway running on raspberry pi can be used as gateway.

LoRaWAN on single radio channel

Synchronous Star Network

This project acts as central node for LoRaWAN-like network operating on single radio channel. Intended for use where network infrastructure would never exist due to cost and/or complexity of standard network. This project uses the class-B method of beacon generation to synchronize the end nodes with the gateway. OTA mode must be used. End-node will be allocated an uplink time slot upon joining. End node may transmit uplink at this assigned timeslot, if it desires to do so. This time slot is always referenced to the beacon sent by gateway.

LoRaWAN server is not necessary. All network control is implemented by this project. User can observe network activity on the mbed serial port. Downlinks can be scheduled using command on serial port.

This implementation must not be used on radio channels requiring duty-cycle transmit limiting.

alterations from LoRaWAN specification

This mode of operation uses a single datarate on single radio channel. ADR is not implemented, because datarate cannot be changed. OTA mode must be used. When join-accept is sent by gateway, it will have appended (instead of CFlist) the beacon timing answer to inform of when next beacon occurs, and two timing values: the time slot allocated to this end-node and the periodicity of the network. Periodicity means how often the end-node may again transmit. /media/uploads/dudmuck/class-b-single.png Beacon is sent for purpose of providing timing reference to end-nodes. The beacon payload may contain a broadcast command to end nodes. Time value is not sent in beacon payload. The time at which beacon is sent provides timing reference: every 128 seconds as standard.

Rx2 receive window is not implemented. Only Rx1 is used because a single radio channel is used. Rx1 delay is reduced to 100 milliseconds. Original LoRaWAN has 1000 millisecond Rx1 delay to accommodate internet latency.

LoRaWAN standard class-B beacon requires GPS timing reference. This implementation does not use GPS, instead a hardware timer peripheral generates interrupts to send beacons. Absolute accuracy is not required, only relative crystal drift between gateway and end-nodes is considered.

Timing values are always specified as 30ms per step as in LoRaWAN standard. Each beacon period has 4096 30ms steps per beacon period.

join OTA procedure

The join procedure has changed the join-accept delay to 100 milliseconds (standard is 5 seconds). This allows end-node to hunt for gateway on several channels during joining. When gateway starts, it will scan available channels for the optimal choice based on ambient noise on the channels. End node will retry join request until it finds the gateway. Gateway might change channel during operation if it deems current channel too busy.

configuration of network

End nodes must be provisioned by editing file Comissioning.h. The array motes lists every end node permitted on network. It contains appEui, devEUI and appKey just as specified in standard LoRaWAN. All provisioning is hard-coded; changing provisioning requires reprogramming gateway. When changing number of motes, N_MOTES definition must be changed in lorawan.h.

lorawan.h

#define N_MOTES     8
extern ota_mote_t motes[N_MOTES];   /* from Comissioning.h */

configuring number of end-nodes vs transmit rate

Trade-off can be selected between number of end-nodes on network vs. how often each end-node can transmit.
In this example, where DR_13 is SF7 at 500KHz:

lorawan.cpp

    #elif (LORAMAC_DEFAULT_DATARATE == DR_13)
        #define TX_SLOT_STEPPING        8  //approx 0.25 seconds
        #define PERIODICITY_SLOTS       (TX_SLOT_STEPPING * 6)
    #endif

Here, each end-node is given time of 240ms = 8 * 30ms; accommodating maximum payload length for both uplink and downlink.
6 in this code is the maximum count of end nodes using this gateway. Each end-node can transmit every 1.44 seconds, in this example.
If you wanted to change 6 to 20 end-nodes, each would be able to use network every 4.8 seconds.
Another example: If you wanted to use DR_12 = SF8, you would have approx 2.5 to 3dB more gain compared to SF7, but each end-node must be given double time, resulting in 20 nodes able to use network every 9.6 seconds at DR_12.

network capacity limitation

The number of end-nodes which can be supported is determined by number of SLOT_STEPPING's which can occur during BEACON_PERIOD. Beacon guard is implemented same as standard LoRaWAN, which is 3 seconds prior to beacon start and 2.12 seconds after beacon start, which gives 122.88 seconds for network traffic for each beacon period.

gateway configuration

spreading factor is declared at #define LORAMAC_DEFAULT_DATARATE in lorawan.h, valid rates are DR_8 to DR_13 (sf12 to sf7). In the end-node, the same definition must be configured in LoRaMac-definitions.h. This network operates at this constant datarate for all packets.
Band plan can be selected by defining USE_BAND_* in lorawan.h. 434MHz can be used on SX1276 shield. TypeABZ module and sx1272 only support 800/900MHz channels band.

end-node provisioning

Security permits only matching DevEUI / AppEui to join the network, due to unique AES root key for each end device; in this case the DevEUI must be programmed in advance into gateway. However, if the same AES root key could be used for each end device , then any number of end devices could be added at a later time, without checking DevEUI on the gateway when an end device joins the network. On the gateway, the end device join acceptance is performed in file lorawan.cpp LoRaWan::parse_receive() where MType == MTYPE_JOIN_REQ. A memcmp() is performed on both DevEUI and AppEUI.

If you wish to allow any DevEUI to join, define ANY_DEVEUI at top of lorawan.cpp . In this configuration, all end devices must use same AppEUI and AES key. N_MOTES must be defined to the maximum number of end devices expected. Test end device by commenting BoardGetUniqueId() in end node, and replace DevEui[] with 8 arbitrary bytes to verify gateway permits any DevEUI to join.

RAM usage

For gateway CPU, recommend to consider larger RAM size depending on number of end devices required. ota_motes_t has size of 123 bytes. Each end device has one of these, however if less RAM usage is required for more end-devices, the MAC command queue size may be reduced.

hardware support

The radio driver supports both SX1272 and SX1276, sx126x kit, sx126x radio-only shield, and sx128x 2.4GHz.. The selection of radio chip type is made by your choice of importing radio driver library.



Beacon generation requires low power ticker to be clocked from crystal, not internal RC oscillator.

Gateway Serial Interface

Gateway serial port operates at 115200bps.

commandargumentdescription
list-list joined end nodes
?-list available commands
dl<mote-hex-dev-addr> <hex-payload>send downlink, sent after uplink received
gpo<mote-hex-dev-addr> <0 or 1>set output PC6 pin level on end device
b32bit hex valueset beacon payload to be sent at next beacon
. (period)-print current status
opdBmconfigure TX power of gateway
sbcountskip sending beacons, for testing end node
fhex devAddrprinter filtering, show only single end node
hm-print filtering, hide MAC layer printing
hp-print filtering, hide APP layer printing
sa-print filtering, show all, undo hm and hp

Any received uplink will be printed with DevAddr and decrypted payload.

Committer:
dudmuck
Date:
Tue May 23 18:40:37 2017 +0000
Revision:
1:107435401168
Parent:
0:2ff18de8d48b
Child:
2:9628d5e4b1bf
remove all serial port accessing from ISRs

Who changed what in which revision?

UserRevisionLine numberNew contents of line
dudmuck 0:2ff18de8d48b 1 #include "lorawan.h"
dudmuck 0:2ff18de8d48b 2 #include "tim.h"
dudmuck 0:2ff18de8d48b 3
dudmuck 0:2ff18de8d48b 4 Serial pc(USBTX, USBRX);
dudmuck 0:2ff18de8d48b 5 Timer timer;
dudmuck 0:2ff18de8d48b 6
dudmuck 0:2ff18de8d48b 7 SPI spi(D11, D12, D13); // mosi, miso, sclk
dudmuck 0:2ff18de8d48b 8 // dio0, dio1, nss, spi, rst
dudmuck 0:2ff18de8d48b 9 SX127x radio( D2, D3, D10, spi, A0); // sx1276 arduino shield
dudmuck 0:2ff18de8d48b 10
dudmuck 0:2ff18de8d48b 11 DigitalInOut rfsw(A4);
dudmuck 0:2ff18de8d48b 12
dudmuck 0:2ff18de8d48b 13 char pcbuf[64];
dudmuck 0:2ff18de8d48b 14 int pcbuf_len;
dudmuck 0:2ff18de8d48b 15 unsigned int beacon_payload;
dudmuck 0:2ff18de8d48b 16
dudmuck 0:2ff18de8d48b 17 unsigned int skip_beacon_cnt;
dudmuck 0:2ff18de8d48b 18
dudmuck 0:2ff18de8d48b 19 void rfsw_callback()
dudmuck 0:2ff18de8d48b 20 {
dudmuck 0:2ff18de8d48b 21 if (radio.RegOpMode.bits.Mode == RF_OPMODE_TRANSMITTER)
dudmuck 0:2ff18de8d48b 22 rfsw = 1;
dudmuck 0:2ff18de8d48b 23 else
dudmuck 0:2ff18de8d48b 24 rfsw = 0;
dudmuck 0:2ff18de8d48b 25 }
dudmuck 0:2ff18de8d48b 26
dudmuck 0:2ff18de8d48b 27 SX127x_lora lora(radio);
dudmuck 0:2ff18de8d48b 28
dudmuck 0:2ff18de8d48b 29 #define LORAMAC_FIRST_CHANNEL ( (uint32_t)910.0e6 )
dudmuck 0:2ff18de8d48b 30 #define LORAMAC_STEPWIDTH_CHANNEL ( (uint32_t)800e3 )
dudmuck 0:2ff18de8d48b 31 #define LORA_MAX_NB_CHANNELS 8
dudmuck 0:2ff18de8d48b 32
dudmuck 0:2ff18de8d48b 33 #define N_SAMPLES 64
dudmuck 0:2ff18de8d48b 34 void channel_scan()
dudmuck 0:2ff18de8d48b 35 {
dudmuck 0:2ff18de8d48b 36 int min_ch, ch;
dudmuck 0:2ff18de8d48b 37 uint32_t hz = LORAMAC_FIRST_CHANNEL;
dudmuck 0:2ff18de8d48b 38 int acc[LORA_MAX_NB_CHANNELS];
dudmuck 0:2ff18de8d48b 39
dudmuck 0:2ff18de8d48b 40 radio.set_opmode(RF_OPMODE_STANDBY);
dudmuck 0:2ff18de8d48b 41
dudmuck 0:2ff18de8d48b 42 for (ch = 0; ch < LORA_MAX_NB_CHANNELS; ch++) {
dudmuck 0:2ff18de8d48b 43 int i;
dudmuck 0:2ff18de8d48b 44 float MHz = (float)hz / 1e6;
dudmuck 0:2ff18de8d48b 45 radio.set_frf_MHz(MHz);
dudmuck 0:2ff18de8d48b 46 radio.set_opmode(RF_OPMODE_RECEIVER);
dudmuck 0:2ff18de8d48b 47 acc[ch] = 0;
dudmuck 0:2ff18de8d48b 48 for (i = 0; i < N_SAMPLES; i++) {
dudmuck 0:2ff18de8d48b 49 int rssi = lora.get_current_rssi();
dudmuck 0:2ff18de8d48b 50 acc[ch] += rssi;
dudmuck 0:2ff18de8d48b 51 wait(0.01);
dudmuck 0:2ff18de8d48b 52 }
dudmuck 0:2ff18de8d48b 53 radio.set_opmode(RF_OPMODE_STANDBY);
dudmuck 0:2ff18de8d48b 54 printf("ch%u: %f\r\n", ch, acc[ch] / (float)N_SAMPLES);
dudmuck 0:2ff18de8d48b 55 hz += LORAMAC_STEPWIDTH_CHANNEL;
dudmuck 0:2ff18de8d48b 56 radio.set_frf_MHz((float)hz/1e6);
dudmuck 0:2ff18de8d48b 57 }
dudmuck 0:2ff18de8d48b 58
dudmuck 0:2ff18de8d48b 59 int min = 0x7fffffff;
dudmuck 0:2ff18de8d48b 60 min_ch = 0;
dudmuck 0:2ff18de8d48b 61 for (ch = 0; ch < LORA_MAX_NB_CHANNELS; ch++) {
dudmuck 0:2ff18de8d48b 62 if (acc[ch] < min) {
dudmuck 0:2ff18de8d48b 63 min = acc[ch];
dudmuck 0:2ff18de8d48b 64 min_ch = ch;
dudmuck 0:2ff18de8d48b 65 }
dudmuck 0:2ff18de8d48b 66 }
dudmuck 0:2ff18de8d48b 67 hz = LORAMAC_FIRST_CHANNEL + (min_ch * LORAMAC_STEPWIDTH_CHANNEL);
dudmuck 0:2ff18de8d48b 68 printf("using ch%u, %luhz\r\n", min_ch, hz);
dudmuck 0:2ff18de8d48b 69 radio.set_frf_MHz((float)hz/1e6);
dudmuck 0:2ff18de8d48b 70 }
dudmuck 0:2ff18de8d48b 71
dudmuck 0:2ff18de8d48b 72 void init_radio()
dudmuck 0:2ff18de8d48b 73 {
dudmuck 0:2ff18de8d48b 74 radio.set_opmode(RF_OPMODE_STANDBY);
dudmuck 0:2ff18de8d48b 75
dudmuck 0:2ff18de8d48b 76 radio.RegPaConfig.bits.OutputPower = 15;
dudmuck 0:2ff18de8d48b 77 radio.write_reg(REG_PACONFIG, radio.RegPaConfig.octet);
dudmuck 0:2ff18de8d48b 78 lora.enable();
dudmuck 0:2ff18de8d48b 79 lora.setBw_KHz(500);
dudmuck 0:2ff18de8d48b 80 lora.setSf(LoRaWan::Datarates[LORAMAC_DEFAULT_DATARATE]);
dudmuck 0:2ff18de8d48b 81 printf("using sf%u\r\n", LoRaWan::Datarates[LORAMAC_DEFAULT_DATARATE]);
dudmuck 0:2ff18de8d48b 82
dudmuck 0:2ff18de8d48b 83 channel_scan();
dudmuck 0:2ff18de8d48b 84
dudmuck 0:2ff18de8d48b 85 radio.write_reg(REG_LR_SYNC_BYTE, LORA_MAC_PUBLIC_SYNCWORD);
dudmuck 0:2ff18de8d48b 86 radio.write_reg(REG_LR_RX_MAX_PAYLOADLENGTH, 255);
dudmuck 0:2ff18de8d48b 87 }
dudmuck 0:2ff18de8d48b 88
dudmuck 0:2ff18de8d48b 89 void printLoraIrqs(bool clear)
dudmuck 0:2ff18de8d48b 90 {
dudmuck 0:2ff18de8d48b 91 printf("\r\nIrqFlags:");
dudmuck 0:2ff18de8d48b 92 if (lora.RegIrqFlags.bits.CadDetected)
dudmuck 0:2ff18de8d48b 93 printf("CadDetected ");
dudmuck 0:2ff18de8d48b 94 if (lora.RegIrqFlags.bits.FhssChangeChannel) {
dudmuck 0:2ff18de8d48b 95 printf("FhssChangeChannel:%d ", lora.RegHopChannel.bits.FhssPresentChannel);
dudmuck 0:2ff18de8d48b 96 }
dudmuck 0:2ff18de8d48b 97 if (lora.RegIrqFlags.bits.CadDone)
dudmuck 0:2ff18de8d48b 98 printf("CadDone ");
dudmuck 0:2ff18de8d48b 99 if (lora.RegIrqFlags.bits.TxDone)
dudmuck 0:2ff18de8d48b 100 printf("TxDone ");
dudmuck 0:2ff18de8d48b 101 if (lora.RegIrqFlags.bits.ValidHeader)
dudmuck 0:2ff18de8d48b 102 printf("ValidHeader ");
dudmuck 0:2ff18de8d48b 103 if (lora.RegIrqFlags.bits.PayloadCrcError)
dudmuck 0:2ff18de8d48b 104 printf("PayloadCrcError ");
dudmuck 0:2ff18de8d48b 105 if (lora.RegIrqFlags.bits.RxDone)
dudmuck 0:2ff18de8d48b 106 printf("RxDone ");
dudmuck 0:2ff18de8d48b 107 if (lora.RegIrqFlags.bits.RxTimeout)
dudmuck 0:2ff18de8d48b 108 printf("RxTimeout ");
dudmuck 0:2ff18de8d48b 109
dudmuck 0:2ff18de8d48b 110 printf("\r\n");
dudmuck 0:2ff18de8d48b 111
dudmuck 0:2ff18de8d48b 112 if (clear)
dudmuck 0:2ff18de8d48b 113 radio.write_reg(REG_LR_IRQFLAGS, lora.RegIrqFlags.octet);
dudmuck 0:2ff18de8d48b 114 }
dudmuck 0:2ff18de8d48b 115
dudmuck 0:2ff18de8d48b 116 void printOpMode()
dudmuck 0:2ff18de8d48b 117 {
dudmuck 0:2ff18de8d48b 118 radio.RegOpMode.octet = radio.read_reg(REG_OPMODE);
dudmuck 0:2ff18de8d48b 119 switch (radio.RegOpMode.bits.Mode) {
dudmuck 0:2ff18de8d48b 120 case RF_OPMODE_SLEEP: printf("sleep"); break;
dudmuck 0:2ff18de8d48b 121 case RF_OPMODE_STANDBY: printf("stby"); break;
dudmuck 0:2ff18de8d48b 122 case RF_OPMODE_SYNTHESIZER_TX: printf("fstx"); break;
dudmuck 0:2ff18de8d48b 123 case RF_OPMODE_TRANSMITTER: printf("tx"); break;
dudmuck 0:2ff18de8d48b 124 case RF_OPMODE_SYNTHESIZER_RX: printf("fsrx"); break;
dudmuck 0:2ff18de8d48b 125 case RF_OPMODE_RECEIVER: printf("rx"); break;
dudmuck 0:2ff18de8d48b 126 case 6:
dudmuck 0:2ff18de8d48b 127 if (radio.RegOpMode.bits.LongRangeMode)
dudmuck 0:2ff18de8d48b 128 printf("rxs");
dudmuck 0:2ff18de8d48b 129 else
dudmuck 0:2ff18de8d48b 130 printf("-6-");
dudmuck 0:2ff18de8d48b 131 break; // todo: different lora/fsk
dudmuck 0:2ff18de8d48b 132 case 7:
dudmuck 0:2ff18de8d48b 133 if (radio.RegOpMode.bits.LongRangeMode)
dudmuck 0:2ff18de8d48b 134 printf("cad");
dudmuck 0:2ff18de8d48b 135 else
dudmuck 0:2ff18de8d48b 136 printf("-7-");
dudmuck 0:2ff18de8d48b 137 break; // todo: different lora/fsk
dudmuck 0:2ff18de8d48b 138 }
dudmuck 0:2ff18de8d48b 139 }
dudmuck 0:2ff18de8d48b 140
dudmuck 0:2ff18de8d48b 141 EventQueue queue;
dudmuck 0:2ff18de8d48b 142 bool need_tx_done;
dudmuck 0:2ff18de8d48b 143 bool need_tx_done_beacon;
dudmuck 0:2ff18de8d48b 144 bool restore_tx_invert;
dudmuck 0:2ff18de8d48b 145
dudmuck 0:2ff18de8d48b 146 void send_downlink()
dudmuck 0:2ff18de8d48b 147 {
dudmuck 0:2ff18de8d48b 148 if (LoRaWan::do_downlink) {
dudmuck 0:2ff18de8d48b 149 radio.set_opmode(RF_OPMODE_STANDBY);
dudmuck 0:2ff18de8d48b 150 radio.write_reg(REG_LR_PAYLOADLENGTH, lora.RegPayloadLength);
dudmuck 0:2ff18de8d48b 151 lora.invert_tx(true);
dudmuck 0:2ff18de8d48b 152 restore_tx_invert = true;
dudmuck 0:2ff18de8d48b 153 lora.setRxPayloadCrcOn(false);
dudmuck 0:2ff18de8d48b 154 lora.start_tx(lora.RegPayloadLength);
dudmuck 0:2ff18de8d48b 155 LoRaWan::do_downlink = false;
dudmuck 0:2ff18de8d48b 156 need_tx_done = true;
dudmuck 0:2ff18de8d48b 157 }
dudmuck 0:2ff18de8d48b 158 }
dudmuck 0:2ff18de8d48b 159
dudmuck 0:2ff18de8d48b 160 void
dudmuck 0:2ff18de8d48b 161 service_radio()
dudmuck 0:2ff18de8d48b 162 {
dudmuck 0:2ff18de8d48b 163 service_action_e act = lora.service();
dudmuck 0:2ff18de8d48b 164
dudmuck 0:2ff18de8d48b 165 switch (act) {
dudmuck 0:2ff18de8d48b 166 case SERVICE_ERROR:
dudmuck 0:2ff18de8d48b 167 printf("SERVICE_ERROR\r\n");
dudmuck 0:2ff18de8d48b 168 case SERVICE_TX_DONE:
dudmuck 0:2ff18de8d48b 169 case SERVICE_NONE:
dudmuck 0:2ff18de8d48b 170 break;
dudmuck 0:2ff18de8d48b 171 case SERVICE_READ_FIFO:
dudmuck 0:2ff18de8d48b 172 if (need_tx_done || need_tx_done_beacon) {
dudmuck 0:2ff18de8d48b 173 printf("service-read-fifo txbusy\r\n");
dudmuck 0:2ff18de8d48b 174 } else {
dudmuck 0:2ff18de8d48b 175 LoRaWan::rx_slot = tim_get_current_slot();
dudmuck 0:2ff18de8d48b 176 LoRaWan::rx_ms = timer.read_ms();
dudmuck 0:2ff18de8d48b 177 if (LoRaWan::parse_receive()) {
dudmuck 0:2ff18de8d48b 178 radio.set_opmode(RF_OPMODE_STANDBY);
dudmuck 0:2ff18de8d48b 179 wait(0.05);
dudmuck 0:2ff18de8d48b 180 lora.start_rx(RF_OPMODE_RECEIVER);
dudmuck 0:2ff18de8d48b 181 }
dudmuck 0:2ff18de8d48b 182 }
dudmuck 0:2ff18de8d48b 183 break;
dudmuck 0:2ff18de8d48b 184 } // ..switch (act)
dudmuck 0:2ff18de8d48b 185 }
dudmuck 0:2ff18de8d48b 186
dudmuck 0:2ff18de8d48b 187 void clear_TxDone()
dudmuck 0:2ff18de8d48b 188 {
dudmuck 0:2ff18de8d48b 189 lora.RegIrqFlags.octet = 0;
dudmuck 0:2ff18de8d48b 190 lora.RegIrqFlags.bits.TxDone = 1;
dudmuck 0:2ff18de8d48b 191 radio.write_reg(REG_LR_IRQFLAGS, lora.RegIrqFlags.octet);
dudmuck 0:2ff18de8d48b 192 }
dudmuck 0:2ff18de8d48b 193
dudmuck 0:2ff18de8d48b 194 void dio0_callback()
dudmuck 0:2ff18de8d48b 195 {
dudmuck 0:2ff18de8d48b 196 if (radio.RegDioMapping1.bits.Dio0Mapping == 1) {
dudmuck 0:2ff18de8d48b 197 clear_TxDone();
dudmuck 0:2ff18de8d48b 198 if (restore_tx_invert) {
dudmuck 0:2ff18de8d48b 199 lora.invert_tx(false);
dudmuck 0:2ff18de8d48b 200 restore_tx_invert = false;
dudmuck 0:2ff18de8d48b 201 }
dudmuck 0:2ff18de8d48b 202
dudmuck 0:2ff18de8d48b 203 if (need_tx_done) {
dudmuck 0:2ff18de8d48b 204 lora.start_rx(RF_OPMODE_RECEIVER);
dudmuck 0:2ff18de8d48b 205 need_tx_done = false;
dudmuck 0:2ff18de8d48b 206 } else if (need_tx_done_beacon) {
dudmuck 0:2ff18de8d48b 207 lora.setHeaderMode(false);
dudmuck 0:2ff18de8d48b 208 lora.start_rx(RF_OPMODE_RECEIVER);
dudmuck 0:2ff18de8d48b 209 need_tx_done_beacon = false;
dudmuck 0:2ff18de8d48b 210 }
dudmuck 0:2ff18de8d48b 211 } else if (radio.RegDioMapping1.bits.Dio0Mapping == 0 && LoRaWan::do_downlink) {
dudmuck 1:107435401168 212 //printf("dio0-rxdone-while-pending-tx\r\n");
dudmuck 0:2ff18de8d48b 213 return;
dudmuck 0:2ff18de8d48b 214 }
dudmuck 0:2ff18de8d48b 215
dudmuck 0:2ff18de8d48b 216 service_radio();
dudmuck 0:2ff18de8d48b 217 }
dudmuck 0:2ff18de8d48b 218
dudmuck 0:2ff18de8d48b 219
dudmuck 0:2ff18de8d48b 220 volatile float prev_beacon_send_at;
dudmuck 0:2ff18de8d48b 221 volatile float beacon_send_at;
dudmuck 0:2ff18de8d48b 222 volatile float beacon_loaded_at;
dudmuck 0:2ff18de8d48b 223
dudmuck 0:2ff18de8d48b 224 volatile bool beacon_loaded;
dudmuck 0:2ff18de8d48b 225 void
dudmuck 0:2ff18de8d48b 226 send_beacon()
dudmuck 0:2ff18de8d48b 227 {
dudmuck 0:2ff18de8d48b 228 prev_beacon_send_at = beacon_send_at;
dudmuck 0:2ff18de8d48b 229 beacon_send_at = timer.read();
dudmuck 0:2ff18de8d48b 230
dudmuck 0:2ff18de8d48b 231 if (!beacon_loaded)
dudmuck 0:2ff18de8d48b 232 return;
dudmuck 0:2ff18de8d48b 233
dudmuck 0:2ff18de8d48b 234 radio.set_opmode(RF_OPMODE_TRANSMITTER);
dudmuck 0:2ff18de8d48b 235 beacon_loaded = false;
dudmuck 0:2ff18de8d48b 236
dudmuck 0:2ff18de8d48b 237 need_tx_done_beacon = true;
dudmuck 0:2ff18de8d48b 238 }
dudmuck 0:2ff18de8d48b 239
dudmuck 0:2ff18de8d48b 240 static uint16_t beacon_crc( uint8_t *buffer, uint16_t length )
dudmuck 0:2ff18de8d48b 241 {
dudmuck 0:2ff18de8d48b 242 // The CRC calculation follows CCITT
dudmuck 0:2ff18de8d48b 243 const uint16_t polynom = 0x1021;
dudmuck 0:2ff18de8d48b 244 // CRC initial value
dudmuck 0:2ff18de8d48b 245 uint16_t crc = 0x0000;
dudmuck 0:2ff18de8d48b 246
dudmuck 0:2ff18de8d48b 247 if( buffer == NULL )
dudmuck 0:2ff18de8d48b 248 {
dudmuck 0:2ff18de8d48b 249 return 0;
dudmuck 0:2ff18de8d48b 250 }
dudmuck 0:2ff18de8d48b 251
dudmuck 0:2ff18de8d48b 252 for( uint16_t i = 0; i < length; ++i )
dudmuck 0:2ff18de8d48b 253 {
dudmuck 0:2ff18de8d48b 254 crc ^= ( uint16_t ) buffer[i] << 8;
dudmuck 0:2ff18de8d48b 255 for( uint16_t j = 0; j < 8; ++j )
dudmuck 0:2ff18de8d48b 256 {
dudmuck 0:2ff18de8d48b 257 crc = ( crc & 0x8000 ) ? ( crc << 1 ) ^ polynom : ( crc << 1 );
dudmuck 0:2ff18de8d48b 258 }
dudmuck 0:2ff18de8d48b 259 }
dudmuck 0:2ff18de8d48b 260
dudmuck 0:2ff18de8d48b 261 return crc;
dudmuck 0:2ff18de8d48b 262 }
dudmuck 0:2ff18de8d48b 263
dudmuck 0:2ff18de8d48b 264 void
dudmuck 0:2ff18de8d48b 265 load_beacon()
dudmuck 0:2ff18de8d48b 266 {
dudmuck 0:2ff18de8d48b 267 uint16_t crc;
dudmuck 0:2ff18de8d48b 268 radio.set_opmode(RF_OPMODE_STANDBY);
dudmuck 0:2ff18de8d48b 269 lora.RegPayloadLength = BEACON_SIZE;
dudmuck 0:2ff18de8d48b 270 radio.write_reg(REG_LR_PAYLOADLENGTH, lora.RegPayloadLength);
dudmuck 0:2ff18de8d48b 271 lora.setHeaderMode(true);
dudmuck 0:2ff18de8d48b 272
dudmuck 0:2ff18de8d48b 273 if (skip_beacon_cnt > 0) {
dudmuck 1:107435401168 274 //printf("skip_beacon_cnt:%d\r\n", skip_beacon_cnt);
dudmuck 0:2ff18de8d48b 275 lora.invert_tx(true);
dudmuck 0:2ff18de8d48b 276 restore_tx_invert = true;
dudmuck 0:2ff18de8d48b 277 skip_beacon_cnt--;
dudmuck 0:2ff18de8d48b 278 }
dudmuck 0:2ff18de8d48b 279
dudmuck 0:2ff18de8d48b 280 radio.tx_buf[0] = beacon_payload & 0xff;
dudmuck 0:2ff18de8d48b 281 radio.tx_buf[1] = (beacon_payload >> 8) & 0xff;
dudmuck 0:2ff18de8d48b 282 radio.tx_buf[2] = (beacon_payload >> 16) & 0xff;
dudmuck 0:2ff18de8d48b 283 radio.tx_buf[3] = (beacon_payload >> 24) & 0xff;
dudmuck 0:2ff18de8d48b 284 crc = beacon_crc(radio.tx_buf, 4);
dudmuck 0:2ff18de8d48b 285 radio.tx_buf[4] = crc & 0xff;
dudmuck 0:2ff18de8d48b 286 radio.tx_buf[5] = crc >> 8;
dudmuck 0:2ff18de8d48b 287
dudmuck 0:2ff18de8d48b 288 // DIO0 to TxDone
dudmuck 0:2ff18de8d48b 289 if (radio.RegDioMapping1.bits.Dio0Mapping != 1) {
dudmuck 0:2ff18de8d48b 290 radio.RegDioMapping1.bits.Dio0Mapping = 1;
dudmuck 0:2ff18de8d48b 291 radio.write_reg(REG_DIOMAPPING1, radio.RegDioMapping1.octet);
dudmuck 0:2ff18de8d48b 292 }
dudmuck 0:2ff18de8d48b 293
dudmuck 0:2ff18de8d48b 294 // set FifoPtrAddr to FifoTxPtrBase
dudmuck 0:2ff18de8d48b 295 radio.write_reg(REG_LR_FIFOADDRPTR, radio.read_reg(REG_LR_FIFOTXBASEADDR));
dudmuck 0:2ff18de8d48b 296
dudmuck 0:2ff18de8d48b 297 // write PayloadLength bytes to fifo
dudmuck 0:2ff18de8d48b 298 lora.write_fifo(lora.RegPayloadLength);
dudmuck 0:2ff18de8d48b 299
dudmuck 0:2ff18de8d48b 300 // prepare for tx to occur in send_beacon()
dudmuck 0:2ff18de8d48b 301 radio.set_opmode(RF_OPMODE_SYNTHESIZER_TX);
dudmuck 0:2ff18de8d48b 302 beacon_loaded = true;
dudmuck 0:2ff18de8d48b 303
dudmuck 0:2ff18de8d48b 304 beacon_loaded_at = timer.read();
dudmuck 0:2ff18de8d48b 305
dudmuck 0:2ff18de8d48b 306 beacon_payload = 0; // sent once
dudmuck 0:2ff18de8d48b 307 }
dudmuck 0:2ff18de8d48b 308
dudmuck 0:2ff18de8d48b 309 void get_time_till_beacon()
dudmuck 0:2ff18de8d48b 310 {
dudmuck 0:2ff18de8d48b 311 uint16_t slots = tim_get_current_slot();
dudmuck 0:2ff18de8d48b 312 printf("slots:%u\r\n", slots);
dudmuck 0:2ff18de8d48b 313 }
dudmuck 0:2ff18de8d48b 314
dudmuck 0:2ff18de8d48b 315 void rx_callback()
dudmuck 0:2ff18de8d48b 316 {
dudmuck 0:2ff18de8d48b 317 static uint8_t pcbuf_idx = 0;
dudmuck 0:2ff18de8d48b 318 static uint8_t prev_len = 0;;
dudmuck 0:2ff18de8d48b 319 char c = pc.getc();
dudmuck 0:2ff18de8d48b 320
dudmuck 0:2ff18de8d48b 321 if (c == 8) {
dudmuck 0:2ff18de8d48b 322 if (pcbuf_idx > 0) {
dudmuck 0:2ff18de8d48b 323 pc.putc(8);
dudmuck 0:2ff18de8d48b 324 pc.putc(' ');
dudmuck 0:2ff18de8d48b 325 pc.putc(8);
dudmuck 0:2ff18de8d48b 326 pcbuf_idx--;
dudmuck 0:2ff18de8d48b 327 }
dudmuck 0:2ff18de8d48b 328 } else if (c == 3) { // ctrl-C
dudmuck 0:2ff18de8d48b 329 pcbuf_len = -1;
dudmuck 0:2ff18de8d48b 330 } else if (c == '\r') {
dudmuck 0:2ff18de8d48b 331 if (pcbuf_idx == 0) {
dudmuck 0:2ff18de8d48b 332 pcbuf_len = prev_len;
dudmuck 0:2ff18de8d48b 333 } else {
dudmuck 0:2ff18de8d48b 334 pcbuf[pcbuf_idx] = 0; // null terminate
dudmuck 0:2ff18de8d48b 335 prev_len = pcbuf_idx;
dudmuck 0:2ff18de8d48b 336 pcbuf_idx = 0;
dudmuck 0:2ff18de8d48b 337 pcbuf_len = prev_len;
dudmuck 0:2ff18de8d48b 338 }
dudmuck 0:2ff18de8d48b 339 } else if (pcbuf_idx < sizeof(pcbuf)) {
dudmuck 0:2ff18de8d48b 340 pcbuf[pcbuf_idx++] = c;
dudmuck 0:2ff18de8d48b 341 pc.putc(c);
dudmuck 0:2ff18de8d48b 342 }
dudmuck 0:2ff18de8d48b 343 }
dudmuck 0:2ff18de8d48b 344
dudmuck 0:2ff18de8d48b 345 void cmd_skip_beacon(uint8_t idx)
dudmuck 0:2ff18de8d48b 346 {
dudmuck 0:2ff18de8d48b 347 if (pcbuf[idx] >= '0' && pcbuf[idx] <= '9') {
dudmuck 0:2ff18de8d48b 348 sscanf(pcbuf+idx, "%u", &skip_beacon_cnt);
dudmuck 0:2ff18de8d48b 349 }
dudmuck 0:2ff18de8d48b 350 printf("skip_beacon_cnt:%u\r\n", skip_beacon_cnt);
dudmuck 0:2ff18de8d48b 351 }
dudmuck 0:2ff18de8d48b 352
dudmuck 0:2ff18de8d48b 353 void cmd_list_motes(uint8_t idx)
dudmuck 0:2ff18de8d48b 354 {
dudmuck 0:2ff18de8d48b 355 int i;
dudmuck 0:2ff18de8d48b 356 for (i = 0; i < N_MOTES; i++) {
dudmuck 0:2ff18de8d48b 357 if (motes[i].dev_addr != DEVADDR_NONE) {
dudmuck 0:2ff18de8d48b 358 printf("%lx\r\n", motes[i].dev_addr);
dudmuck 0:2ff18de8d48b 359 }
dudmuck 0:2ff18de8d48b 360 }
dudmuck 0:2ff18de8d48b 361 }
dudmuck 0:2ff18de8d48b 362
dudmuck 0:2ff18de8d48b 363 void
dudmuck 0:2ff18de8d48b 364 cmd_beacon_payload(uint8_t idx)
dudmuck 0:2ff18de8d48b 365 {
dudmuck 0:2ff18de8d48b 366 sscanf(pcbuf+idx, "%x", &beacon_payload);
dudmuck 0:2ff18de8d48b 367 printf("beacon_payload:%08x\r\n", beacon_payload);
dudmuck 0:2ff18de8d48b 368 }
dudmuck 0:2ff18de8d48b 369
dudmuck 0:2ff18de8d48b 370 void
dudmuck 0:2ff18de8d48b 371 cmd_send_downlink(uint8_t idx)
dudmuck 0:2ff18de8d48b 372 {
dudmuck 0:2ff18de8d48b 373 ota_mote_t* mote = NULL;
dudmuck 0:2ff18de8d48b 374 int i;
dudmuck 0:2ff18de8d48b 375 unsigned int dev_addr;
dudmuck 0:2ff18de8d48b 376 sscanf(pcbuf+idx, "%x", &dev_addr);
dudmuck 0:2ff18de8d48b 377 for (i = 0; i < N_MOTES; i++) {
dudmuck 0:2ff18de8d48b 378 if (motes[i].dev_addr == dev_addr) {
dudmuck 0:2ff18de8d48b 379 break;
dudmuck 0:2ff18de8d48b 380 }
dudmuck 0:2ff18de8d48b 381 }
dudmuck 0:2ff18de8d48b 382 if (i == N_MOTES) {
dudmuck 0:2ff18de8d48b 383 printf("mote %x not found\r\n", dev_addr);
dudmuck 0:2ff18de8d48b 384 return;
dudmuck 0:2ff18de8d48b 385 }
dudmuck 0:2ff18de8d48b 386 mote = &motes[i];
dudmuck 0:2ff18de8d48b 387
dudmuck 0:2ff18de8d48b 388 while (pcbuf[idx] != ' ') {
dudmuck 0:2ff18de8d48b 389 if (pcbuf[++idx] == 0) {
dudmuck 0:2ff18de8d48b 390 printf("hit end\r\n");
dudmuck 0:2ff18de8d48b 391 return;
dudmuck 0:2ff18de8d48b 392 }
dudmuck 0:2ff18de8d48b 393 }
dudmuck 0:2ff18de8d48b 394 idx++; // step past space
dudmuck 0:2ff18de8d48b 395
dudmuck 0:2ff18de8d48b 396 mote->user_downlink_length = 0;
dudmuck 0:2ff18de8d48b 397 while (pcbuf[idx] > ' ') {
dudmuck 0:2ff18de8d48b 398 int o;
dudmuck 0:2ff18de8d48b 399 sscanf(pcbuf+idx, "%02x", &o);
dudmuck 0:2ff18de8d48b 400 LoRaWan::user_downlink[mote->user_downlink_length++] = o;
dudmuck 0:2ff18de8d48b 401 idx += 2;
dudmuck 0:2ff18de8d48b 402 }
dudmuck 0:2ff18de8d48b 403
dudmuck 0:2ff18de8d48b 404 printf("%u bytes scheduled for %lx\r\n", mote->user_downlink_length, mote->dev_addr);
dudmuck 0:2ff18de8d48b 405 }
dudmuck 0:2ff18de8d48b 406
dudmuck 0:2ff18de8d48b 407 void cmd_status(uint8_t idx)
dudmuck 0:2ff18de8d48b 408 {
dudmuck 0:2ff18de8d48b 409 radio.RegOpMode.octet = radio.read_reg(REG_OPMODE);
dudmuck 0:2ff18de8d48b 410 printf("%.3fMHz ", radio.get_frf_MHz());
dudmuck 0:2ff18de8d48b 411 printOpMode();
dudmuck 0:2ff18de8d48b 412 if (!radio.RegOpMode.bits.LongRangeMode) {
dudmuck 0:2ff18de8d48b 413 printf("FSK\r\n");
dudmuck 0:2ff18de8d48b 414 return;
dudmuck 0:2ff18de8d48b 415 }
dudmuck 0:2ff18de8d48b 416
dudmuck 0:2ff18de8d48b 417 lora.RegIrqFlags.octet = radio.read_reg(REG_LR_IRQFLAGS);
dudmuck 0:2ff18de8d48b 418 printLoraIrqs(false);
dudmuck 0:2ff18de8d48b 419
dudmuck 0:2ff18de8d48b 420 printf("\r\nskip_beacon_cnt:%u\r\n", skip_beacon_cnt);
dudmuck 0:2ff18de8d48b 421 }
dudmuck 0:2ff18de8d48b 422
dudmuck 0:2ff18de8d48b 423 void cmd_help(uint8_t);
dudmuck 0:2ff18de8d48b 424
dudmuck 0:2ff18de8d48b 425 typedef struct {
dudmuck 0:2ff18de8d48b 426 const char* const cmd;
dudmuck 0:2ff18de8d48b 427 void (*handler)(uint8_t args_at);
dudmuck 0:2ff18de8d48b 428 const char* const arg_descr;
dudmuck 0:2ff18de8d48b 429 const char* const description;
dudmuck 0:2ff18de8d48b 430 } menu_item_t;
dudmuck 0:2ff18de8d48b 431
dudmuck 0:2ff18de8d48b 432 const menu_item_t menu_items[] =
dudmuck 0:2ff18de8d48b 433 { /* after first character, command names must be [A-Za-z] */
dudmuck 0:2ff18de8d48b 434 { "?", cmd_help, "","show available commands"},
dudmuck 0:2ff18de8d48b 435 { ".", cmd_status, "","read status"},
dudmuck 0:2ff18de8d48b 436 { "b", cmd_beacon_payload, "<%x>","set beacon payload"},
dudmuck 0:2ff18de8d48b 437 { "sb", cmd_skip_beacon, "<%d>","skip beacons"},
dudmuck 0:2ff18de8d48b 438 { "list", cmd_list_motes, "","list active motes"},
dudmuck 0:2ff18de8d48b 439 { "dl", cmd_send_downlink, "[%x %s]","send downlink <mote-hex-dev-addr> <hex-payload>"},
dudmuck 0:2ff18de8d48b 440 { NULL, NULL, NULL, NULL }
dudmuck 0:2ff18de8d48b 441 };
dudmuck 0:2ff18de8d48b 442
dudmuck 0:2ff18de8d48b 443 void cmd_help(uint8_t args_at)
dudmuck 0:2ff18de8d48b 444 {
dudmuck 0:2ff18de8d48b 445 int i;
dudmuck 0:2ff18de8d48b 446
dudmuck 0:2ff18de8d48b 447 for (i = 0; menu_items[i].cmd != NULL ; i++) {
dudmuck 0:2ff18de8d48b 448 printf("%s%s\t%s\r\n", menu_items[i].cmd, menu_items[i].arg_descr, menu_items[i].description);
dudmuck 0:2ff18de8d48b 449 }
dudmuck 0:2ff18de8d48b 450
dudmuck 0:2ff18de8d48b 451 }
dudmuck 0:2ff18de8d48b 452
dudmuck 0:2ff18de8d48b 453 void
dudmuck 0:2ff18de8d48b 454 console()
dudmuck 0:2ff18de8d48b 455 {
dudmuck 0:2ff18de8d48b 456 int i;
dudmuck 0:2ff18de8d48b 457 uint8_t user_cmd_len;
dudmuck 0:2ff18de8d48b 458
dudmuck 0:2ff18de8d48b 459 if (pcbuf_len < 0) { // ctrl-C
dudmuck 0:2ff18de8d48b 460 //printf("abort\r\n");
dudmuck 0:2ff18de8d48b 461 return;
dudmuck 0:2ff18de8d48b 462 }
dudmuck 0:2ff18de8d48b 463 if (pcbuf_len == 0)
dudmuck 0:2ff18de8d48b 464 return;
dudmuck 0:2ff18de8d48b 465
dudmuck 0:2ff18de8d48b 466 printf("\r\n");
dudmuck 0:2ff18de8d48b 467
dudmuck 0:2ff18de8d48b 468 /* get end of user-entered command */
dudmuck 0:2ff18de8d48b 469 user_cmd_len = 1; // first character can be any character
dudmuck 0:2ff18de8d48b 470 for (i = 1; i <= pcbuf_len; i++) {
dudmuck 0:2ff18de8d48b 471 if (pcbuf[i] < 'A' || (pcbuf[i] > 'Z' && pcbuf[i] < 'a') || pcbuf[i] > 'z') {
dudmuck 0:2ff18de8d48b 472 user_cmd_len = i;
dudmuck 0:2ff18de8d48b 473 break;
dudmuck 0:2ff18de8d48b 474 }
dudmuck 0:2ff18de8d48b 475 }
dudmuck 0:2ff18de8d48b 476
dudmuck 0:2ff18de8d48b 477 for (i = 0; menu_items[i].cmd != NULL ; i++) {
dudmuck 0:2ff18de8d48b 478 int mi_len = strlen(menu_items[i].cmd);
dudmuck 0:2ff18de8d48b 479
dudmuck 0:2ff18de8d48b 480 if (menu_items[i].handler && user_cmd_len == mi_len && (strncmp(pcbuf, menu_items[i].cmd, mi_len) == 0)) {
dudmuck 0:2ff18de8d48b 481 while (pcbuf[mi_len] == ' ') // skip past spaces
dudmuck 0:2ff18de8d48b 482 mi_len++;
dudmuck 0:2ff18de8d48b 483 menu_items[i].handler(mi_len);
dudmuck 0:2ff18de8d48b 484 break;
dudmuck 0:2ff18de8d48b 485 }
dudmuck 0:2ff18de8d48b 486 }
dudmuck 0:2ff18de8d48b 487
dudmuck 0:2ff18de8d48b 488 pcbuf_len = 0;
dudmuck 0:2ff18de8d48b 489 printf("> ");
dudmuck 0:2ff18de8d48b 490 fflush(stdout);
dudmuck 0:2ff18de8d48b 491 }
dudmuck 0:2ff18de8d48b 492
dudmuck 0:2ff18de8d48b 493 int main()
dudmuck 0:2ff18de8d48b 494 {
dudmuck 0:2ff18de8d48b 495 Thread eventThread;
dudmuck 0:2ff18de8d48b 496 pc.baud(115200);
dudmuck 1:107435401168 497 printf("\r\nreset\r\n");
dudmuck 0:2ff18de8d48b 498
dudmuck 0:2ff18de8d48b 499 radio.hw_reset();
dudmuck 0:2ff18de8d48b 500
dudmuck 0:2ff18de8d48b 501 rfsw.input();
dudmuck 0:2ff18de8d48b 502 if (rfsw.read()) {
dudmuck 0:2ff18de8d48b 503 printf("LAS\r\n");
dudmuck 0:2ff18de8d48b 504 /* LAS HF=PA_BOOST LF=RFO */
dudmuck 0:2ff18de8d48b 505 radio.RegPaConfig.bits.PaSelect = 1;
dudmuck 0:2ff18de8d48b 506 } else {
dudmuck 0:2ff18de8d48b 507 printf("MAS\r\n");
dudmuck 0:2ff18de8d48b 508 radio.RegPaConfig.bits.PaSelect = 0;
dudmuck 0:2ff18de8d48b 509 }
dudmuck 0:2ff18de8d48b 510 rfsw.output();
dudmuck 0:2ff18de8d48b 511
dudmuck 0:2ff18de8d48b 512 radio.rf_switch = rfsw_callback;
dudmuck 0:2ff18de8d48b 513
dudmuck 0:2ff18de8d48b 514 init_radio();
dudmuck 0:2ff18de8d48b 515
dudmuck 0:2ff18de8d48b 516 lora.start_rx(RF_OPMODE_RECEIVER);
dudmuck 0:2ff18de8d48b 517
dudmuck 0:2ff18de8d48b 518 eventThread.start(callback(&queue, &EventQueue::dispatch_forever));
dudmuck 0:2ff18de8d48b 519 LoRaWan::init();
dudmuck 0:2ff18de8d48b 520
dudmuck 0:2ff18de8d48b 521 timer.start();
dudmuck 0:2ff18de8d48b 522 tim_init();
dudmuck 0:2ff18de8d48b 523
dudmuck 0:2ff18de8d48b 524 for (;;) {
dudmuck 0:2ff18de8d48b 525 console();
dudmuck 1:107435401168 526
dudmuck 1:107435401168 527 if (pc.readable())
dudmuck 1:107435401168 528 rx_callback();
dudmuck 1:107435401168 529
dudmuck 1:107435401168 530 if (radio.dio0) {
dudmuck 1:107435401168 531 dio0_callback();
dudmuck 1:107435401168 532 }
dudmuck 0:2ff18de8d48b 533 } // ..for(;;)
dudmuck 0:2ff18de8d48b 534 }