kopia lustrzana https://github.com/Hamlib/Hamlib
Initial release - clone from thg71
git-svn-id: https://hamlib.svn.sourceforge.net/svnroot/hamlib/trunk@1705 7ae35d74-ebe9-4afe-98af-79ac388436b8Hamlib-1.2.1
Stéphane Fillod, F8CFE
rodzic
c2aea00644
commit
637c51cb58
|
|
@ -3,7 +3,7 @@ TSSRCLIST = ts850.c ts870s.c ts570.c ts450s.c ts440.c ts950.c ts50s.c \
|
|||
ts790.c ts2000.c k2.c ts930.c \
|
||||
ts680.c ts690.c ts940.c ts711.c ts811.c ts140.c
|
||||
|
||||
THSRCLIST = thd7.c thf7.c thg71.c tmd700.c
|
||||
THSRCLIST = thd7.c thf7.c thg71.c tmd700.c tmv7.c
|
||||
|
||||
lib_LTLIBRARIES = hamlib-kenwood.la
|
||||
hamlib_kenwood_la_SOURCES = $(TSSRCLIST) $(THSRCLIST) kenwood.c th.c
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
* Hamlib Kenwood backend - main file
|
||||
* Copyright (c) 2000-2004 by Stephane Fillod and others
|
||||
*
|
||||
* $Id: kenwood.c,v 1.73 2004-02-14 16:50:53 f4dwv Exp $
|
||||
* $Id: kenwood.c,v 1.74 2004-03-20 10:23:43 fillods Exp $
|
||||
*
|
||||
* This library is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Library General Public License as
|
||||
|
|
@ -92,6 +92,7 @@ static const struct kenwood_id_string kenwood_id_string_list[] = {
|
|||
{ RIG_MODEL_THD7A, "TH-D7" },
|
||||
{ RIG_MODEL_THD7AG, "TH-D7G" },
|
||||
{ RIG_MODEL_TMD700, "TM-D700" },
|
||||
{ RIG_MODEL_TMV7, "TM-V7" },
|
||||
{ RIG_MODEL_THF6A, "TH-F6" },
|
||||
{ RIG_MODEL_THF7E, "TH-F7" },
|
||||
{ RIG_MODEL_THG71, "TH-G71" },
|
||||
|
|
@ -1561,6 +1562,7 @@ DECLARE_INITRIG_BACKEND(kenwood)
|
|||
rig_register(&thd7a_caps);
|
||||
rig_register(&thf7e_caps);
|
||||
rig_register(&thg71_caps);
|
||||
rig_register(&tmv7_caps);
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
* Hamlib Kenwood backend - main header
|
||||
* Copyright (c) 2000-2004 by Stephane Fillod
|
||||
*
|
||||
* $Id: kenwood.h,v 1.34 2004-02-14 16:50:54 f4dwv Exp $
|
||||
* $Id: kenwood.h,v 1.35 2004-03-20 10:23:43 fillods Exp $
|
||||
*
|
||||
* This library is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Library General Public License as
|
||||
|
|
@ -103,6 +103,7 @@ extern const struct rig_caps tmd700_caps;
|
|||
extern const struct rig_caps thf7a_caps;
|
||||
extern const struct rig_caps thf7e_caps;
|
||||
extern const struct rig_caps thg71_caps;
|
||||
extern const struct rig_caps tmv7_caps;
|
||||
extern const struct rig_caps k2_caps;
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -0,0 +1,686 @@
|
|||
/*
|
||||
* Hamlib Kenwood backend - TM-V7 description
|
||||
* Copyright (c) 2004 by Stephane Fillod
|
||||
*
|
||||
* $Id: tmv7.c,v 1.1 2004-03-20 10:23:43 fillods Exp $
|
||||
*
|
||||
* This library is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Library General Public License as
|
||||
* published by the Free Software Foundation; either version 2 of
|
||||
* the License, or (at your option) any later version.
|
||||
*
|
||||
* This program 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 Library General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Library General Public
|
||||
* License along with this library; if not, write to the Free Software
|
||||
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
||||
*
|
||||
*/
|
||||
|
||||
#ifdef HAVE_CONFIG_H
|
||||
#include "config.h"
|
||||
#endif
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h> /* String function definitions */
|
||||
#include <unistd.h> /* UNIX standard function definitions */
|
||||
|
||||
#include <hamlib/rig.h>
|
||||
#include "idx_builtin.h"
|
||||
#include "kenwood.h"
|
||||
#include "th.h"
|
||||
|
||||
#if 1
|
||||
#define RIG_ASSERT(x) if (!(x)) { rig_debug(RIG_DEBUG_ERR, "Assertion failed on line %i\n",__LINE__); abort(); }
|
||||
#else
|
||||
#define RIG_ASSERT(x)
|
||||
#endif
|
||||
|
||||
#define TMV7_FUNC_ALL (\
|
||||
RIG_FUNC_TBURST \
|
||||
)
|
||||
|
||||
#define TMV7_LEVEL_ALL (\
|
||||
RIG_LEVEL_RAWSTR| \
|
||||
RIG_LEVEL_SQL| \
|
||||
RIG_LEVEL_RFPOWER\
|
||||
)
|
||||
|
||||
#ifndef RIG_TONEMAX
|
||||
#define RIG_TONEMAX 38
|
||||
#endif
|
||||
|
||||
#define TMV7_CHANNEL_CAPS \
|
||||
.freq=1,\
|
||||
.tx_freq=1,\
|
||||
.mode=1,\
|
||||
.width=1,\
|
||||
.tuning_step=1,\
|
||||
.rptr_shift=1,\
|
||||
.rptr_offs=1,\
|
||||
.ctcss_tone=1,\
|
||||
.ctcss_sql=1,\
|
||||
.channel_desc=1
|
||||
|
||||
|
||||
#define RIG_VFO_A_OP (RIG_OP_UP|RIG_OP_DOWN)
|
||||
|
||||
#define ACKBUF_LEN 128
|
||||
|
||||
const struct kenwood_priv_caps tmv7_priv_caps = {
|
||||
.cmdtrm = EOM_TH, /* Command termination character */
|
||||
};
|
||||
#define EOM EOM_TH
|
||||
|
||||
|
||||
/* tmv7 procs */
|
||||
int tmv7_open(RIG *rig);
|
||||
int tmv7_decode_event (RIG *rig);
|
||||
int tmv7_set_freq (RIG *rig, vfo_t vfo, freq_t freq);
|
||||
int tmv7_get_mode (RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width);
|
||||
int tmv7_set_vfo (RIG *rig, vfo_t vfo);
|
||||
int tmv7_get_vfo (RIG *rig, vfo_t *vfo);
|
||||
int tmv7_set_func(RIG *rig, vfo_t vfo, setting_t func, int status);
|
||||
int tmv7_get_channel(RIG *rig, channel_t *chan);
|
||||
int tmv7_set_channel(RIG *rig, const channel_t *chan);
|
||||
|
||||
/*
|
||||
* tm-v7 rig capabilities.
|
||||
*/
|
||||
const struct rig_caps tmv7_caps = {
|
||||
.rig_model = RIG_MODEL_TMV7,
|
||||
.model_name = "TM-V7",
|
||||
.mfg_name = "Kenwood",
|
||||
.version = "0.1",
|
||||
.copyright = "LGPL",
|
||||
.status = RIG_STATUS_NEW,
|
||||
.rig_type = RIG_TYPE_HANDHELD,
|
||||
.ptt_type = RIG_PTT_RIG,
|
||||
.dcd_type = RIG_DCD_RIG,
|
||||
.port_type = RIG_PORT_SERIAL,
|
||||
.serial_rate_min = 9600,
|
||||
.serial_rate_max = 9600,
|
||||
.serial_data_bits = 8,
|
||||
.serial_stop_bits = 1,
|
||||
.serial_parity = RIG_PARITY_NONE,
|
||||
.serial_handshake = RIG_HANDSHAKE_NONE,
|
||||
.write_delay = 1,
|
||||
.post_write_delay = 0,
|
||||
.timeout = 500,
|
||||
.retry = 3,
|
||||
|
||||
.has_set_func = TMV7_FUNC_ALL,
|
||||
.has_get_level = TMV7_LEVEL_ALL,
|
||||
.has_set_level = RIG_LEVEL_SET(TMV7_LEVEL_ALL),
|
||||
.level_gran = {
|
||||
[LVL_RAWSTR] = { .min = { .i = 0 }, .max = { .i = 5 } },
|
||||
[LVL_SQL] = { .min = { .i = 0 }, .max = { .i = 5 } },
|
||||
},
|
||||
.parm_gran = {},
|
||||
.ctcss_list = kenwood38_ctcss_list,
|
||||
.dcs_list = NULL,
|
||||
.preamp = { RIG_DBLST_END, },
|
||||
.attenuator = { RIG_DBLST_END, },
|
||||
.max_rit = Hz(0),
|
||||
.max_xit = Hz(0),
|
||||
.max_ifshift = Hz(0),
|
||||
.vfo_ops = RIG_VFO_A_OP,
|
||||
.targetable_vfo = RIG_TARGETABLE_NONE,
|
||||
.transceive = RIG_TRN_RIG,
|
||||
.bank_qty = 0,
|
||||
.chan_desc_sz = 6,
|
||||
|
||||
|
||||
.chan_list = {
|
||||
{ 1, 199, RIG_MTYPE_MEM , {TMV7_CHANNEL_CAPS}}, /* normal MEM */
|
||||
{ 200,219, RIG_MTYPE_EDGE , {TMV7_CHANNEL_CAPS}}, /* U/L MEM */
|
||||
{ 220,220, RIG_MTYPE_MEM , {TMV7_CHANNEL_CAPS}}, /* Priority */
|
||||
{ 221,222, RIG_MTYPE_MEM , {TMV7_CHANNEL_CAPS}}, /* Call 0/1 */
|
||||
{ 223,231, RIG_MTYPE_MEM , {TMV7_CHANNEL_CAPS}}, /* Band VFO */
|
||||
RIG_CHAN_END,
|
||||
},
|
||||
|
||||
/* no rx/tx_range_list */
|
||||
/* computed in tmv7_open */
|
||||
|
||||
.tuning_steps = {
|
||||
{RIG_MODE_FM,kHz(5)},
|
||||
{RIG_MODE_FM,kHz(6.25)},
|
||||
{RIG_MODE_FM,kHz(10)},
|
||||
{RIG_MODE_FM,kHz(12.5)},
|
||||
{RIG_MODE_FM,kHz(15)},
|
||||
{RIG_MODE_FM,kHz(20)},
|
||||
{RIG_MODE_FM,kHz(25)},
|
||||
{RIG_MODE_FM,kHz(30)},
|
||||
{RIG_MODE_FM,kHz(50)},
|
||||
{RIG_MODE_FM,kHz(100)},
|
||||
RIG_TS_END,
|
||||
},
|
||||
/* mode/filter list, remember: order matters! */
|
||||
.filters = {
|
||||
{RIG_MODE_FM, kHz(12)},
|
||||
{RIG_MODE_AM, kHz(9)},
|
||||
RIG_FLT_END,
|
||||
},
|
||||
|
||||
.str_cal ={ 2, { {0, -30 }, {5,-13}}}, /* guessed from technical manual */
|
||||
|
||||
.priv = (void *)&tmv7_priv_caps,
|
||||
.rig_init = kenwood_init,
|
||||
.rig_cleanup = kenwood_cleanup,
|
||||
.rig_open = tmv7_open,
|
||||
.rig_close = NULL,
|
||||
|
||||
.set_freq = th_set_freq,
|
||||
.get_freq = th_get_freq,
|
||||
.get_mode = tmv7_get_mode,
|
||||
.set_vfo = tmv7_set_vfo,
|
||||
.get_vfo = tmv7_get_vfo,
|
||||
.set_mem = th_set_mem,
|
||||
.get_mem = th_get_mem,
|
||||
.set_channel = tmv7_set_channel,
|
||||
.get_channel = tmv7_get_channel,
|
||||
.set_trn = th_set_trn,
|
||||
.get_trn = th_get_trn,
|
||||
|
||||
.set_func = tmv7_set_func,
|
||||
.get_level = th_get_level,
|
||||
.set_level = th_set_level,
|
||||
.get_info = th_get_info,
|
||||
.vfo_op = th_vfo_op,
|
||||
.set_ptt = th_set_ptt,
|
||||
.get_dcd=th_get_dcd,
|
||||
.decode_event = tmv7_decode_event,
|
||||
};
|
||||
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_decode_event (RIG *rig)
|
||||
{
|
||||
char asyncbuf[ACKBUF_LEN];
|
||||
int retval, asyncbuf_len = ACKBUF_LEN-1;
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: called\n", __FUNCTION__);
|
||||
|
||||
retval = kenwood_transaction(rig, NULL, 0, asyncbuf, &asyncbuf_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: Decoding message\n", __FUNCTION__);
|
||||
|
||||
if (asyncbuf[0] == 'B' && asyncbuf[1] == 'U' && asyncbuf[2] == 'F') {
|
||||
|
||||
freq_t freq, offset;
|
||||
int step, shift, rev, tone, ctcss, tonefq, ctcssfq;
|
||||
|
||||
retval = sscanf(asyncbuf, "BUF 0,%"FREQFMT",%d,%d,%d,%d,%d,,%d,,%d,%"FREQFMT,
|
||||
&freq, &step, &shift, &rev, &tone,
|
||||
&ctcss, &tonefq, &ctcssfq, &offset);
|
||||
if (retval != 11) {
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unexpected BUF message '%s'\n", __FUNCTION__, asyncbuf);
|
||||
return -RIG_ERJCTED;
|
||||
}
|
||||
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: Buffer (freq %"FREQFMT" Hz, mode %d)\n", __FUNCTION__, freq);
|
||||
|
||||
/* Callback execution */
|
||||
if (rig->callbacks.vfo_event) {
|
||||
rig->callbacks.vfo_event(rig, RIG_VFO_A, rig->callbacks.vfo_arg);
|
||||
}
|
||||
if (rig->callbacks.freq_event) {
|
||||
rig->callbacks.freq_event(rig, RIG_VFO_A, freq, rig->callbacks.freq_arg);
|
||||
}
|
||||
/*
|
||||
if (rig->callbacks.mode_event) {
|
||||
rig->callbacks.mode_event(rig, RIG_VFO_A, mode, RIG_PASSBAND_NORMAL,
|
||||
rig->callbacks.mode_arg);
|
||||
}
|
||||
*/
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
} else if (asyncbuf[0] == 'S' && asyncbuf[1] == 'M') {
|
||||
|
||||
int lev;
|
||||
retval = sscanf(asyncbuf, "SM 0,%d", &lev);
|
||||
if (retval != 2) {
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unexpected SM message '%s'\n", __FUNCTION__, asyncbuf);
|
||||
return -RIG_ERJCTED;
|
||||
}
|
||||
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: Signal strength event - signal = %.3f\n", __FUNCTION__, (float)(lev / 5.0));
|
||||
|
||||
/* Callback execution */
|
||||
#if STILLHAVETOADDCALLBACK
|
||||
if (rig->callbacks.strength_event)
|
||||
rig->callbacks.strength_event(rig, RIG_VFO_0,(float)(lev / 5.0),
|
||||
rig->callbacks.strength_arg);
|
||||
#endif
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
} else if (asyncbuf[0] == 'B' && asyncbuf[1] == 'Y') {
|
||||
|
||||
int busy;
|
||||
|
||||
retval = sscanf(asyncbuf, "BY 0,%d", &busy);
|
||||
if (retval != 2) {
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unexpected BY message '%s'\n", __FUNCTION__, asyncbuf);
|
||||
return -RIG_ERJCTED;
|
||||
}
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: Busy event - status = '%s'\n",
|
||||
__FUNCTION__, (busy == 0) ? "OFF" : "ON" );
|
||||
return -RIG_ENIMPL;
|
||||
/* This event does not have a callback. */
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
} else if (asyncbuf[0] == 'V' && asyncbuf[1] == 'M' && asyncbuf[2] == 'C') {
|
||||
|
||||
vfo_t bandmode;
|
||||
|
||||
retval = sscanf(asyncbuf, "VMC 0,%d", &bandmode);
|
||||
if (retval != 1) {
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unexpected VMC message '%s'\n", __FUNCTION__, asyncbuf);
|
||||
return -RIG_ERJCTED;
|
||||
}
|
||||
|
||||
switch (bandmode) {
|
||||
case 0: bandmode = RIG_VFO_VFO; break;
|
||||
case 2: bandmode = RIG_VFO_MEM; break;
|
||||
/* case 3: bandmode = RIG_VFO_CALL; break; */
|
||||
default: bandmode = RIG_VFO_CURR; break;
|
||||
}
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: Mode of Band event - %d\n", __FUNCTION__, bandmode);
|
||||
|
||||
/* TODO: This event does not have a callback! */
|
||||
return -RIG_ENIMPL;
|
||||
/* --------------------------------------------------------------------- */
|
||||
} else {
|
||||
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unsupported transceive cmd '%s'\n", __FUNCTION__, asyncbuf);
|
||||
return -RIG_ENIMPL;
|
||||
}
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_get_mode (RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width)
|
||||
{
|
||||
char ackbuf[ACKBUF_LEN];
|
||||
int retval,ack_len=ACKBUF_LEN;
|
||||
int step;
|
||||
freq_t freq;
|
||||
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: called\n", __FUNCTION__);
|
||||
|
||||
switch (vfo) {
|
||||
case RIG_VFO_CURR: break;
|
||||
case RIG_VFO_A: break;
|
||||
default:
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unsupported VFO %d\n", __FUNCTION__, vfo);
|
||||
return -RIG_EVFO;
|
||||
}
|
||||
|
||||
/* try to guess from frequency */
|
||||
retval = kenwood_transaction(rig, "FQ"EOM, 3, ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
sscanf(ackbuf,"FQ %"FREQFMT",%d",&freq,&step);
|
||||
|
||||
if(freq <MHz(136) ) {
|
||||
*mode=RIG_MODE_AM;
|
||||
*width=kHz(9);
|
||||
} else {
|
||||
*mode=RIG_MODE_FM;
|
||||
*width=kHz(12);
|
||||
}
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_set_vfo (RIG *rig, vfo_t vfo)
|
||||
{
|
||||
char vfobuf[16], ackbuf[ACKBUF_LEN];
|
||||
int retval,ack_len=ACKBUF_LEN;
|
||||
|
||||
rig_debug(RIG_DEBUG_TRACE, "%s: called\n", __FUNCTION__);
|
||||
|
||||
switch (vfo) {
|
||||
case RIG_VFO_A:
|
||||
case RIG_VFO_VFO:
|
||||
sprintf(vfobuf, "VMC 0,0"EOM);
|
||||
break;
|
||||
case RIG_VFO_MEM:
|
||||
sprintf(vfobuf, "VMC 0,2"EOM);
|
||||
break;
|
||||
default:
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unsupported VFO %d\n", __FUNCTION__, vfo);
|
||||
return -RIG_EVFO;
|
||||
}
|
||||
|
||||
retval = kenwood_transaction(rig, vfobuf, strlen(vfobuf), ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_get_vfo (RIG *rig, vfo_t *vfo)
|
||||
{
|
||||
char ackbuf[ACKBUF_LEN];
|
||||
int retval,ack_len=ACKBUF_LEN;
|
||||
int vch;
|
||||
|
||||
retval = kenwood_transaction(rig, "VMC 0"EOM , 6, ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
sscanf(ackbuf,"VMC 0,%d"EOM,&vch);
|
||||
switch(vch) {
|
||||
case 0:
|
||||
*vfo=RIG_VFO_A;
|
||||
break;
|
||||
case 1:
|
||||
case 2:
|
||||
*vfo=RIG_VFO_MEM;
|
||||
break;
|
||||
default:
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unsupported VFO %d\n", __FUNCTION__, vfo);
|
||||
return -RIG_EVFO;
|
||||
}
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_set_func(RIG *rig, vfo_t vfo, setting_t func, int status)
|
||||
{
|
||||
char ackbuf[ACKBUF_LEN];
|
||||
int retval,ack_len=ACKBUF_LEN;
|
||||
|
||||
if(func != RIG_FUNC_TBURST)
|
||||
return -RIG_EINVAL;
|
||||
|
||||
if(status==1) {
|
||||
retval = kenwood_transaction(rig, "TT"EOM, 3, ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
if(status==0) {
|
||||
return rig_set_ptt(rig,vfo,RIG_PTT_OFF);
|
||||
}
|
||||
return -RIG_EINVAL;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_get_channel(RIG *rig, channel_t *chan)
|
||||
{
|
||||
char membuf[64],ackbuf[ACKBUF_LEN];
|
||||
int retval,ack_len;
|
||||
long long freq,offset;
|
||||
char req[16],scf[128];
|
||||
int step, shift, rev, tone, ctcss, tonefq, ctcssfq;
|
||||
|
||||
if(chan->channel_num<200)
|
||||
sprintf(req,"MR 0,0,%03d",chan->channel_num);
|
||||
else
|
||||
if(chan->channel_num<210) {
|
||||
sprintf(req,"MR 0,0,L%01d",chan->channel_num-200);
|
||||
sprintf(chan->channel_desc,"L%01d",chan->channel_num-200);
|
||||
} else
|
||||
if(chan->channel_num<220) {
|
||||
sprintf(req,"MR 0,0,U%01d",chan->channel_num-210);
|
||||
sprintf(chan->channel_desc,"U%01d",chan->channel_num-210);
|
||||
} else
|
||||
if(chan->channel_num==220) {
|
||||
sprintf(req,"MR 0,0,PR");
|
||||
sprintf(chan->channel_desc,"Pr");
|
||||
} else
|
||||
if(chan->channel_num<223) {
|
||||
sprintf(req,"CR 0,%01d",chan->channel_num-221);
|
||||
if(chan->channel_num==221) sprintf(chan->channel_desc,"Call V");
|
||||
if(chan->channel_num==222) sprintf(chan->channel_desc,"Call U");
|
||||
} else
|
||||
if(chan->channel_num<232) {
|
||||
sprintf(req,"VR %01d",chan->channel_num-222);
|
||||
sprintf(chan->channel_desc,"BAND %01d",chan->channel_num-222);
|
||||
} else
|
||||
return -RIG_EINVAL;
|
||||
|
||||
sprintf(membuf,"%s"EOM,req);
|
||||
ack_len=ACKBUF_LEN;
|
||||
retval = kenwood_transaction(rig, membuf, strlen(membuf), ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
strcpy(scf,req);
|
||||
strcat(scf,",%"FREQFMT",%d,%d,%d,%d,%d,,%d,,%d,%"FREQFMT);
|
||||
retval = sscanf(ackbuf, scf,
|
||||
&freq, &step, &shift, &rev, &tone,
|
||||
&ctcss, &tonefq, &ctcssfq, &offset);
|
||||
|
||||
chan->freq=(freq_t)freq;
|
||||
chan->vfo=RIG_VFO_MEM;
|
||||
chan->tuning_step=rig->state.tuning_steps[step].ts;
|
||||
if(freq <MHz(136) ) {
|
||||
chan->mode=RIG_MODE_AM;
|
||||
chan->width=kHz(9);
|
||||
} else {
|
||||
chan->mode=RIG_MODE_FM;
|
||||
chan->width=kHz(12);
|
||||
}
|
||||
switch(shift) {
|
||||
case 0 :
|
||||
chan->rptr_shift=RIG_RPT_SHIFT_NONE;
|
||||
break;
|
||||
case 1 :
|
||||
chan->rptr_shift=RIG_RPT_SHIFT_PLUS;
|
||||
break;
|
||||
case 2 :
|
||||
chan->rptr_shift=RIG_RPT_SHIFT_MINUS;
|
||||
break;
|
||||
}
|
||||
chan->rptr_offs=offset;
|
||||
|
||||
if(tone)
|
||||
chan->ctcss_tone=rig->caps->ctcss_list[tonefq==1?0:tonefq-2];
|
||||
else
|
||||
chan->ctcss_tone=0;
|
||||
if(ctcss)
|
||||
chan->ctcss_sql=rig->caps->ctcss_list[ctcssfq==1?0:ctcssfq-2];
|
||||
else
|
||||
chan->ctcss_sql=0;
|
||||
|
||||
chan->tx_freq=RIG_FREQ_NONE;
|
||||
if(chan->channel_num<223 && offset==0) {
|
||||
req[5]='1';
|
||||
sprintf(membuf,"%s"EOM,req);
|
||||
ack_len=ACKBUF_LEN;
|
||||
retval = kenwood_transaction(rig, membuf, strlen(membuf), ackbuf, &ack_len);
|
||||
if (retval == RIG_OK) {
|
||||
strcat(req,",%"FREQFMT",%d");
|
||||
retval = sscanf(ackbuf, req, &freq, &step);
|
||||
chan->tx_freq=freq;
|
||||
}
|
||||
}
|
||||
|
||||
if(chan->channel_num<200) {
|
||||
sprintf(membuf,"MNA 0,%03d"EOM,chan->channel_num);
|
||||
ack_len=ACKBUF_LEN;
|
||||
retval = kenwood_transaction(rig, membuf, strlen(membuf), ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
memcpy(chan->channel_desc,&ackbuf[10],7);
|
||||
}
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_set_channel(RIG *rig, const channel_t *chan)
|
||||
{
|
||||
char membuf[ACKBUF_LEN],ackbuf[ACKBUF_LEN];
|
||||
int retval,ack_len;
|
||||
char req[64];
|
||||
long long freq,offset;
|
||||
int chn, step, shift, tone, ctcss, tonefq, ctcssfq;
|
||||
|
||||
chn=chan->channel_num;
|
||||
freq=(long long)chan->freq;
|
||||
|
||||
for(step=0; rig->state.tuning_steps[step].ts!=0;step++)
|
||||
if(chan->tuning_step==rig->state.tuning_steps[step].ts) break;
|
||||
|
||||
switch(chan->rptr_shift) {
|
||||
case RIG_RPT_SHIFT_NONE :
|
||||
shift=0;
|
||||
break;
|
||||
case RIG_RPT_SHIFT_PLUS:
|
||||
shift=1;
|
||||
break;
|
||||
case RIG_RPT_SHIFT_MINUS:
|
||||
shift=2;
|
||||
break;
|
||||
default:
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: not supported shift\n", __FUNCTION__);
|
||||
return -RIG_EINVAL;
|
||||
}
|
||||
offset=chan->rptr_offs;
|
||||
|
||||
if(chan->ctcss_tone==0) {
|
||||
tone=0;tonefq=9;
|
||||
} else {
|
||||
tone=1;
|
||||
for (tonefq = 0; rig->caps->ctcss_list[tonefq] != 0 && tonefq < RIG_TONEMAX; tonefq++) {
|
||||
if (rig->caps->ctcss_list[tonefq] == chan->ctcss_tone)
|
||||
break;
|
||||
}
|
||||
tonefq=tonefq==0?1:tonefq+2;
|
||||
}
|
||||
if(chan->ctcss_sql==0) {
|
||||
ctcss=0;ctcssfq=9;
|
||||
} else {
|
||||
ctcss=1;
|
||||
for (ctcssfq = 0; rig->caps->ctcss_list[ctcssfq] != 0 && ctcssfq < RIG_TONEMAX; ctcssfq++) {
|
||||
if (rig->caps->ctcss_list[ctcssfq] == chan->ctcss_sql)
|
||||
break;
|
||||
}
|
||||
ctcssfq=ctcssfq==0?1:ctcssfq+2;
|
||||
}
|
||||
|
||||
if(chan->channel_num<200)
|
||||
sprintf(req,"MW 0,0,%03d",chan->channel_num);
|
||||
else
|
||||
if(chan->channel_num<210) {
|
||||
sprintf(req,"MW 0,0,L%01d",chan->channel_num-200);
|
||||
} else
|
||||
if(chan->channel_num<220) {
|
||||
sprintf(req,"MW 0,0,U%01d",chan->channel_num-210);
|
||||
} else
|
||||
if(chan->channel_num==220) {
|
||||
sprintf(req,"MW 0,0,PR");
|
||||
} else
|
||||
if(chan->channel_num<223) {
|
||||
sprintf(req,"CW 0,%01d",chan->channel_num-221);
|
||||
} else
|
||||
if(chan->channel_num<232) {
|
||||
sprintf(req,"VW %01d",chan->channel_num-222);
|
||||
} else
|
||||
return -RIG_EINVAL;
|
||||
|
||||
if(chan->channel_num<=220)
|
||||
sprintf(membuf, "%s,%011lld,%01d,%01d,0,%01d,%01d,,%02d,,%02d,%09lld,0"EOM,
|
||||
req,(long long)freq, step, shift, tone,
|
||||
ctcss, tonefq, ctcssfq, (long long)offset);
|
||||
else
|
||||
sprintf(membuf, "%s,%011lld,%01d,%01d,0,%01d,%01d,,%02d,,%02d,%09lld"EOM,
|
||||
req, (long long)freq, step, shift, tone,
|
||||
ctcss, tonefq, ctcssfq, (long long)offset);
|
||||
|
||||
ack_len=ACKBUF_LEN;
|
||||
retval = kenwood_transaction(rig, membuf, strlen(membuf), ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
if(chan->channel_num<223 && chan->tx_freq!=RIG_FREQ_NONE) {
|
||||
req[5]='1';
|
||||
sprintf(membuf, "%s,%011lld,%01d"EOM, req,(long long)chan->tx_freq, step);
|
||||
ack_len=ACKBUF_LEN;
|
||||
retval = kenwood_transaction(rig, membuf, strlen(membuf), ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
}
|
||||
|
||||
if(chan->channel_num<200) {
|
||||
ack_len=ACKBUF_LEN;
|
||||
sprintf(membuf,"MNA 0,%03d,%s"EOM,chan->channel_num,chan->channel_desc);
|
||||
retval = kenwood_transaction(rig, membuf, strlen(membuf), ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
}
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
int tmv7_open(RIG *rig)
|
||||
{
|
||||
char ackbuf[ACKBUF_LEN],*strl,*stru;
|
||||
int retval,i,ack_len=ACKBUF_LEN;
|
||||
const freq_range_t frend=RIG_FRNG_END;
|
||||
|
||||
/* just to be sure it's a THG-71 */
|
||||
retval = kenwood_transaction(rig, "ID"EOM, 3, ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
if (ack_len<9 || strncmp(ackbuf,"ID TM-V7",8)) {
|
||||
rig_debug(RIG_DEBUG_ERR, "%s: Unexpected reply '%s'\n", __FUNCTION__, ackbuf);
|
||||
return -RIG_ERJCTED;
|
||||
}
|
||||
|
||||
/* fill state.rx/tx range_list */
|
||||
ack_len=ACKBUF_LEN;
|
||||
retval = kenwood_transaction(rig, "FL"EOM, 3, ackbuf, &ack_len);
|
||||
if (retval != RIG_OK)
|
||||
return retval;
|
||||
|
||||
strl=strtok(ackbuf," ");
|
||||
for(i=0;i<FRQRANGESIZ;i++) {
|
||||
freq_range_t frng;
|
||||
|
||||
strl=strtok(NULL,",");
|
||||
stru=strtok(NULL,",");
|
||||
if(strl==NULL && stru==NULL)
|
||||
break;
|
||||
frng.start=MHz(atoi(strl));
|
||||
frng.end=MHz(atoi(stru));
|
||||
frng.vfo=RIG_VFO_A;
|
||||
frng.ant=0;
|
||||
if(frng.end<=MHz(135))
|
||||
frng.modes=RIG_MODE_AM;
|
||||
else
|
||||
frng.modes=RIG_MODE_FM;
|
||||
|
||||
frng.high_power=-1;
|
||||
frng.low_power=-1;
|
||||
rig->state.rx_range_list[i]=frng;
|
||||
if(frng.start> MHz(200))
|
||||
frng.high_power=5.5;
|
||||
else
|
||||
frng.high_power=6;
|
||||
frng.low_power=mW(50);
|
||||
rig->state.tx_range_list[i]=frng;
|
||||
}
|
||||
rig->state.rx_range_list[i]= frend;
|
||||
rig->state.tx_range_list[i]= frend;
|
||||
|
||||
return RIG_OK;
|
||||
}
|
||||
|
||||
Ładowanie…
Reference in New Issue