mirror
/
Hamlib
kopia lustrzana https://github.com/Hamlib/Hamlib
1
0
Forkuj 0
Kod Zgłoszenia Projekty Wydania Wiki Aktywność
Hamlib/rigs/yaesu/ft991.c

1158 wiersze
34 KiB
C
Czysty Wina Historia

/*
* hamlib - (C) Frank Singleton 2000 (javabear at users.sourceforge.net)
*
* ft991.c - (C) Nate Bargmann 2007 (n0nb at arrl.net)
* (C) Stephane Fillod 2008
* (C) Terry Embry 2008-2009
* (C) Michael Black W9MDB 2015 -- taken from ft950.c
*
* The FT991 is very much like the FT950 except freq max increases for 440MHz
* So most of this code is a duplicate of the FT950
*
* This shared library provides an API for communicating
* via serial interface to an FT-991 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
*
*/
#include <hamlib/config.h>
#include <stdlib.h>
#include <string.h>
#include "hamlib/rig.h"
#include "misc.h"
#include "newcat.h"
#include "ft991.h"
#include "idx_builtin.h"
/* Prototypes */
static int ft991_init(RIG *rig);
static int ft991_set_vfo(RIG *rig, vfo_t vfo);
static int ft991_get_vfo(RIG *rig, vfo_t *vfo);
static int ft991_get_split_mode(RIG *rig, vfo_t vfo, rmode_t *tx_mode,
pbwidth_t *tx_width);
static int ft991_set_split_mode(RIG *rig, vfo_t vfo, rmode_t tx_mode,
pbwidth_t tx_width);
static int ft991_set_split_freq(RIG *rig, vfo_t vfo, freq_t tx_freq);
static int ft991_get_split_freq(RIG *rig, vfo_t vfo, freq_t *tx_freq);
static void debug_ft991info_data(const ft991info *rdata);
static int ft991_set_ctcss_tone(RIG *rig, vfo_t vfo, tone_t tone);
static int ft991_get_ctcss_tone(RIG *rig, vfo_t vfo, tone_t *tone);
static int ft991_set_dcs_code(RIG *rig, vfo_t vfo, tone_t code);
static int ft991_get_dcs_code(RIG *rig, vfo_t vfo, tone_t *code);
static int ft991_set_ctcss_sql(RIG *rig, vfo_t vfo, tone_t tone);
static int ft991_get_ctcss_sql(RIG *rig, vfo_t vfo, tone_t *tone);
static int ft991_get_dcs_sql(RIG *rig, vfo_t vfo, tone_t *code);
static int ft991_set_dcs_sql(RIG *rig, vfo_t vfo, tone_t code);
const struct confparams ft991_ext_levels[] =
{
{
TOK_KEYER,
"KEYER",
"Keyer",
"Keyer on/off",
NULL,
RIG_CONF_CHECKBUTTON,
},
{
TOK_APF_FREQ,
"APF_FREQ",
"APF frequency",
"Audio peak filter frequency",
NULL,
RIG_CONF_NUMERIC,
{ .n = { .min = -250, .max = 250, .step = 10 } },
},
{
TOK_APF_WIDTH,
"APF_WIDTH",
"APF width",
"Audio peak filter width",
NULL,
RIG_CONF_COMBO,
{ .c = { .combostr = { "Narrow", "Medium", "Wide", NULL } } },
},
{
TOK_CONTOUR,
"CONTOUR",
"Contour",
"Contour on/off",
NULL,
RIG_CONF_CHECKBUTTON,
},
{
TOK_CONTOUR_FREQ,
"CONTOUR_FREQ",
"Contour frequency",
"Contour frequency",
NULL,
RIG_CONF_NUMERIC,
{ .n = { .min = 10, .max = 3200, .step = 1 } },
},
{
TOK_CONTOUR_LEVEL,
"CONTOUR_LEVEL",
"Contour level",
"Contour level (dB)",
NULL,
RIG_CONF_NUMERIC,
{ .n = { .min = -40, .max = 20, .step = 1 } },
},
{
TOK_CONTOUR_WIDTH,
"CONTOUR_WIDTH",
"Contour width",
"Contour width",
NULL,
RIG_CONF_NUMERIC,
{ .n = { .min = 1, .max = 11, .step = 1 } },
},
{ RIG_CONF_END, NULL, }
};
int ft991_ext_tokens[] =
{
TOK_KEYER, TOK_APF_FREQ, TOK_APF_WIDTH,
TOK_CONTOUR, TOK_CONTOUR_FREQ, TOK_CONTOUR_LEVEL, TOK_CONTOUR_WIDTH,
TOK_BACKEND_NONE
};
/*
* FT-991 rig capabilities
*/
const struct rig_caps ft991_caps =
{
RIG_MODEL(RIG_MODEL_FT991),
.model_name = "FT-991",
.mfg_name = "Yaesu",
.version = NEWCAT_VER ".12",
.copyright = "LGPL",
.status = RIG_STATUS_STABLE,
.rig_type = RIG_TYPE_TRANSCEIVER,
.ptt_type = RIG_PTT_RIG,
.dcd_type = RIG_DCD_NONE,
.port_type = RIG_PORT_SERIAL,
.serial_rate_min = 4800, /* Default rate per manual */
.serial_rate_max = 38400,
.serial_data_bits = 8,
.serial_stop_bits = 2, /* Assumed since manual makes no mention */
.serial_parity = RIG_PARITY_NONE,
.serial_handshake = RIG_HANDSHAKE_HARDWARE,
.write_delay = FT991_WRITE_DELAY,
.post_write_delay = FT991_POST_WRITE_DELAY,
.timeout = 2000,
.retry = 3,
.has_get_func = FT991_FUNCS,
.has_set_func = FT991_FUNCS,
.has_get_level = FT991_LEVELS,
.has_set_level = RIG_LEVEL_SET(FT991_LEVELS),
.has_get_parm = RIG_PARM_NONE,
.has_set_parm = RIG_PARM_NONE,
.level_gran = {
// cppcheck-suppress *
[LVL_RAWSTR] = { .min = { .i = 0 }, .max = { .i = 255 } },
[LVL_CWPITCH] = { .min = { .i = 300 }, .max = { .i = 1050 }, .step = { .i = 50 } },
[LVL_KEYSPD] = { .min = { .i = 4 }, .max = { .i = 60 }, .step = { .i = 1 } },
[LVL_NOTCHF] = { .min = { .i = 1 }, .max = { .i = 3200 }, .step = { .i = 10 } },
},
.ctcss_list = common_ctcss_list,
.dcs_list = common_dcs_list,
.preamp = { 10, 20, RIG_DBLST_END, },
.attenuator = { 12, RIG_DBLST_END, },
.max_rit = Hz(9999),
.max_xit = Hz(9999),
.max_ifshift = Hz(1200),
.agc_level_count = 5,
.agc_levels = { RIG_AGC_OFF, RIG_AGC_FAST, RIG_AGC_MEDIUM, RIG_AGC_SLOW, RIG_AGC_AUTO },
.vfo_ops = FT991_VFO_OPS,
.targetable_vfo = RIG_TARGETABLE_FREQ,
.transceive = RIG_TRN_OFF, /* May enable later as the 950 has an Auto Info command */
.bank_qty = 0,
.chan_desc_sz = 0,
.rfpower_meter_cal = FT991_RFPOWER_METER_CAL,
.str_cal = FT991_STR_CAL,
.id_meter_cal = FT991_ID_CAL,
.vd_meter_cal = FT991_VD_CAL,
.comp_meter_cal = FT991_COMP_CAL,
.chan_list = {
{ 1, 99, RIG_MTYPE_MEM, NEWCAT_MEM_CAP },
{ 100, 117, RIG_MTYPE_EDGE, NEWCAT_MEM_CAP }, /* two by two */
RIG_CHAN_END,
},
// Rig only has 1 model
.rx_range_list1 = {
{kHz(30), MHz(56), FT991_ALL_RX_MODES, -1, -1, FT991_VFO_ALL, FT991_ANTS, "Operating"},
{MHz(118), MHz(164), FT991_ALL_RX_MODES, -1, -1, FT991_VFO_ALL, FT991_ANTS, "Operating"},
{MHz(420), MHz(470), FT991_ALL_RX_MODES, -1, -1, FT991_VFO_ALL, FT991_ANTS, "Operating"},
RIG_FRNG_END,
},
.tx_range_list1 = {
{MHz(1.8), MHz(54), FT991_OTHER_TX_MODES, W(5), W(100), FT991_VFO_ALL, FT991_ANTS, "Operating"},
{MHz(1.8), MHz(54), FT991_AM_TX_MODES, W(2), W(25), FT991_VFO_ALL, FT991_ANTS, "Operating"}, /* AM class */
{MHz(144), MHz(148), FT991_OTHER_TX_MODES, W(5), W(50), FT991_VFO_ALL, FT991_ANTS, "Operating"},
{MHz(144), MHz(148), FT991_AM_TX_MODES, W(2), W(25), FT991_VFO_ALL, FT991_ANTS, "Operating"}, /* AM class */
{MHz(430), MHz(450), FT991_OTHER_TX_MODES, W(5), W(50), FT991_VFO_ALL, FT991_ANTS, "Operating"},
{MHz(430), MHz(450), FT991_AM_TX_MODES, W(2), W(25), FT991_VFO_ALL, FT991_ANTS, "Operating"}, /* AM class */
RIG_FRNG_END,
},
.tuning_steps = {
{FT991_SSB_CW_RX_MODES, Hz(10)}, /* Normal */
{FT991_SSB_CW_RX_MODES, Hz(100)}, /* Fast */
{FT991_AM_RX_MODES, Hz(100)}, /* Normal */
{FT991_AM_RX_MODES, kHz(1)}, /* Fast */
{FT991_FM_RX_MODES, Hz(100)}, /* Normal */
{FT991_FM_RX_MODES, kHz(1)}, /* Fast */
RIG_TS_END,
},
/* mode/filter list, .remember = order matters! */
.filters = {
{FT991_RTTY_DATA_RX_MODES, Hz(500)}, /* Normal RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(300)}, /* Narrow RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(3000)}, /* Wide RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(2400)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(2000)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(1700)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(1400)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(1200)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(800)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(450)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(400)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(350)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(250)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(200)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(150)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(100)}, /* RTTY, DATA */
{FT991_RTTY_DATA_RX_MODES, Hz(50)}, /* RTTY, DATA */
{FT991_CW_RX_MODES, Hz(2400)}, /* Normal CW */
{FT991_CW_RX_MODES, Hz(500)}, /* Narrow CW */
{FT991_CW_RX_MODES, Hz(3000)}, /* Wide CW */
{FT991_CW_RX_MODES, Hz(2000)}, /* CW */
{FT991_CW_RX_MODES, Hz(1700)}, /* CW */
{FT991_CW_RX_MODES, Hz(1400)}, /* CW */
{FT991_CW_RX_MODES, Hz(1200)}, /* CW */
{FT991_CW_RX_MODES, Hz(800)}, /* CW */
{FT991_CW_RX_MODES, Hz(450)}, /* CW */
{FT991_CW_RX_MODES, Hz(400)}, /* CW */
{FT991_CW_RX_MODES, Hz(350)}, /* CW */
{FT991_CW_RX_MODES, Hz(300)}, /* CW */
{FT991_CW_RX_MODES, Hz(250)}, /* CW */
{FT991_CW_RX_MODES, Hz(200)}, /* CW */
{FT991_CW_RX_MODES, Hz(150)}, /* CW */
{FT991_CW_RX_MODES, Hz(100)}, /* CW */
{FT991_CW_RX_MODES, Hz(50)}, /* CW */
{RIG_MODE_SSB, Hz(2400)}, /* Normal SSB */
{RIG_MODE_SSB, Hz(1500)}, /* Narrow SSB */
{RIG_MODE_SSB, Hz(3200)}, /* Wide SSB */
{RIG_MODE_SSB, Hz(3000)}, /* SSB */
{RIG_MODE_SSB, Hz(2900)}, /* SSB */
{RIG_MODE_SSB, Hz(2800)}, /* SSB */
{RIG_MODE_SSB, Hz(2700)}, /* SSB */
{RIG_MODE_SSB, Hz(2600)}, /* SSB */
{RIG_MODE_SSB, Hz(2500)}, /* SSB */
{RIG_MODE_SSB, Hz(2300)}, /* SSB */
{RIG_MODE_SSB, Hz(2200)}, /* SSB */
{RIG_MODE_SSB, Hz(2100)}, /* SSB */
{RIG_MODE_SSB, Hz(1950)}, /* SSB */
{RIG_MODE_SSB, Hz(1650)}, /* SSB */
{RIG_MODE_SSB, Hz(1350)}, /* SSB */
{RIG_MODE_SSB, Hz(1100)}, /* SSB */
{RIG_MODE_SSB, Hz(850)}, /* SSB */
{RIG_MODE_SSB, Hz(600)}, /* SSB */
{RIG_MODE_SSB, Hz(400)}, /* SSB */
{RIG_MODE_SSB, Hz(200)}, /* SSB */
{RIG_MODE_AM, Hz(9000)}, /* Normal AM */
{RIG_MODE_AMN, Hz(6000)}, /* Narrow AM */
{FT991_FM_WIDE_RX_MODES, Hz(16000)}, /* Normal FM, PKTFM, C4FM */
{RIG_MODE_FMN, Hz(9000)}, /* Narrow FM */
RIG_FLT_END,
},
.ext_tokens = ft991_ext_tokens,
.extlevels = ft991_ext_levels,
.priv = NULL, /* private data FIXME: */
.rig_init = ft991_init,
.rig_cleanup = newcat_cleanup,
.rig_open = newcat_open, /* port opened */
.rig_close = newcat_close, /* port closed */
.set_freq = newcat_set_freq,
.get_freq = newcat_get_freq,
.set_mode = newcat_set_mode,
.get_mode = newcat_get_mode,
.set_vfo = ft991_set_vfo,
.get_vfo = ft991_get_vfo,
.set_ptt = newcat_set_ptt,
.get_ptt = newcat_get_ptt,
.set_split_vfo = newcat_set_split_vfo,
.get_split_vfo = newcat_get_split_vfo,
.set_split_freq = ft991_set_split_freq,
.get_split_freq = ft991_get_split_freq,
.get_split_mode = ft991_get_split_mode,
.set_split_mode = ft991_set_split_mode,
.set_rit = newcat_set_rit,
.get_rit = newcat_get_rit,
.set_xit = newcat_set_xit,
.get_xit = newcat_get_xit,
.get_func = newcat_get_func,
.set_func = newcat_set_func,
.get_level = newcat_get_level,
.set_level = newcat_set_level,
.get_mem = newcat_get_mem,
.set_mem = newcat_set_mem,
.vfo_op = newcat_vfo_op,
.get_info = newcat_get_info,
.power2mW = newcat_power2mW,
.mW2power = newcat_mW2power,
.set_rptr_shift = newcat_set_rptr_shift,
.get_rptr_shift = newcat_get_rptr_shift,
.set_rptr_offs = newcat_set_rptr_offs,
.get_rptr_offs = newcat_get_rptr_offs,
.set_ctcss_tone = ft991_set_ctcss_tone,
.get_ctcss_tone = ft991_get_ctcss_tone,
.set_dcs_code = ft991_set_dcs_code,
.get_dcs_code = ft991_get_dcs_code,
.set_ctcss_sql = ft991_set_ctcss_sql,
.get_ctcss_sql = ft991_get_ctcss_sql,
.set_dcs_sql = ft991_set_dcs_sql,
.get_dcs_sql = ft991_get_dcs_sql,
.set_powerstat = newcat_set_powerstat,
.get_powerstat = newcat_get_powerstat,
.set_ts = newcat_set_ts,
.get_ts = newcat_get_ts,
.set_trn = newcat_set_trn,
.get_trn = newcat_get_trn,
.set_channel = newcat_set_channel,
.get_channel = newcat_get_channel,
.set_ext_level = newcat_set_ext_level,
.get_ext_level = newcat_get_ext_level,
.send_morse = newcat_send_morse,
.wait_morse = rig_wait_morse,
.send_voice_mem = newcat_send_voice_mem,
.set_clock = newcat_set_clock,
.get_clock = newcat_get_clock,
.hamlib_check_rig_caps = HAMLIB_CHECK_RIG_CAPS
};
static int
ft991_get_tx_split(RIG *rig, split_t *in_split)
{
vfo_t cur_tx_vfo;
int rval;
rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __func__);
if (!rig || !in_split)
{
return (-RIG_EINVAL);
}
rval = newcat_get_tx_vfo(rig, &cur_tx_vfo);
if (rval != RIG_OK)
{
return (rval);
}
if (cur_tx_vfo == RIG_VFO_B || cur_tx_vfo == RIG_VFO_MEM)
{
*in_split = RIG_SPLIT_ON;
}
else if (cur_tx_vfo == RIG_VFO_A)
{
*in_split = RIG_SPLIT_OFF;
}
else
{
return (-RIG_EINVAL);
}
return (rval);
}
int
ft991_set_split_freq(RIG *rig, vfo_t vfo, freq_t tx_freq)
{
int rval;
split_t is_split;
rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __func__);
rval = ft991_get_tx_split(rig, &is_split);
if (rval != RIG_OK)
{
return (rval);
}
if (rig->state.cache.freqMainB == tx_freq)
{
rig_debug(RIG_DEBUG_TRACE, "%s: freq %.0f already set on VFOB\n", __func__,
tx_freq);
return RIG_OK;
}
if (is_split == RIG_SPLIT_OFF)
{
rval = newcat_set_tx_vfo(rig, RIG_VFO_B);
if (rval != RIG_OK)
{
return (rval);
}
}
rval = newcat_set_freq(rig, RIG_VFO_B, tx_freq);
rig_debug(RIG_DEBUG_VERBOSE,
"%s newcat_set_freq() rval = %d freq = %f\n",
__func__, rval, tx_freq);
return (rval);
}
int
ft991_get_split_freq(RIG *rig, vfo_t vfo, freq_t *tx_freq)
{
int rval;
split_t is_split;
rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __func__);
rval = ft991_get_tx_split(rig, &is_split);
if (rval != RIG_OK)
{
return (rval);
}
if (is_split == RIG_SPLIT_OFF)
{
*tx_freq = 0.0;
return (rval);
}
rval = newcat_get_freq(rig, RIG_VFO_B, tx_freq);
rig_debug(RIG_DEBUG_VERBOSE,
"%s newcat_get_freq() rval = %d freq = %f\n",
__func__, rval, *tx_freq);
return (rval);
}
/*
* rig_get_split_mode*
*
* Get the '991 split TX mode
*
* Parameter | Type | Accepted/expected values
* ------------------------------------------------------------------
* *rig | input | pointer to private data
* vfo | input | currVFO, VFOA, VFOB, MEM
* *tx_mode | output | supported modes
* *tx_width | output | supported widths
* ------------------------------------------------------------------
* Returns RIG_OK on success or an error code on failure
*
* Comments: Checks to see if the 991 is in split mode, if so it
* checks which VFO is set for TX and then gets the
* mode and passband of that VFO and stores it into *tx_mode
* and tx_width respectively. If not in split mode returns
* RIG_MODE_NONE and 0 Hz.
*
*/
static int ft991_get_split_mode(RIG *rig, vfo_t vfo, rmode_t *tx_mode,
pbwidth_t *tx_width)
{
struct newcat_priv_data *priv;
int err;
ft991info *rdata;
rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __func__);
if (!rig || !tx_mode || !tx_width)
{
return -RIG_EINVAL;
}
priv = (struct newcat_priv_data *)rig->state.priv;
rdata = (ft991info *)priv->ret_data;
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "OI;");
if (RIG_OK != (err = newcat_get_cmd(rig)))
{
return err;
}
debug_ft991info_data(rdata);
*tx_mode = newcat_rmode(rdata->mode);
rig_debug(RIG_DEBUG_VERBOSE, "%s opposite mode %s\n", __func__,
rig_strrmode(*tx_mode));
*tx_width = RIG_PASSBAND_NORMAL;
return RIG_OK;
}
static void debug_ft991info_data(const ft991info *rdata)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s command %2.2s\n",
__func__, rdata->command);
rig_debug(RIG_DEBUG_VERBOSE, "%s memory_ch %3.3s\n",
__func__, rdata->memory_ch);
rig_debug(RIG_DEBUG_VERBOSE, "%s vfo_freq %9.9s\n",
__func__, rdata->vfo_freq);
rig_debug(RIG_DEBUG_VERBOSE, "%s clarifier %5.5s\n",
__func__, rdata->clarifier);
rig_debug(RIG_DEBUG_VERBOSE, "%s rx_clarifier %c\n",
__func__, rdata->rx_clarifier);
rig_debug(RIG_DEBUG_VERBOSE, "%s tx_clarifier %c\n",
__func__, rdata->tx_clarifier);
rig_debug(RIG_DEBUG_VERBOSE, "%s mode %c\n",
__func__, rdata->mode);
rig_debug(RIG_DEBUG_VERBOSE, "%s vfo_memory %c\n",
__func__, rdata->vfo_memory);
rig_debug(RIG_DEBUG_VERBOSE, "%s tone_mode %c\n",
__func__, rdata->tone_mode);
rig_debug(RIG_DEBUG_VERBOSE, "%s fixed %2.2s\n",
__func__, rdata->fixed);
rig_debug(RIG_DEBUG_VERBOSE, "%s repeater_offset %c\n",
__func__, rdata->repeater_offset);
rig_debug(RIG_DEBUG_VERBOSE, "%s terminator %c\n",
__func__, rdata->terminator);
}
/*
* rig_set_split_mode
*
* Set the '991 split TX mode
*
* Parameter | Type | Accepted/expected values
* ------------------------------------------------------------------
* *rig | input | pointer to private data
* vfo | input | currVFO, VFOA, VFOB, MEM
* tx_mode | input | supported modes
* tx_width | input | supported widths
* ------------------------------------------------------------------
* Returns RIG_OK on success or an error code on failure
*
* Comments: Pass band is not set here nor does it make sense as the
* FT991 cannot receive on VFO B. The FT991 cannot set
* VFO B mode directly so we'll just set A and swap A
* into B but we must preserve the VFO A mode and VFO B
* frequency.
*
*/
static int ft991_set_split_mode(RIG *rig, vfo_t vfo, rmode_t tx_mode,
pbwidth_t tx_width)
{
struct newcat_priv_data *priv;
struct rig_state *state;
int err;
char restore_commands[NEWCAT_DATA_LEN];
split_t is_split;
rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __func__);
if (!rig)
{
return -RIG_EINVAL;
}
if (rig->state.cache.modeMainB == tx_mode)
{
rig_debug(RIG_DEBUG_TRACE, "%s: mode %s already set on VFOB\n", __func__,
rig_strrmode(tx_mode));
return RIG_OK;
}
err = ft991_get_tx_split(rig, &is_split);
if (err != RIG_OK)
{
return (err);
}
if (is_split == RIG_SPLIT_ON)
{
err = newcat_set_tx_vfo(rig, RIG_VFO_B);
if (err != RIG_OK)
{
return (err);
}
}
state = &rig->state;
rig_debug(RIG_DEBUG_TRACE, "%s: passed vfo = %s\n", __func__,
rig_strvfo(vfo));
rig_debug(RIG_DEBUG_TRACE, "%s: passed mode = %s\n", __func__,
rig_strrmode(tx_mode));
rig_debug(RIG_DEBUG_TRACE, "%s: passed width = %d Hz\n", __func__,
(int)tx_width);
priv = (struct newcat_priv_data *)state->priv;
/* append VFO A mode restore command first as we want to minimize
any Rx glitches */
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "MD0;");
rig_debug(RIG_DEBUG_TRACE, "cmd_str = %s\n", priv->cmd_str);
if (RIG_OK != (err = newcat_get_cmd(rig)))
{
return err;
}
SNPRINTF(restore_commands, sizeof(restore_commands), "AB;%.*s",
(int)sizeof(restore_commands) - 4, priv->ret_data);
/* append VFO B frequency restore command */
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "FB;");
rig_debug(RIG_DEBUG_TRACE, "cmd_str = %s\n", priv->cmd_str);
if (RIG_OK != (err = newcat_get_cmd(rig)))
{
return err;
}
strncat(restore_commands, priv->ret_data,
NEWCAT_DATA_LEN - strlen(restore_commands));
/* Change mode on VFOA */
if (RIG_OK != (err = newcat_set_mode(rig, RIG_VFO_A, tx_mode,
RIG_PASSBAND_NOCHANGE)))
{
return err;
}
/* Send the copy VFO A to VFO B and restore commands */
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "%s", restore_commands);
return newcat_set_cmd(rig);
}
static int ft991_init(RIG *rig)
{
int ret;
rig_debug(RIG_DEBUG_VERBOSE, "%s called, version %s\n", __func__,
rig->caps->version);
ret = newcat_init(rig);
if (ret != RIG_OK) { return ret; }
rig->state.current_vfo = RIG_VFO_A;
return RIG_OK;
}
static int ft991_find_current_vfo(RIG *rig, vfo_t *vfo, tone_t *enc_dec_mode,
rmode_t *mode)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
ft991info *info = (ft991info *)priv->ret_data;
int err;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "IF;");
/* Get info */
if (RIG_OK != (err = newcat_get_cmd(rig)))
{
return err;
}
debug_ft991info_data(info);
if (enc_dec_mode != NULL)
{
*enc_dec_mode = info->tone_mode;
}
if (mode != NULL)
{
*mode = newcat_rmode(info->mode);
}
switch (info->vfo_memory)
{
case '1': // Memory
case '2': // Memory Tune
case '3': // Quick Memory
case '4': // Quick Memory Tune
*vfo = RIG_VFO_MEM;
break;
case '0': // VFO
*vfo = RIG_VFO_A;
break;
default:
rig_debug(RIG_DEBUG_BUG, "%s: unexpected vfo returned 0x%X\n",
__func__, info->vfo_memory);
return -RIG_EINTERNAL;
}
return RIG_OK;
}
static int ft991_get_enabled_ctcss_dcs_mode(RIG *rig)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int err;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CT0;");
/* Get enabled mode */
if (RIG_OK != (err = newcat_get_cmd(rig)))
{
return err;
}
return priv->ret_data[3];
}
static int ft991_set_ctcss_tone(RIG *rig, vfo_t vfo, tone_t tone)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int i;
ncboolean tone_match;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
for (i = 0, tone_match = FALSE; rig->caps->ctcss_list[i] != 0; i++)
{
if (tone == rig->caps->ctcss_list[i])
{
tone_match = TRUE;
break;
}
}
rig_debug(RIG_DEBUG_TRACE, "%s: tone = %u, tone_match = %d, i = %d\n",
__func__, tone, tone_match, i);
if (tone_match == FALSE && tone != 0)
{
return -RIG_EINVAL;
}
if (tone == 0) /* turn off ctcss */
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CT00;");
}
else
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN00%3.3d;CT02;", i);
}
return newcat_set_cmd(rig);
}
static int ft991_get_ctcss_tone(RIG *rig, vfo_t vfo, tone_t *tone)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int ret;
int t;
int ret_data_len;
tone_t enc_dec_mode;
rmode_t rmode;
char *retlvl;
rig_debug(RIG_DEBUG_TRACE, "%s called with vfo %s\n",
__func__, rig_strvfo(vfo));
*tone = 0;
ret = ft991_find_current_vfo(rig, &vfo, &enc_dec_mode, &rmode);
if (ret < 0)
{
return ret;
}
rig_debug(RIG_DEBUG_TRACE, "%s current vfo is %s\n",
__func__, rig_strvfo(vfo));
if (rmode != RIG_MODE_FM && rmode != RIG_MODE_FMN && rmode != RIG_MODE_C4FM)
{
return RIG_OK;
}
if ((enc_dec_mode == '0') || // CTCSS and DCS Disabled
(enc_dec_mode == '3') || // DCS Encode and Decode Enabled
(enc_dec_mode == '4')) // DCS Encode only
{
return RIG_OK; // Any of the above not CTCSS return 0
}
/* Get CTCSS TONE */
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN00;");
if (RIG_OK != (ret = newcat_get_cmd(rig)))
{
return ret;
}
ret_data_len = strlen(priv->ret_data);
/* skip command */
retlvl = priv->ret_data + strlen(priv->cmd_str) - 1;
/* chop term */
priv->ret_data[ret_data_len - 1] = '\0';
t = atoi(retlvl); /* tone index */
rig_debug(RIG_DEBUG_TRACE, "%s ctcss code %d\n", __func__, t);
if (t < 0 || t > 49)
{
return -RIG_EINVAL;
}
*tone = rig->caps->ctcss_list[t];
return RIG_OK;
}
static int ft991_set_ctcss_sql(RIG *rig, vfo_t vfo, tone_t tone)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int err;
rmode_t rmode;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
err = ft991_find_current_vfo(rig, &vfo, NULL, &rmode);
if (err != RIG_OK)
{
return err;
}
if (rmode != RIG_MODE_FM && rmode != RIG_MODE_FMN && rmode != RIG_MODE_C4FM)
{
return -RIG_EINVAL; // Invalid mode for setting ctcss
}
if (tone == 0)
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CT00;");
}
else
{
int i;
ncboolean tone_match;
for (i = 0, tone_match = FALSE; rig->caps->ctcss_list[i] != 0; i++)
{
if (tone == rig->caps->ctcss_list[i])
{
tone_match = TRUE;
break;
}
}
if (tone_match == FALSE)
{
return -RIG_EINVAL; // Tone not on the list
}
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN0%3.3d;CT01;", i);
}
return newcat_set_cmd(rig);
}
static int ft991_get_ctcss_sql(RIG *rig, vfo_t vfo, tone_t *tone)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int ret;
int t;
int ret_data_len;
char *retlvl;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
*tone = 0;
ret = ft991_get_enabled_ctcss_dcs_mode(rig);
if (ret < 0)
{
return ret;
}
if (ret != '1') // If not CTCSS Encode and Decode return tone of zero.
{
return RIG_OK;
}
/* Get CTCSS TONE */
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN00;");
if (RIG_OK != (ret = newcat_get_cmd(rig)))
{
return ret;
}
ret_data_len = strlen(priv->ret_data);
/* skip command */
retlvl = priv->ret_data + strlen(priv->cmd_str) - 1;
/* chop term */
priv->ret_data[ret_data_len - 1] = '\0';
t = atoi(retlvl); /* tone index */
rig_debug(RIG_DEBUG_TRACE, "%s ctcss code %d\n", __func__, t);
if (t < 0 || t > 49)
{
return -RIG_EINVAL;
}
*tone = rig->caps->ctcss_list[t];
return RIG_OK;
}
static int ft991_get_dcs_code(RIG *rig, vfo_t vfo, tone_t *code)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int err;
int t;
tone_t enc_dec_mode;
rmode_t rmode;
int ret_data_len;
char *retlvl;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
*code = 0;
err = ft991_find_current_vfo(rig, &vfo, &enc_dec_mode, &rmode);
if (err < 0)
{
return err;
}
rig_debug(RIG_DEBUG_TRACE, "%s current vfo is %s\n",
__func__, rig_strvfo(vfo));
if (rmode != RIG_MODE_FM && rmode != RIG_MODE_FMN && rmode != RIG_MODE_C4FM)
{
return RIG_OK;
}
if ((enc_dec_mode == '0') || // Encode off
(enc_dec_mode == '1') || // CTCSS Encode and Decode
(enc_dec_mode == '2')) // CTCSS Encode Only
{
return RIG_OK; // Any of the above not DCS return 0
}
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN01;");
/* Get DCS code */
if (RIG_OK != (err = newcat_get_cmd(rig)))
{
return err;
}
ret_data_len = strlen(priv->ret_data);
/* skip command */
retlvl = priv->ret_data + strlen(priv->cmd_str) - 1;
/* chop term */
priv->ret_data[ret_data_len - 1] = '\0';
t = atoi(retlvl); /* code index */
if (t < 0 || t > 103)
{
return -RIG_EINVAL;
}
*code = rig->caps->dcs_list[t];
rig_debug(RIG_DEBUG_TRACE, "%s dcs code %u\n", __func__, *code);
return RIG_OK;
}
static int ft991_set_dcs_code(RIG *rig, vfo_t vfo, tone_t code)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int i;
ncboolean code_match;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
for (i = 0, code_match = FALSE; rig->caps->dcs_list[i] != 0; i++)
{
if (code == rig->caps->dcs_list[i])
{
code_match = TRUE;
break;
}
}
rig_debug(RIG_DEBUG_TRACE, "%s: code = %u, code_match = %d, i = %d\n",
__func__, code, code_match, i);
if (code_match == FALSE && code != 0)
{
return -RIG_EINVAL;
}
if (code == 0) /* turn off dcs */
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CT00;");
}
else
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN01%3.3d;CT04;", i);
}
return newcat_set_cmd(rig);
}
static int ft991_set_dcs_sql(RIG *rig, vfo_t vfo, tone_t code)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int i;
ncboolean code_match;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
for (i = 0, code_match = FALSE; rig->caps->dcs_list[i] != 0; i++)
{
if (code == rig->caps->dcs_list[i])
{
code_match = TRUE;
break;
}
}
rig_debug(RIG_DEBUG_TRACE, "%s: code = %u, code_match = %d, i = %d\n",
__func__, code, code_match, i);
if (code_match == FALSE && code != 0)
{
return -RIG_EINVAL;
}
if (code == 0) /* turn off dcs */
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CT00;");
}
else
{
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN01%3.3d;CT03;", i);
}
return newcat_set_cmd(rig);
}
static int ft991_get_dcs_sql(RIG *rig, vfo_t vfo, tone_t *code)
{
struct newcat_priv_data *priv = (struct newcat_priv_data *)rig->state.priv;
int codeindex;
int ret;
int ret_data_len;
char *retlvl;
rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__);
*code = 0;
ret = ft991_get_enabled_ctcss_dcs_mode(rig);
if (ret < 0)
{
return ret;
}
if (ret != '3')
{
return RIG_OK; // If not DCS Encode and Decode return zero.
}
/* Get DCS CODE */
SNPRINTF(priv->cmd_str, sizeof(priv->cmd_str), "CN01;");
if (RIG_OK != (ret = newcat_get_cmd(rig)))
{
return ret;
}
ret_data_len = strlen(priv->ret_data);
/* skip command */
retlvl = priv->ret_data + strlen(priv->cmd_str) - 1;
/* chop term */
priv->ret_data[ret_data_len - 1] = '\0';
codeindex = atoi(retlvl); /* code index */
rig_debug(RIG_DEBUG_TRACE, "%s dcs code %d\n", __func__, codeindex);
if (codeindex < 0 || codeindex > 103)
{
return -RIG_EINVAL;
}
*code = rig->caps->dcs_list[codeindex];
return RIG_OK;
}
// VFO functions so rigctld can be used without --vfo argument
static int ft991_set_vfo(RIG *rig, vfo_t vfo)
{
rig->state.current_vfo = vfo;
RETURNFUNC2(RIG_OK);
}
static int ft991_get_vfo(RIG *rig, vfo_t *vfo)
{
*vfo = rig->state.current_vfo;
RETURNFUNC2(RIG_OK);
}
Reference in New Issue View Git Blame Kopiuj bezpośredni odnośnik