SCPI interface to SX1272 and SX1276

Dependencies:   SX127x lib_gps lib_mma8451q lib_mpl3115a2 lib_sx9500 libscpi mbed

Description

This program implements a SCPI command parser. When connected via the debug virtual comm port, you can command the radio and peripherals to perform specific tasks or to set specific parameters. The serial port defaults to 9600bps N-8-1.

Example

The following exampling causes the NA Mote to transmit a continuous LoRa signal.

Example SCPI Commands

*IDN?
RA:MOD LORA
RA:FREQ 903
RA:PAS PA_BOOST
RA:OCP 170
RA:BGR 7
RA:POW 15
RA:LORA:TXContinuous ON
RA:FI "test"

Commands

SCPI is case-insensitive. Commands can be entered lower case.

  • RAdio
    • :FIfo "text" write to fifo, and transmit packet
    • :FIfo? read from fifo (last received packet)
    • :REGister { address }, {value} write radio register (SCPI takes #H for hex prefix)
    • :REGister? { address } read radio register (SCPI takes #H for hex prefix)
    • :MODulation { FSK | OOK | LORa } set modem type
    • :MODulation? get modem type
    • :OPmode { SLE | STB | FST | TX | FSR | RXC | RXS | CAD } set mode
    • :OPmode? get mode
    • :DIOMap { 0 - 5 }, { 0 - 3 } set DIO pin function {pin number}, {map value}
    • :DIOMap? { 0 - 5 } get DIO pin function {pin number}
    • :DIO? { 0 - 5 } read DIO pin level
    • :RSSI? read received signal strength (if in RXC mode)
    • :PASelect { RFO | PA_BOOST } set RF output pin
    • :PASelect? get RF output pin selected
    • :OCP {mA} set over current protection
    • :OCP? read current limit
    • :POWer {0 to 15} set OutputPower
    • :POWer? get OutputPower
    • :BGR { 0 - 7 } set PA ref current
    • :BGR? get PA ref current
    • :FREQuency {MHz} set FRF
    • :FREQuency? get FRF
    • :LNABoost { OFF | ON } set LNA boost
    • :LNABoost? get LNA boost
    • :LORa
      • :BW {KHz} set lora bandwidth
      • :BW? get lora bandwidth (in KHz)
      • :SF {7 to 12} set spreading factor
      • :SF? get spreading factor
      • :TXContinuous { OFF | ON } set continuous TX (end transmit by turning off)
      • :TXContinuous? get continuous TX
      • :PRELen {n-symbols} set preamble length
      • :PRELen? get preamble length
      • :CR {0-4} set coding rate
      • :CR? get coding rate
      • :LDRO { OFF | ON } set LowDataRateOptimize bit
      • :LDRO? get LowDataRateOptimize bit
      • :CRC { OFF | ON} enable CRC in transmitted packet
      • :CRC? read CRC enabled state
      • :INVRx { OFF | ON } enable receiver spectral invert
      • :INVRx? get receiver inversion state
      • :INVTx { OFF | ON } enable transmitter spectral invert
      • :INVTx? get transmitter inversion state
      • :FEI? get frequency error of last received packet
      • :PKTSnr? get S/N (dB) of last received packet
    • :FSK
      • :DATAMode { CONT | PKT } select continuous/packet mode
      • :DATAMode? get packet mode / continuous
      • :FDev {Hz} set TX frequency deviation
      • :FDev? get TX frequency deviation
      • :BITRate {bps} set bit rate
      • :BITRate? get bit rate
      • :BT { 1.0 | 0.5 | 0.3 | 0.0 } set transmit shaping
      • :BT? get transmit shaping
      • :PRELen {n} set preamble size
      • :PRELen? get preamble size
      • :RXBW {Hz} set receive bandwidth
      • :RXBW? set receive bandwidth
      • :AFCBW {Hz} set receive bandwidth (during preamble)
      • :AFCBW? set receive bandwidth (during preamble)
      • :DCFree { OFF | MAN | WHIT } set DC-free encoding
      • :DCFree? get DC-free encoding
      • :RXTrigger { OFF | RSSI | PRE | BOTH } set RX trigger mode
      • :RXTrigger? get RX trigger selection

radio events

Radio events are reported into the Questionable Data Status Event Register, which is summarized in Bit 3 (QSB) of Status Byte Register.

enabling event and reading event

RA:MOD?
"LORa"
RA:OP?
"RXC"
STAT:QUES:ENAB 512
*STB?
8
STAT:QUES:EVEN?
512
RA:FI?
"4747474747474747"
*STB?
0

Bit 9 of QUEStionable event register indicates DIO0 event occurred upon radio packet reception.

NA Mote-72 specific commands

  • PD2 { OFF | ON } set power amplifier voltage state
  • PD2? get power amplifier voltage state
  • VBAT? read battery voltage
  • GPS
    • :EN { OFF | ON } enable GPS
    • :EN? get GPS enabled state
    • :NUMCoords {n} set count of coordinates received (use to clear count)
    • :NUMCoords? get count of coordinates received
    • :LOngitude {n} set longitude
    • :LOngitude? get longitude
    • :LAtitude {n} set latitude
    • :LAtitude? get latitude
  • MMA MMA8451Q
    • :ID? read ID register (WHO_AM_I == 0x1a)
  • MPL MPL3115A2
    • :ID? read ID register (WHO_AM_I == 0xc4)
  • SX9500
    • :RST reset SX9500
    • :REGister {addr}, {value} write SX9500 register
    • :REGister? {addr} read SX9500 register
Committer:
dudmuck
Date:
Wed Aug 12 22:20:33 2015 +0000
Revision:
0:8767be3c1b7f
Child:
2:547cc73f8887
SCPI interface to sx1276/sx1272

Who changed what in which revision?

UserRevisionLine numberNew contents of line
dudmuck 0:8767be3c1b7f 1 /*-
dudmuck 0:8767be3c1b7f 2 * Copyright (c) 2012-2013 Jan Breuer,
dudmuck 0:8767be3c1b7f 3 *
dudmuck 0:8767be3c1b7f 4 * All Rights Reserved
dudmuck 0:8767be3c1b7f 5 *
dudmuck 0:8767be3c1b7f 6 * Redistribution and use in source and binary forms, with or without
dudmuck 0:8767be3c1b7f 7 * modification, are permitted provided that the following conditions are
dudmuck 0:8767be3c1b7f 8 * met:
dudmuck 0:8767be3c1b7f 9 * 1. Redistributions of source code must retain the above copyright notice,
dudmuck 0:8767be3c1b7f 10 * this list of conditions and the following disclaimer.
dudmuck 0:8767be3c1b7f 11 * 2. Redistributions in binary form must reproduce the above copyright
dudmuck 0:8767be3c1b7f 12 * notice, this list of conditions and the following disclaimer in the
dudmuck 0:8767be3c1b7f 13 * documentation and/or other materials provided with the distribution.
dudmuck 0:8767be3c1b7f 14 *
dudmuck 0:8767be3c1b7f 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
dudmuck 0:8767be3c1b7f 16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
dudmuck 0:8767be3c1b7f 17 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
dudmuck 0:8767be3c1b7f 18 * DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
dudmuck 0:8767be3c1b7f 19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
dudmuck 0:8767be3c1b7f 20 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
dudmuck 0:8767be3c1b7f 21 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
dudmuck 0:8767be3c1b7f 22 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
dudmuck 0:8767be3c1b7f 23 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
dudmuck 0:8767be3c1b7f 24 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
dudmuck 0:8767be3c1b7f 25 * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
dudmuck 0:8767be3c1b7f 26 */
dudmuck 0:8767be3c1b7f 27
dudmuck 0:8767be3c1b7f 28 /**
dudmuck 0:8767be3c1b7f 29 * @file main.c
dudmuck 0:8767be3c1b7f 30 * @date Thu Nov 15 10:58:45 UTC 2012
dudmuck 0:8767be3c1b7f 31 *
dudmuck 0:8767be3c1b7f 32 * @brief SCPI parser test
dudmuck 0:8767be3c1b7f 33 *
dudmuck 0:8767be3c1b7f 34 *
dudmuck 0:8767be3c1b7f 35 */
dudmuck 0:8767be3c1b7f 36
dudmuck 0:8767be3c1b7f 37 #include <stdio.h>
dudmuck 0:8767be3c1b7f 38 #include <stdlib.h>
dudmuck 0:8767be3c1b7f 39 #include <string.h>
dudmuck 0:8767be3c1b7f 40 #include "scpi/scpi.h"
dudmuck 0:8767be3c1b7f 41 #include "../common/scpi-def.h"
dudmuck 0:8767be3c1b7f 42
dudmuck 0:8767be3c1b7f 43 #include "mbed.h"
dudmuck 0:8767be3c1b7f 44 Serial pc(USBTX, USBRX);
dudmuck 0:8767be3c1b7f 45
dudmuck 0:8767be3c1b7f 46 size_t SCPI_Write(scpi_t * context, const char * data, size_t len) {
dudmuck 0:8767be3c1b7f 47 (void) context;
dudmuck 0:8767be3c1b7f 48 return fwrite(data, 1, len, stdout);
dudmuck 0:8767be3c1b7f 49 }
dudmuck 0:8767be3c1b7f 50
dudmuck 0:8767be3c1b7f 51 scpi_result_t SCPI_Flush(scpi_t * context) {
dudmuck 0:8767be3c1b7f 52 fflush(stdout);
dudmuck 0:8767be3c1b7f 53 return SCPI_RES_OK;
dudmuck 0:8767be3c1b7f 54 }
dudmuck 0:8767be3c1b7f 55
dudmuck 0:8767be3c1b7f 56 int SCPI_Error(scpi_t * context, int_fast16_t err) {
dudmuck 0:8767be3c1b7f 57 (void) context;
dudmuck 0:8767be3c1b7f 58
dudmuck 0:8767be3c1b7f 59 printf("**ERROR: %d, \"%s\"\r\n", (int32_t) err, SCPI_ErrorTranslate(err));
dudmuck 0:8767be3c1b7f 60 return 0;
dudmuck 0:8767be3c1b7f 61 }
dudmuck 0:8767be3c1b7f 62
dudmuck 0:8767be3c1b7f 63 scpi_result_t SCPI_Control(scpi_t * context, scpi_ctrl_name_t ctrl, scpi_reg_val_t val) {
dudmuck 0:8767be3c1b7f 64 if (SCPI_CTRL_SRQ == ctrl) {
dudmuck 0:8767be3c1b7f 65 printf("**SRQ: 0x%X (%d)\r\n", val, val);
dudmuck 0:8767be3c1b7f 66 } else {
dudmuck 0:8767be3c1b7f 67 printf("**CTRL %02x: 0x%X (%d)\r\n", ctrl, val, val);
dudmuck 0:8767be3c1b7f 68 }
dudmuck 0:8767be3c1b7f 69 return SCPI_RES_OK;
dudmuck 0:8767be3c1b7f 70 }
dudmuck 0:8767be3c1b7f 71
dudmuck 0:8767be3c1b7f 72 /**
dudmuck 0:8767be3c1b7f 73 * Return 0 as OK and other number as error
dudmuck 0:8767be3c1b7f 74 */
dudmuck 0:8767be3c1b7f 75 scpi_result_t SCPI_Test(scpi_t * context) {
dudmuck 0:8767be3c1b7f 76 printf("**Test\r\n");
dudmuck 0:8767be3c1b7f 77 return (scpi_result_t)0;
dudmuck 0:8767be3c1b7f 78 }
dudmuck 0:8767be3c1b7f 79
dudmuck 0:8767be3c1b7f 80
dudmuck 0:8767be3c1b7f 81
dudmuck 0:8767be3c1b7f 82 scpi_result_t SCPI_SystemCommTcpipControlQ(scpi_t * context) {
dudmuck 0:8767be3c1b7f 83 return SCPI_RES_ERR;
dudmuck 0:8767be3c1b7f 84 }
dudmuck 0:8767be3c1b7f 85 /*
dudmuck 0:8767be3c1b7f 86 *
dudmuck 0:8767be3c1b7f 87 */
dudmuck 0:8767be3c1b7f 88 int get_kbd_str(char* buf, int size)
dudmuck 0:8767be3c1b7f 89 {
dudmuck 0:8767be3c1b7f 90 char c;
dudmuck 0:8767be3c1b7f 91 int i;
dudmuck 0:8767be3c1b7f 92 static int prev_len;
dudmuck 0:8767be3c1b7f 93
dudmuck 0:8767be3c1b7f 94 for (i = 0;;) {
dudmuck 0:8767be3c1b7f 95 if (pc.readable()) {
dudmuck 0:8767be3c1b7f 96 c = pc.getc();
dudmuck 0:8767be3c1b7f 97 if (c == 8) { // backspace
dudmuck 0:8767be3c1b7f 98 if (i > 0) {
dudmuck 0:8767be3c1b7f 99 pc.putc(8);
dudmuck 0:8767be3c1b7f 100 pc.putc(' ');
dudmuck 0:8767be3c1b7f 101 pc.putc(8);
dudmuck 0:8767be3c1b7f 102 i--;
dudmuck 0:8767be3c1b7f 103 }
dudmuck 0:8767be3c1b7f 104 } else if (c == '\r') {
dudmuck 0:8767be3c1b7f 105 if (i == 0) {
dudmuck 0:8767be3c1b7f 106 return prev_len; // repeat previous
dudmuck 0:8767be3c1b7f 107 } else {
dudmuck 0:8767be3c1b7f 108 buf[i++] = c;
dudmuck 0:8767be3c1b7f 109 buf[i] = 0; // null terminate
dudmuck 0:8767be3c1b7f 110 prev_len = i;
dudmuck 0:8767be3c1b7f 111 pc.putc('\r');
dudmuck 0:8767be3c1b7f 112 pc.putc('\n');
dudmuck 0:8767be3c1b7f 113 return i;
dudmuck 0:8767be3c1b7f 114 }
dudmuck 0:8767be3c1b7f 115 } else if (c == 3) {
dudmuck 0:8767be3c1b7f 116 // ctrl-C abort
dudmuck 0:8767be3c1b7f 117 //abort_key = true;
dudmuck 0:8767be3c1b7f 118 return -1;
dudmuck 0:8767be3c1b7f 119 } else if (i < size) {
dudmuck 0:8767be3c1b7f 120 buf[i++] = c;
dudmuck 0:8767be3c1b7f 121 pc.putc(c);
dudmuck 0:8767be3c1b7f 122 }
dudmuck 0:8767be3c1b7f 123 } else {
dudmuck 0:8767be3c1b7f 124 /* service something */
dudmuck 0:8767be3c1b7f 125 service_radio();
dudmuck 0:8767be3c1b7f 126 }
dudmuck 0:8767be3c1b7f 127 } // ...for()
dudmuck 0:8767be3c1b7f 128 }
dudmuck 0:8767be3c1b7f 129
dudmuck 0:8767be3c1b7f 130 int main(int argc, char** argv) {
dudmuck 0:8767be3c1b7f 131 (void) argc;
dudmuck 0:8767be3c1b7f 132 (void) argv;
dudmuck 0:8767be3c1b7f 133 //int result;
dudmuck 0:8767be3c1b7f 134
dudmuck 0:8767be3c1b7f 135 scpi_def_init();
dudmuck 0:8767be3c1b7f 136
dudmuck 0:8767be3c1b7f 137 SCPI_Init(&scpi_context);
dudmuck 0:8767be3c1b7f 138
dudmuck 0:8767be3c1b7f 139 printf("\r\nreset\r\n");
dudmuck 0:8767be3c1b7f 140 char smbuffer[32];
dudmuck 0:8767be3c1b7f 141 while (1) {
dudmuck 0:8767be3c1b7f 142 //fgets(smbuffer, 10, stdin);
dudmuck 0:8767be3c1b7f 143 int len = get_kbd_str(smbuffer, sizeof(smbuffer));
dudmuck 0:8767be3c1b7f 144 if (len > 0) {
dudmuck 0:8767be3c1b7f 145 /*result =*/ SCPI_Input(&scpi_context, smbuffer, len);
dudmuck 0:8767be3c1b7f 146 }
dudmuck 0:8767be3c1b7f 147 }
dudmuck 0:8767be3c1b7f 148
dudmuck 0:8767be3c1b7f 149 //return (EXIT_SUCCESS);
dudmuck 0:8767be3c1b7f 150 }
dudmuck 0:8767be3c1b7f 151