wayne roberts / Mbed OS utility_sx12xx

Text menu driven ANSI/VT100 console test utility for LoRa transceivers

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 LR1110, then import LR1110 driver into your program.
If you're using NAmote72 or Murata discovery, then you must import only sx127x driver.
If you're using Type1SJ select target DISCO_L072CZ_LRWAN1 and import sx126x driver into your program.

This is VT100 text-based menu driven test program for SX12xx transceiver devices.
Serial console is divided into horizontally into top half and bottom half.
The bottom half serves as scrolling area to log activity.
The top half serves as menu, to configure the radio.
For all devices, the serial console operates at 115200 8N1, and requires terminal with ANSI-VT100 capability, such as putty/teraterm/minicom etc.
Use program only with keyboard up/down/left/right keys. Enter to change an item, or number for value item. Some items are single bit, requiring only enter key to toggle. Others with fixed choices give a drop-down menu.

radio_ff_arduino_sx127x.cpp@1:0817a150122b, 2018-08-20 (annotated)

Committer:
Wayne Roberts
Date:
Mon Aug 20 18:13:09 2018 -0700
Revision:
1:0817a150122b
Child:
4:fa31fdf4ec8d
add source files

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Wayne Roberts 1:0817a150122b 1 /* Only for NUCLEO boards: prevent compiling for MOTE_L152RC and typeABZ discovery */
Wayne Roberts 1:0817a150122b 2 #if defined(TARGET_FF_ARDUINO) && defined(TARGET_FF_MORPHO) && !defined(TARGET_DISCO_L072CZ_LRWAN1)
Wayne Roberts 1:0817a150122b 3 #include "radio.h"
Wayne Roberts 1:0817a150122b 4 #ifdef SX127x_H
Wayne Roberts 1:0817a150122b 5
Wayne Roberts 1:0817a150122b 6 SPI spi(D11, D12, D13); // mosi, miso, sclk
Wayne Roberts 1:0817a150122b 7 // dio0, dio1, nss, spi, rst
Wayne Roberts 1:0817a150122b 8 SX127x Radio::radio( D2, D3, D10, spi, A0); // sx127[62] arduino shield
Wayne Roberts 1:0817a150122b 9 SX127x_lora Radio::lora(radio);
Wayne Roberts 1:0817a150122b 10 SX127x_fsk Radio::fsk(radio);
Wayne Roberts 1:0817a150122b 11
Wayne Roberts 1:0817a150122b 12 InterruptIn Radio::dio0(D2);
Wayne Roberts 1:0817a150122b 13 InterruptIn Radio::dio1(D3);
Wayne Roberts 1:0817a150122b 14
Wayne Roberts 1:0817a150122b 15 typedef enum {
Wayne Roberts 1:0817a150122b 16 SHIELD_TYPE_NONE = 0,
Wayne Roberts 1:0817a150122b 17 SHIELD_TYPE_LAS,
Wayne Roberts 1:0817a150122b 18 SHIELD_TYPE_MAS,
Wayne Roberts 1:0817a150122b 19 } shield_type_e;
Wayne Roberts 1:0817a150122b 20 shield_type_e shield_type;
Wayne Roberts 1:0817a150122b 21
Wayne Roberts 1:0817a150122b 22 #ifdef TARGET_FF_MORPHO
Wayne Roberts 1:0817a150122b 23 DigitalOut pc3(PC_3); // debug RX indication, for nucleo boards
Wayne Roberts 1:0817a150122b 24 #endif /* TARGET_FF_MORPHO */
Wayne Roberts 1:0817a150122b 25 DigitalInOut rfsw(A4);
Wayne Roberts 1:0817a150122b 26 void Radio::rfsw_callback()
Wayne Roberts 1:0817a150122b 27 {
Wayne Roberts 1:0817a150122b 28 if (radio.RegOpMode.bits.Mode == RF_OPMODE_TRANSMITTER)
Wayne Roberts 1:0817a150122b 29 rfsw = 1;
Wayne Roberts 1:0817a150122b 30 else
Wayne Roberts 1:0817a150122b 31 rfsw = 0;
Wayne Roberts 1:0817a150122b 32
Wayne Roberts 1:0817a150122b 33 if (radio.RegOpMode.bits.Mode == RF_OPMODE_RECEIVER || radio.RegOpMode.bits.Mode == RF_OPMODE_RECEIVER_SINGLE)
Wayne Roberts 1:0817a150122b 34 pc3 = 1;
Wayne Roberts 1:0817a150122b 35 else
Wayne Roberts 1:0817a150122b 36 pc3 = 0;
Wayne Roberts 1:0817a150122b 37 }
Wayne Roberts 1:0817a150122b 38
Wayne Roberts 1:0817a150122b 39 void
Wayne Roberts 1:0817a150122b 40 Radio::set_tx_dbm(int8_t dbm)
Wayne Roberts 1:0817a150122b 41 {
Wayne Roberts 1:0817a150122b 42 RegPdsTrim1_t pds_trim;
Wayne Roberts 1:0817a150122b 43 uint8_t adr;
Wayne Roberts 1:0817a150122b 44
Wayne Roberts 1:0817a150122b 45 if (radio.type == SX1276)
Wayne Roberts 1:0817a150122b 46 adr = REG_PDSTRIM1_SX1276;
Wayne Roberts 1:0817a150122b 47 else
Wayne Roberts 1:0817a150122b 48 adr = REG_PDSTRIM1_SX1272;
Wayne Roberts 1:0817a150122b 49
Wayne Roberts 1:0817a150122b 50 pds_trim.octet = radio.read_reg(adr);
Wayne Roberts 1:0817a150122b 51
Wayne Roberts 1:0817a150122b 52 if (shield_type == SHIELD_TYPE_LAS)
Wayne Roberts 1:0817a150122b 53 radio.RegPaConfig.bits.PaSelect = 1;
Wayne Roberts 1:0817a150122b 54 else
Wayne Roberts 1:0817a150122b 55 radio.RegPaConfig.bits.PaSelect = 0;
Wayne Roberts 1:0817a150122b 56
Wayne Roberts 1:0817a150122b 57 if (radio.RegPaConfig.bits.PaSelect) {
Wayne Roberts 1:0817a150122b 58 /* PABOOST used: +2dbm to +17, or +20 */
Wayne Roberts 1:0817a150122b 59 if (dbm > 17) {
Wayne Roberts 1:0817a150122b 60 if (dbm > 20)
Wayne Roberts 1:0817a150122b 61 dbm = 20;
Wayne Roberts 1:0817a150122b 62 dbm -= 3;
Wayne Roberts 1:0817a150122b 63 pds_trim.bits.prog_txdac = 7;
Wayne Roberts 1:0817a150122b 64 radio.write_reg(adr, pds_trim.octet);
Wayne Roberts 1:0817a150122b 65 ocp(150);
Wayne Roberts 1:0817a150122b 66 } else
Wayne Roberts 1:0817a150122b 67 ocp(120);
Wayne Roberts 1:0817a150122b 68
Wayne Roberts 1:0817a150122b 69 if (dbm > 1)
Wayne Roberts 1:0817a150122b 70 radio.RegPaConfig.bits.OutputPower = dbm - 2;
Wayne Roberts 1:0817a150122b 71 } else {
Wayne Roberts 1:0817a150122b 72 /* RFO used: -1 to +14dbm */
Wayne Roberts 1:0817a150122b 73 ocp(80);
Wayne Roberts 1:0817a150122b 74 if (dbm < 15)
Wayne Roberts 1:0817a150122b 75 radio.RegPaConfig.bits.OutputPower = dbm + 1;
Wayne Roberts 1:0817a150122b 76 }
Wayne Roberts 1:0817a150122b 77 radio.write_reg(REG_PACONFIG, radio.RegPaConfig.octet);
Wayne Roberts 1:0817a150122b 78
Wayne Roberts 1:0817a150122b 79 radio.RegPaConfig.octet = radio.read_reg(REG_PACONFIG);
Wayne Roberts 1:0817a150122b 80 if (radio.RegPaConfig.bits.PaSelect) {
Wayne Roberts 1:0817a150122b 81 dbm = radio.RegPaConfig.bits.OutputPower + pds_trim.bits.prog_txdac - 2;
Wayne Roberts 1:0817a150122b 82 } else {
Wayne Roberts 1:0817a150122b 83 dbm = radio.RegPaConfig.bits.OutputPower - 1;
Wayne Roberts 1:0817a150122b 84 }
Wayne Roberts 1:0817a150122b 85 }
Wayne Roberts 1:0817a150122b 86
Wayne Roberts 1:0817a150122b 87 void Radio::targetInit()
Wayne Roberts 1:0817a150122b 88 {
Wayne Roberts 1:0817a150122b 89 radio.rf_switch = rfsw_callback;
Wayne Roberts 1:0817a150122b 90
Wayne Roberts 1:0817a150122b 91 rfsw.input();
Wayne Roberts 1:0817a150122b 92
Wayne Roberts 1:0817a150122b 93 radio.RegPaConfig.octet = radio.read_reg(REG_PACONFIG);
Wayne Roberts 1:0817a150122b 94
Wayne Roberts 1:0817a150122b 95 if (rfsw.read()) {
Wayne Roberts 1:0817a150122b 96 shield_type = SHIELD_TYPE_LAS;
Wayne Roberts 1:0817a150122b 97 radio.RegPaConfig.bits.PaSelect = 1;
Wayne Roberts 1:0817a150122b 98 } else {
Wayne Roberts 1:0817a150122b 99 shield_type = SHIELD_TYPE_MAS;
Wayne Roberts 1:0817a150122b 100 radio.RegPaConfig.bits.PaSelect = 0;
Wayne Roberts 1:0817a150122b 101 }
Wayne Roberts 1:0817a150122b 102
Wayne Roberts 1:0817a150122b 103 radio.write_reg(REG_PACONFIG, radio.RegPaConfig.octet);
Wayne Roberts 1:0817a150122b 104
Wayne Roberts 1:0817a150122b 105 rfsw.output();
Wayne Roberts 1:0817a150122b 106 }
Wayne Roberts 1:0817a150122b 107
Wayne Roberts 1:0817a150122b 108 void Radio::tx_dbm_print()
Wayne Roberts 1:0817a150122b 109 {
Wayne Roberts 1:0817a150122b 110 int dbm;
Wayne Roberts 1:0817a150122b 111 RegPdsTrim1_t pds_trim;
Wayne Roberts 1:0817a150122b 112 uint8_t adr;
Wayne Roberts 1:0817a150122b 113
Wayne Roberts 1:0817a150122b 114 if (radio.type == SX1276)
Wayne Roberts 1:0817a150122b 115 adr = REG_PDSTRIM1_SX1276;
Wayne Roberts 1:0817a150122b 116 else
Wayne Roberts 1:0817a150122b 117 adr = REG_PDSTRIM1_SX1272;
Wayne Roberts 1:0817a150122b 118
Wayne Roberts 1:0817a150122b 119 pds_trim.octet = radio.read_reg(adr);
Wayne Roberts 1:0817a150122b 120
Wayne Roberts 1:0817a150122b 121 radio.RegPaConfig.octet = radio.read_reg(REG_PACONFIG);
Wayne Roberts 1:0817a150122b 122 if (radio.RegPaConfig.bits.PaSelect) {
Wayne Roberts 1:0817a150122b 123 dbm = radio.RegPaConfig.bits.OutputPower + pds_trim.bits.prog_txdac - 2;
Wayne Roberts 1:0817a150122b 124 } else {
Wayne Roberts 1:0817a150122b 125 dbm = radio.RegPaConfig.bits.OutputPower - 1;
Wayne Roberts 1:0817a150122b 126 }
Wayne Roberts 1:0817a150122b 127 pc.printf(":%d", dbm);
Wayne Roberts 1:0817a150122b 128 }
Wayne Roberts 1:0817a150122b 129
Wayne Roberts 1:0817a150122b 130 bool Radio::tx_dbm_write(const char* str)
Wayne Roberts 1:0817a150122b 131 {
Wayne Roberts 1:0817a150122b 132 int i;
Wayne Roberts 1:0817a150122b 133 uint8_t adr;
Wayne Roberts 1:0817a150122b 134 RegPdsTrim1_t pds_trim;
Wayne Roberts 1:0817a150122b 135
Wayne Roberts 1:0817a150122b 136 sscanf(str, "%d", &i);
Wayne Roberts 1:0817a150122b 137
Wayne Roberts 1:0817a150122b 138 if (radio.type == SX1276)
Wayne Roberts 1:0817a150122b 139 adr = REG_PDSTRIM1_SX1276;
Wayne Roberts 1:0817a150122b 140 else
Wayne Roberts 1:0817a150122b 141 adr = REG_PDSTRIM1_SX1272;
Wayne Roberts 1:0817a150122b 142
Wayne Roberts 1:0817a150122b 143 pds_trim.octet = radio.read_reg(adr);
Wayne Roberts 1:0817a150122b 144
Wayne Roberts 1:0817a150122b 145 if (radio.RegPaConfig.bits.PaSelect) {
Wayne Roberts 1:0817a150122b 146 /* PABOOST used: +2dbm to +17, or +20 */
Wayne Roberts 1:0817a150122b 147 if (i == 20) {
Wayne Roberts 1:0817a150122b 148 log_printf("+20dBm PADAC bias\r\n");
Wayne Roberts 1:0817a150122b 149 i -= 3;
Wayne Roberts 1:0817a150122b 150 pds_trim.bits.prog_txdac = 7;
Wayne Roberts 1:0817a150122b 151 radio.write_reg(adr, pds_trim.octet);
Wayne Roberts 1:0817a150122b 152 }
Wayne Roberts 1:0817a150122b 153 if (i > 1)
Wayne Roberts 1:0817a150122b 154 radio.RegPaConfig.bits.OutputPower = i - 2;
Wayne Roberts 1:0817a150122b 155 } else {
Wayne Roberts 1:0817a150122b 156 /* RFO used: -1 to +14dbm */
Wayne Roberts 1:0817a150122b 157 if (i < 15)
Wayne Roberts 1:0817a150122b 158 radio.RegPaConfig.bits.OutputPower = i + 1;
Wayne Roberts 1:0817a150122b 159 }
Wayne Roberts 1:0817a150122b 160 radio.write_reg(REG_PACONFIG, radio.RegPaConfig.octet);
Wayne Roberts 1:0817a150122b 161
Wayne Roberts 1:0817a150122b 162 return false;
Wayne Roberts 1:0817a150122b 163 }
Wayne Roberts 1:0817a150122b 164
Wayne Roberts 1:0817a150122b 165
Wayne Roberts 1:0817a150122b 166 #endif /* ..SX127x_H */
Wayne Roberts 1:0817a150122b 167 #endif /* ...sx127x shield */
Wayne Roberts 1:0817a150122b 168