Hamlib/rigs/yaesu/ft980.c

1025 wiersze
27 KiB
C

/*
* ft980.c - (C) Stephane Fillod 2004-2010
* (C) Wolfgang Buesser 2010
*
* This shared library provides an API for communicating
* via serial interface to an FT-980 using the "CAT" interface
*
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <stdlib.h>
#include <string.h> /* String function definitions */
#include <unistd.h> /* UNIX standard function definitions */
#include "hamlib/rig.h"
#include "serial.h"
#include "misc.h"
#include "bandplan.h"
#include "yaesu.h"
#define FT980_MODES (RIG_MODE_LSB|RIG_MODE_USB|RIG_MODE_CW|RIG_MODE_AM|RIG_MODE_RTTY|RIG_MODE_FM)
#define FT980_ANTS (RIG_ANT_1)
/* TODO: RIG_VFO_HAM|RIG_VFO_GEN ? */
#define FT980_VFOS (RIG_VFO_MAIN)
/* TODO: RIG_OP_TO_VFO|RIG_OP_FROM_VFO|RIG_OP_BAND_UP|RIG_OP_BAND_DOWN */
#define FT980_VFO_OPS (RIG_OP_NONE)
typedef struct _ft980_memory_t
{
unsigned char mem_16[4]; unsigned char vfo_16; unsigned char mode_16;
unsigned char mem_15[4]; unsigned char vfo_15; unsigned char mode_15;
unsigned char mem_14[4]; unsigned char vfo_14; unsigned char mode_14;
unsigned char mem_13[4]; unsigned char vfo_13; unsigned char mode_13;
unsigned char mem_12[4]; unsigned char vfo_12; unsigned char mode_12;
unsigned char mem_11[4]; unsigned char vfo_11; unsigned char mode_11;
unsigned char mem_10[4]; unsigned char vfo_10; unsigned char mode_10;
unsigned char mem_9[4]; unsigned char vfo_9; unsigned char mode_9;
unsigned char mem_8[4]; unsigned char vfo_8; unsigned char mode_8;
unsigned char mem_7[4]; unsigned char vfo_7; unsigned char mode_7;
unsigned char mem_6[4]; unsigned char vfo_6; unsigned char mode_6;
unsigned char mem_5[4]; unsigned char vfo_5; unsigned char mode_5;
unsigned char mem_4[4]; unsigned char vfo_4; unsigned char mode_4;
unsigned char mem_3[4]; unsigned char vfo_3; unsigned char mode_3;
unsigned char mem_2[4]; unsigned char vfo_2; unsigned char mode_2;
unsigned char mem_1[4]; unsigned char vfo_1; unsigned char mode_1;
unsigned char CLAR[4];
unsigned char GEN[4]; unsigned char HAM[4]; unsigned char vfo;
unsigned char mode;
unsigned char ff_1[4];
unsigned char ff_2[4];
unsigned char vfo_mem;
unsigned char mode_mem;
unsigned char LDB;
unsigned char EXT_CTL;
unsigned char IF_SHIFT;
unsigned char SPLIT_CODE;
unsigned char FSK_SHIFT;
unsigned char IF_WIDTH;
unsigned char MEM_SHIFT;
unsigned char CLAR_FLAG;
unsigned char TAB_FLAG;
unsigned char SELECT_SW;
unsigned char OFFSET_SW;
unsigned char MODE_SW;
unsigned char MEM_CH_SW;
unsigned char LOW_TAB[4];
unsigned char UP_TAB[4];
unsigned char VFO_STATUS;
unsigned char OP_MODE;
unsigned char OP_FREQ[4];
unsigned char STATUS_FLAG;
} _ft980_memory_t;
/*
* Private data
*/
struct ft980_priv_data
{
_ft980_memory_t update_data; /* returned data */
struct timeval status_tv; /* update_data caching */
};
#define UPDATE_DATA_OFS(p, o) (((unsigned char*)((p)+1))-(o))
static const char cmd_OK[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x0B};
static const char cmd_ON_OFF[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x00};
/* Private helper function prototypes */
static int ft980_transaction(RIG *rig, const unsigned char *cmd,
unsigned char *data, int expected_len);
static int ft980_get_status_data(RIG *rig);
static int ft980_open(RIG *rig);
static int ft980_close(RIG *rig);
static int ft980_set_freq(RIG *rig, vfo_t vfo, freq_t freq);
static int ft980_get_freq(RIG *rig, vfo_t vfo, freq_t *freq);
static int ft980_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width);
static int ft980_get_mode(RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width);
static int ft980_set_mem(RIG *rig, vfo_t vfo, int ch);
static int ft980_get_mem(RIG *rig, vfo_t vfo, int *ch);
#if 0
static int ft980_set_split_vfo(RIG *rig, vfo_t vfo, split_t split,
vfo_t tx_vfo);
static int ft980_set_split_freq(RIG *rig, vfo_t vfo, freq_t freq);
static int ft980_set_split_mode(RIG *rig, vfo_t vfo, rmode_t mode,
pbwidth_t width);
static int ft980_get_level(RIG *rig, vfo_t vfo, setting_t level, value_t *val);
static int ft980_set_rptr_shift(RIG *rig, vfo_t vfo, rptr_shift_t shift);
static int ft980_set_rptr_offs(RIG *rig, vfo_t vfo, shortfreq_t offs);
#endif
/*
* ft980 rigs capabilities.
*/
#define FT980_MEM_CAP { \
.freq = 1, \
.mode = 1, \
.width = 1, \
}
#define FT980_CACHE_TIMEOUT 500 /* ms */
/*
* ft980 rigs capabilities.
*
* Protocol is documented in FT 980 Technical Supplement, page 13.
*
* TODO:
*/
const struct rig_caps ft980_caps =
{
.rig_model = RIG_MODEL_FT980,
.model_name = "FT-980",
.mfg_name = "Yaesu",
.version = "0.1",
.copyright = "LGPL",
.status = RIG_STATUS_ALPHA,
.rig_type = RIG_TYPE_TRANSCEIVER,
.ptt_type = RIG_PTT_SERIAL_RTS,
.dcd_type = RIG_DCD_NONE,
.port_type = RIG_PORT_SERIAL,
.serial_rate_min = 4800,
.serial_rate_max = 4800,
.serial_data_bits = 8,
.serial_stop_bits = 2,
.serial_parity = RIG_PARITY_NONE,
.serial_handshake = RIG_HANDSHAKE_NONE,
.write_delay = 80,
.post_write_delay = 0,
.timeout = 2000,
.retry = 3,
.has_get_func = RIG_FUNC_NONE,
.has_set_func = RIG_FUNC_NONE,
.has_get_level = RIG_LEVEL_NONE,
.has_set_level = RIG_LEVEL_NONE,
.has_get_parm = RIG_PARM_NONE,
.has_set_parm = RIG_PARM_NONE,
.vfo_ops = FT980_VFO_OPS,
.preamp = { RIG_DBLST_END, },
.attenuator = { RIG_DBLST_END, },
.max_rit = Hz(10000),
.max_xit = Hz(10000),
.max_ifshift = Hz(1500),
.targetable_vfo = RIG_TARGETABLE_NONE,
.transceive = RIG_TRN_OFF,
.bank_qty = 0,
.chan_desc_sz = 0,
.chan_list = {
{1, 16, RIG_MTYPE_MEM, FT980_MEM_CAP},
},
.rx_range_list1 = {
{kHz(150), MHz(30) - 100, FT980_MODES, -1, -1, FT980_VFOS, FT980_ANTS},
RIG_FRNG_END,
},
.tx_range_list1 = {
FRQ_RNG_HF(1, RIG_MODE_SSB | RIG_MODE_CW, W(5), W(100), FT980_VFOS, FT980_ANTS),
FRQ_RNG_HF(1, RIG_MODE_FM | RIG_MODE_RTTY, W(2), W(50), FT980_VFOS, FT980_ANTS),
FRQ_RNG_HF(1, RIG_MODE_AM, W(2), W(25), FT980_VFOS, FT980_ANTS),
RIG_FRNG_END,
},
.rx_range_list2 = {
{kHz(150), MHz(30) - 100, FT980_MODES, -1, -1, FT980_VFOS, FT980_ANTS},
RIG_FRNG_END,
},
.tx_range_list2 = {
FRQ_RNG_HF(2, RIG_MODE_SSB | RIG_MODE_CW, W(5), W(100), FT980_VFOS, FT980_ANTS),
FRQ_RNG_HF(2, RIG_MODE_FM | RIG_MODE_RTTY, W(2), W(50), FT980_VFOS, FT980_ANTS),
FRQ_RNG_HF(2, RIG_MODE_AM, W(2), W(25), FT980_VFOS, FT980_ANTS),
RIG_FRNG_END,
},
.tuning_steps = {
{FT980_MODES, Hz(10)},
{FT980_MODES, kHz(5)},
{FT980_MODES, kHz(500)},
RIG_TS_END,
},
/* mode/filter list, remember: order matters! */
.filters = {
{RIG_MODE_SSB | RIG_MODE_CW | RIG_MODE_RTTY, kHz(2.5)},
{RIG_MODE_CW, Hz(300)},
{RIG_MODE_FM, kHz(12)},
{RIG_MODE_AM, kHz(5)},
{RIG_MODE_AM, kHz(3)},
RIG_FLT_END,
},
.rig_open = ft980_open,
.rig_close = ft980_close,
.set_freq = ft980_set_freq,
.get_freq = ft980_get_freq,
.set_mode = ft980_set_mode,
.get_mode = ft980_get_mode,
.set_mem = ft980_set_mem,
.get_mem = ft980_get_mem,
#ifdef XXREMOVEDXX
.get_level = ft980_get_level,
.set_level = ft980_set_level,
.set_split_vfo = ft980_set_split_vfo,
.set_split_freq = ft980_set_split_freq,
.set_split_mode = ft980_set_split_mode,
.set_rptr_shift = ft980_set_rptr_shift,
.set_rptr_offs = ft980_set_rptr_offs,
#endif
};
static void dump_freq(unsigned char *data)
{
rig_debug(RIG_DEBUG_VERBOSE, "%02x%02x%02x%02x ", data[3], data[2], data[1],
data[0]);
}
static void dump_vfo(unsigned char data)
{
switch ((unsigned int)data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "GEN"); break;
case 128: rig_debug(RIG_DEBUG_VERBOSE, "%s", "HAM"); break;
}
}
static void dump_mode(unsigned char data)
{
switch ((unsigned int)data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", " LSB\n"); break;
case 1: rig_debug(RIG_DEBUG_VERBOSE, "%s", " USB\n"); break;
case 2: rig_debug(RIG_DEBUG_VERBOSE, "%s", " CW-W\n"); break;
case 3: rig_debug(RIG_DEBUG_VERBOSE, "%s", " CW-N\n"); break;
case 4: rig_debug(RIG_DEBUG_VERBOSE, "%s", " AM-W\n"); break;
case 5: rig_debug(RIG_DEBUG_VERBOSE, "%s", " AM-N\n"); break;
case 6: rig_debug(RIG_DEBUG_VERBOSE, "%s", " FSK\n"); break;
case 7: rig_debug(RIG_DEBUG_VERBOSE, "%s", " FM\n"); break;
}
}
static void dump_switch(unsigned char data)
{
switch ((unsigned int)data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "OFF"); break;
case 1: rig_debug(RIG_DEBUG_VERBOSE, "%s", "ON "); break;
}
}
static void dump_IF_SHIFT(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "IF_SHIFT :\%d\n", data - 15);
}
static void dump_SPLIT_CODE(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "SPLIT_CODE :\%02x\n", data);
}
static void dump_FSK_SHIFT(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "FSK_SHIFT :\%02x\n", data);
}
static void dump_IF_WIDTH(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "IF_WIDTH :\%d\n", data);
}
static void dump_MEM_SHIFT(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "MEM_SHIFT :");
switch ((unsigned int)data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "OFF\n"); break;
case 16: rig_debug(RIG_DEBUG_VERBOSE, "%s", "ON\n"); break;
}
}
static void dump_CLAR_FLAG(unsigned char data)
{
unsigned char RX_CLAR = data & 0x20;
unsigned char TX_CLAR = data & 0x40;
rig_debug(RIG_DEBUG_VERBOSE, "%s", "CLAR_SHIFT RX/TX:");
switch ((unsigned int)RX_CLAR)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "OFF "); break;
case 0x20: rig_debug(RIG_DEBUG_VERBOSE, "%s", "ON "); break;
}
switch ((unsigned int)TX_CLAR)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", " OFF "); break;
case 0x40: rig_debug(RIG_DEBUG_VERBOSE, "%s", " ON "); break;
}
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
}
static void dump_TAB_FLAG(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "TAB FLAG :");
switch (data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "OFF\n"); break;
case 0x80: rig_debug(RIG_DEBUG_VERBOSE, "%s", "ON\n"); break;
}
}
static void dump_SELECT_SW(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "SELECT_SW :");
switch ((unsigned int)data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "VFO "); break;
case 1: rig_debug(RIG_DEBUG_VERBOSE, "%s", "MR "); break;
case 2: rig_debug(RIG_DEBUG_VERBOSE, "%s", "RX_M"); break;
case 3: rig_debug(RIG_DEBUG_VERBOSE, "%s", "RX_V"); break;
}
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
}
static void dump_MODE_SW(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "MODE_SW :");
switch ((unsigned int)data)
{
case 0: rig_debug(RIG_DEBUG_VERBOSE, "%s", "LSB "); break;
case 1: rig_debug(RIG_DEBUG_VERBOSE, "%s", "USB "); break;
case 2: rig_debug(RIG_DEBUG_VERBOSE, "%s", "CW-W"); break;
case 3: rig_debug(RIG_DEBUG_VERBOSE, "%s", "CW-N"); break;
case 4: rig_debug(RIG_DEBUG_VERBOSE, "%s", "AM-W"); break;
case 5: rig_debug(RIG_DEBUG_VERBOSE, "%s", "AM-N"); break;
case 6: rig_debug(RIG_DEBUG_VERBOSE, "%s", "FSK"); break;
case 7: rig_debug(RIG_DEBUG_VERBOSE, "%s", "FM"); break;
}
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
}
static void dump_MEM_CH_SW(unsigned char data)
{
rig_debug(RIG_DEBUG_VERBOSE, "MEM_CH_SW :%d\n", data + 1);
}
static void dump_STATUS_FLAG(unsigned char data)
{
unsigned char TX = data & 0x01;
unsigned char SPLIT = data & 0x08;
unsigned char VFO = data & 0x20;
unsigned char CLAR = data & 0x40;
rig_debug(RIG_DEBUG_VERBOSE, "%s", "STATUS_FLAG :");
if (TX)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "TX ");
}
else
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "RX ");
}
if (SPLIT)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "SPLIT ");
}
else
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "SIMPLEX ");
}
if (VFO)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "VFO ");
}
else
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "MEMORY ");
}
if (CLAR)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "CLAR_ON ");
}
else
{
rig_debug(RIG_DEBUG_VERBOSE, "%s", "CLAR_OFF");
}
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
}
static void dump_memory(_ft980_memory_t *memory)
{
if (!rig_need_debug(RIG_DEBUG_VERBOSE))
{
return;
}
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_1 :");
dump_freq(memory->mem_1);
dump_vfo(memory->vfo_1);
dump_mode(memory->mode_1);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_2 :");
dump_freq(memory->mem_2);
dump_vfo(memory->vfo_2);
dump_mode(memory->mode_2);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_3 :");
dump_freq(memory->mem_3);
dump_vfo(memory->vfo_3);
dump_mode(memory->mode_3);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_4 :");
dump_freq(memory->mem_4);
dump_vfo(memory->vfo_4);
dump_mode(memory->mode_4);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_5 :");
dump_freq(memory->mem_5);
dump_vfo(memory->vfo_5);
dump_mode(memory->mode_5);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_6 :");
dump_freq(memory->mem_6);
dump_vfo(memory->vfo_6);
dump_mode(memory->mode_6);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_7 :");
dump_freq(memory->mem_7);
dump_vfo(memory->vfo_7);
dump_mode(memory->mode_7);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_8 :");
dump_freq(memory->mem_8);
dump_vfo(memory->vfo_8);
dump_mode(memory->mode_8);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_9 :");
dump_freq(memory->mem_9);
dump_vfo(memory->vfo_9);
dump_mode(memory->mode_9);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_10 :");
dump_freq(memory->mem_10);
dump_vfo(memory->vfo_10);
dump_mode(memory->mode_10);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_11 :");
dump_freq(memory->mem_11);
dump_vfo(memory->vfo_11);
dump_mode(memory->mode_11);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_12 :");
dump_freq(memory->mem_12);
dump_vfo(memory->vfo_12);
dump_mode(memory->mode_12);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_13 :");
dump_freq(memory->mem_13);
dump_vfo(memory->vfo_13);
dump_mode(memory->mode_13);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_14 :");
dump_freq(memory->mem_14);
dump_vfo(memory->vfo_14);
dump_mode(memory->mode_14);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_15 :");
dump_freq(memory->mem_15);
dump_vfo(memory->vfo_15);
dump_mode(memory->mode_15);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "mem_16 :");
dump_freq(memory->mem_16);
dump_vfo(memory->vfo_16);
dump_mode(memory->mode_16);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "GEN :");
dump_freq(memory->GEN);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\nHAM :");
dump_freq(memory->HAM);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n ");
dump_vfo(memory->vfo);
dump_mode(memory->mode);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "CLAR :");
dump_freq(memory->CLAR);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
rig_debug(RIG_DEBUG_VERBOSE, "%s", "f_1 :");
dump_freq(memory->ff_1);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
rig_debug(RIG_DEBUG_VERBOSE, "%s", "f_2 :");
dump_freq(memory->ff_2);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
rig_debug(RIG_DEBUG_VERBOSE, "%s", " ");
dump_vfo(memory->vfo);
dump_mode(memory->mode);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "LDB :");
dump_switch(memory->LDB);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
rig_debug(RIG_DEBUG_VERBOSE, "%s", "EXT_CTL :");
dump_switch(memory->EXT_CTL);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
dump_IF_SHIFT(memory->IF_SHIFT);
dump_SPLIT_CODE(memory->SPLIT_CODE);
dump_FSK_SHIFT(memory->FSK_SHIFT);
dump_IF_WIDTH(memory->IF_WIDTH);
dump_MEM_SHIFT(memory->MEM_SHIFT);
dump_CLAR_FLAG(memory->CLAR_FLAG);
dump_TAB_FLAG(memory->TAB_FLAG);
dump_SELECT_SW(memory->SELECT_SW);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "OFFSET_SW :");
dump_switch(memory->OFFSET_SW);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
dump_MODE_SW(memory->MODE_SW);
dump_MEM_CH_SW(memory->MEM_CH_SW);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "LOW_TAB :");
dump_freq(memory->LOW_TAB);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
rig_debug(RIG_DEBUG_VERBOSE, "%s", "UP_TAB :");
dump_freq(memory->UP_TAB);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
rig_debug(RIG_DEBUG_VERBOSE, "%s", " ");
dump_vfo(memory->VFO_STATUS);
dump_mode(memory->OP_MODE);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "OP_FREQ :");
dump_freq(memory->OP_FREQ);
rig_debug(RIG_DEBUG_VERBOSE, "%s", "\n");
dump_STATUS_FLAG(memory->STATUS_FLAG);
}
int ft980_transaction(RIG *rig, const unsigned char *cmd, unsigned char *data,
int expected_len)
{
int retval;
char echo_back[YAESU_CMD_LENGTH];
serial_flush(&rig->state.rigport);
retval = write_block(&rig->state.rigport, (const char *)cmd, YAESU_CMD_LENGTH);
if (retval < 0)
{
return retval;
}
retval = read_block(&rig->state.rigport, echo_back, YAESU_CMD_LENGTH);
if (retval < 0)
{
return retval;
}
if (retval != YAESU_CMD_LENGTH || memcmp(echo_back, cmd, YAESU_CMD_LENGTH))
{
return -RIG_EPROTO;
}
retval = write_block(&rig->state.rigport, cmd_OK, YAESU_CMD_LENGTH);
if (retval < 0)
{
return retval;
}
retval = read_block(&rig->state.rigport, (char *)data, expected_len);
if (retval < 0)
{
return retval;
}
if (retval != expected_len)
{
return -RIG_EPROTO;
}
return RIG_OK;
}
int ft980_get_status_data(RIG *rig)
{
unsigned char cmd[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x01 };
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
int retval;
if (!rig_check_cache_timeout(&priv->status_tv, FT980_CACHE_TIMEOUT))
{
return RIG_OK;
}
retval = ft980_transaction(rig, cmd, (unsigned char *)&priv->update_data, 148);
if (retval != RIG_OK)
{
return retval;
}
/* update cache date */
gettimeofday(&priv->status_tv, NULL);
dump_memory(&priv->update_data);
return retval;
}
/*
* ft980_open routine
*
*/
int ft980_open(RIG *rig)
{
unsigned char echo_back[YAESU_CMD_LENGTH];
struct ft980_priv_data *priv;
int retry_count1 = 0;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
rig->state.priv = calloc(1, sizeof(struct ft980_priv_data));
if (!rig->state.priv)
{
return -RIG_ENOMEM;
}
priv = (struct ft980_priv_data *)rig->state.priv;
memset(priv, 0, sizeof(struct ft980_priv_data));
/* send Ext Cntl ON: Activate CAT */
do
{
int retval;
int retry_count2 = 0;
do
{
write_block(&rig->state.rigport, (char *) cmd_ON_OFF,
YAESU_CMD_LENGTH);
retval = read_block(&rig->state.rigport, (char *) echo_back, YAESU_CMD_LENGTH);
}
while (retval != 5 && retry_count2++ < rig->state.rigport.retry);
write_block(&rig->state.rigport, (char *) cmd_OK, YAESU_CMD_LENGTH);
retval = read_block(&rig->state.rigport, (char *) &priv->update_data, 148);
}
while (!priv->update_data.EXT_CTL && retry_count1++ < rig->state.rigport.retry);
return RIG_OK;
}
int ft980_close(RIG *rig)
{
unsigned char echo_back[YAESU_CMD_LENGTH];
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
int retry_count1 = 0;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
do
{
int retval;
int retry_count2 = 0;
do
{
write_block(&rig->state.rigport, (char *) cmd_ON_OFF,
YAESU_CMD_LENGTH);
retval = read_block(&rig->state.rigport, (char *) echo_back, YAESU_CMD_LENGTH);
}
while (retval != 5 && retry_count2++ < rig->state.rigport.retry);
write_block(&rig->state.rigport, (char *) cmd_OK, YAESU_CMD_LENGTH);
retval = read_block(&rig->state.rigport, (char *) &priv->update_data, 148);
}
while (priv->update_data.EXT_CTL && retry_count1++ < rig->state.rigport.retry);
free(priv);
return RIG_OK;
}
int ft980_set_freq(RIG *rig, vfo_t vfo, freq_t freq)
{
unsigned char cmd[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x08};
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
/* store bcd format in cmd (MSB) */
to_bcd(cmd, freq / 10, 8);
rig_force_cache_timeout(&priv->status_tv);
/* Frequency set */
return ft980_transaction(rig, cmd, UPDATE_DATA_OFS(&priv->update_data, 5), 5);
}
int ft980_get_freq(RIG *rig, vfo_t vfo, freq_t *freq)
{
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
int retval;
freq_t f;
/* Frequency get */
retval = ft980_get_status_data(rig);
if (retval != RIG_OK)
{
return retval;
}
f = from_bcd(priv->update_data.OP_FREQ, 8);
*freq = f * 10; /* return displayed frequency */
return RIG_OK;
}
#define MD_LSB 0x10
#define MD_USB 0x11
#define MD_CW 0x12
#define MD_CWN 0x13
#define MD_AM 0x14
#define MD_AMN 0x15
#define MD_RTTY 0x16
#define MD_FM 0x17
int ft980_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width)
{
unsigned char cmd[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x0A};
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
unsigned char md;
/*
* translate mode from generic to ft980 specific
*/
switch (mode)
{
case RIG_MODE_CW : md = MD_CW; break;
case RIG_MODE_USB: md = MD_USB; break;
case RIG_MODE_LSB: md = MD_LSB; break;
case RIG_MODE_FM: md = MD_FM; break;
case RIG_MODE_AM: md = MD_AM; break;
case RIG_MODE_RTTY: md = MD_RTTY; break;
default:
return -RIG_EINVAL; /* sorry, wrong MODE */
}
if (width != RIG_PASSBAND_NOCHANGE
&& width != RIG_PASSBAND_NORMAL
&& width < rig_passband_normal(rig, mode))
{
switch (md)
{
case MD_CW: md = MD_CWN; break;
case MD_AM: md = MD_AMN; break;
}
}
cmd[3] = md;
rig_force_cache_timeout(&priv->status_tv);
/* Mode set */
return ft980_transaction(rig, cmd, UPDATE_DATA_OFS(&priv->update_data, 22), 22);
}
/*
* rig_get_mode
*
* get mode eg AM, CW etc
*
*/
int ft980_get_mode(RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width)
{
unsigned char my_mode; /* ft890 mode, mode offset */
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
int retval, norm;
retval = ft980_get_status_data(rig);
if (retval != RIG_OK)
{
return retval;
}
my_mode = priv->update_data.OP_MODE;
rig_debug(RIG_DEBUG_TRACE, "%s: called\n", __func__);
/*
* translate mode from ft980 to generic.
*/
switch (my_mode)
{
case 0:
*mode = RIG_MODE_LSB;
norm = 1;
break;
case 1:
*mode = RIG_MODE_USB;
norm = 1;
break;
case 2:
*mode = RIG_MODE_CW;
norm = 1;
break;
case 3:
*mode = RIG_MODE_CW;
norm = 0;
break;
case 4:
*mode = RIG_MODE_AM;
norm = 1;
break;
case 5:
*mode = RIG_MODE_AM;
norm = 0;
break;
case 6:
*mode = RIG_MODE_RTTY;
norm = 1;
break;
case 7:
*mode = RIG_MODE_FM;
norm = 1;
break;
default:
return -RIG_EPROTO; /* Oops! file bug report */
}
if (norm)
{
*width = rig_passband_normal(rig, *mode);
}
else
{
*width = rig_passband_narrow(rig, *mode);
}
rig_debug(RIG_DEBUG_TRACE, "%s: set mode = %s\n", __func__,
rig_strrmode(*mode));
rig_debug(RIG_DEBUG_TRACE, "%s: set width = %d Hz\n", __func__, (int)*width);
return RIG_OK;
}
int ft980_set_split_vfo(RIG *rig, vfo_t vfo, split_t split, vfo_t tx_vfo)
{
return -RIG_ENIMPL;
#if 0 // deprecated as was ignored before now
unsigned char cmd[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x8e};
/*
* this can be misleading as Yaesu call it "Full duplex"
* or "sat mode", and split Yaesu terms is repeater shift.
*/
cmd[4] = split == RIG_SPLIT_ON ? 0x0e : 0x8e;
return write_block(&rig->state.rigport, (char *) cmd, YAESU_CMD_LENGTH);
#endif
}
int ft980_set_split_freq(RIG *rig, vfo_t vfo, freq_t freq)
{
return -RIG_ENIMPL;
}
int ft980_set_split_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width)
{
return -RIG_ENIMPL;
}
int ft980_set_mem(RIG *rig, vfo_t vfo, int ch)
{
unsigned char cmd[YAESU_CMD_LENGTH] = { 0x00, 0x00, 0x00, 0x00, 0x0A };
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
if (ch >= 16 || ch < 1)
{
return -RIG_EINVAL;
}
cmd[3] = ch - 1;
return ft980_transaction(rig, cmd, UPDATE_DATA_OFS(&priv->update_data, 22), 22);
}
int ft980_get_mem(RIG *rig, vfo_t vfo, int *ch)
{
struct ft980_priv_data *priv = (struct ft980_priv_data *)rig->state.priv;
int retval;
retval = ft980_get_status_data(rig);
if (retval != RIG_OK)
{
return retval;
}
*ch = priv->update_data.MEM_CH_SW + 1;
return RIG_OK;
}