/* * Hamlib Kenwood backend - TH-F7 description * Copyright (c) 2001-2004 by Stephane Fillod * * $Id: thf7.c,v 1.14 2008-05-04 21:27:26 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 #include #include #include "kenwood.h" #include "th.h" #define THF7_MODES_TX (RIG_MODE_FM) #define THF7_HIGH_MODES (RIG_MODE_FM|RIG_MODE_AM|RIG_MODE_WFM) #define THF7_ALL_MODES (THF7_HIGH_MODES|RIG_MODE_SSB|RIG_MODE_CW) #define THF7_FUNC_ALL (RIG_FUNC_TONE|RIG_FUNC_TSQL|RIG_FUNC_TBURST| \ RIG_FUNC_ARO|RIG_FUNC_LOCK|RIG_FUNC_BC) /* * How increadible, there's no RIG_LEVEL_STRENGTH! */ #define THF7_LEVEL_ALL (RIG_LEVEL_SQL|RIG_LEVEL_RFPOWER|RIG_LEVEL_ATT|RIG_LEVEL_BALANCE) #define THF7_PARMS (RIG_PARM_APO|RIG_PARM_BEEP|RIG_PARM_BACKLIGHT|RIG_PARM_KEYLIGHT) #define THF7_VFO_OP (RIG_OP_UP|RIG_OP_DOWN) #define THF7_ANTS (RIG_ANT_1|RIG_ANT_2) /* * TODO: * scan_group can only be get. scan_group=channel_num%50; */ #define THF7_CHANNEL_CAPS \ TH_CHANNEL_CAPS,\ .flags=1, \ .dcs_code=1, \ .dcs_sql=1, #define THF7_CHANNEL_CAPS_WO_LO \ TH_CHANNEL_CAPS,\ .dcs_code=1, \ .dcs_sql=1, /* CTCSS 01..42 */ static const tone_t thf7_ctcss_list[] = { 670, 693, 719, 744, 770, 797, 825, 854, 885, 915, 948, 974, 1000, 1035, 1072, 1109, 1148, 1188, 1230, 1273, 1318, 1365, 1413, 1462, 1514, 1567, 1622, 1679, 1738, 1799, 1862, 1928, 2035, 2065, 2107, 2181, 2257, 2291, 2336, 2418, 2503, 2541, 0 }; /* DCS 0..103 (=104) */ static const tone_t thf7_dcs_list[] = { 23, 25, 26, 31, 32, 36, 43, 47, 51, 53, 54, 65, 71, 72, 73, 74, 114, 115, 116, 122, 125, 131, 132, 134, 143, 145, 152, 155, 156, 162, 165, 172, 174, 205, 212, 223, 225, 226, 243, 244, 245, 246, 251, 252, 255, 261, 263, 265, 266, 271, 274, 306, 311, 315, 325, 331, 332, 343, 346, 351, 356, 364, 365, 371, 411, 412, 413, 423, 431, 432, 445, 446, 452, 454, 455, 462, 464, 465, 466, 503, 506, 516, 523, 526, 532, 546, 565, 606, 612, 624, 627, 631, 632, 654, 662, 664, 703, 712, 723, 731, 732, 734, 743, 754, 0 }; static rmode_t thf7_mode_table[KENWOOD_MODE_TABLE_MAX] = { [0] = RIG_MODE_FM, [1] = RIG_MODE_WFM, [2] = RIG_MODE_AM, [3] = RIG_MODE_LSB, [4] = RIG_MODE_USB, [5] = RIG_MODE_CW }; /* * Band A & B */ #define THF7_VFO (RIG_VFO_A|RIG_VFO_B) const struct kenwood_priv_caps thf7_priv_caps = { .cmdtrm = EOM_TH, /* Command termination character */ .mode_table = thf7_mode_table, }; static int thf7e_init(RIG *rig); static int thf7e_open(RIG *rig); static int thf7_set_vfo (RIG *rig, vfo_t vfo); static int thf7_get_vfo (RIG *rig, vfo_t *vfo); /* * TH-F7E rig capabilities. * * Manual: http://www.k6may.com/KenwoodTHF6Tip1.shtml */ const struct rig_caps thf7e_caps = { .rig_model = RIG_MODEL_THF7E, .model_name = "TH-F7E", .mfg_name = "Kenwood", .version = TH_VER, .copyright = "LGPL", .status = RIG_STATUS_BETA, .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 = 0, .post_write_delay = 0, .timeout = 500, .retry = 3, .has_get_func = THF7_FUNC_ALL, .has_set_func = THF7_FUNC_ALL, .has_get_level = THF7_LEVEL_ALL, .has_set_level = RIG_LEVEL_SET(THF7_LEVEL_ALL), .has_get_parm = THF7_PARMS, .has_set_parm = THF7_PARMS, .level_gran = { [LVL_SQL] = { .min = { .i = 0 }, .max = { .i = 5 } }, [LVL_RFPOWER] = { .min = { .i = 3 }, .max = { .i = 0 } }, }, .parm_gran = {}, .ctcss_list = thf7_ctcss_list, .dcs_list = thf7_dcs_list, .preamp = { RIG_DBLST_END, }, .attenuator = { 20, RIG_DBLST_END, }, .max_rit = Hz(0), .max_xit = Hz(0), .max_ifshift = Hz(0), .vfo_ops = THF7_VFO_OP, .targetable_vfo = RIG_TARGETABLE_FREQ, .transceive = RIG_TRN_RIG, /* TBC */ .bank_qty = 0, .chan_desc_sz = 8, .chan_list = { { 0, 399, RIG_MTYPE_MEM , {THF7_CHANNEL_CAPS}}, /* normal MEM */ { 400,409, RIG_MTYPE_EDGE, {THF7_CHANNEL_CAPS}}, /* L0-L9 lower scan limit */ { 410,419, RIG_MTYPE_EDGE, {THF7_CHANNEL_CAPS}}, /* U0-U9 upper scan limit */ { 420,429, RIG_MTYPE_MEM, {THF7_CHANNEL_CAPS}}, /* I0-I9 info */ { 430,431, RIG_MTYPE_PRIO, {THF7_CHANNEL_CAPS}}, /* PR0,PR1 priority */ { 432,434, RIG_MTYPE_CALL, {THF7_CHANNEL_CAPS_WO_LO}}, /* Call (for each ham band) */ { 435,449, RIG_MTYPE_BAND, {THF7_CHANNEL_CAPS_WO_LO}}, /* VFO */ /* 3 A-band VFO */ /* 11 B-band VFO */ /* TODO: 10 DTMF */ RIG_CHAN_END, }, .rx_range_list1 = { /* RIG_ANT_2 is internal bar antenna */ {MHz(144),MHz(146),THF7_MODES_TX,-1,-1,RIG_VFO_A,RIG_ANT_1}, {kHz(430),MHz(440),THF7_MODES_TX,-1,-1,RIG_VFO_A,RIG_ANT_1}, {kHz(100),MHz(470),THF7_ALL_MODES,-1,-1,RIG_VFO_B, RIG_ANT_1|RIG_ANT_2}, {MHz(470),GHz(1.3),THF7_HIGH_MODES,-1,-1,RIG_VFO_B,RIG_ANT_1}, RIG_FRNG_END }, .tx_range_list1 = { /* power actually depends on DC power supply */ {MHz(144),MHz(146),THF7_MODES_TX,W(0.05),W(5),RIG_VFO_A,RIG_ANT_1}, {MHz(430),MHz(440),THF7_MODES_TX,W(0.05),W(5),RIG_VFO_A,RIG_ANT_1}, RIG_FRNG_END }, /* region 2 is TH-F6A */ .rx_range_list2 = { RIG_FRNG_END, }, .tx_range_list2 = { RIG_FRNG_END, }, .tuning_steps = { /* This table is ordered according to protocol, from '0' to 'b' */ /* The steps are not available on every band/frequency limit 470MHz */ {THF7_ALL_MODES,kHz(5)}, {THF7_ALL_MODES,kHz(6.25)}, {THF7_ALL_MODES,kHz(8.33)}, {THF7_ALL_MODES,kHz(9)}, {THF7_ALL_MODES,kHz(10)}, {THF7_ALL_MODES,kHz(12.5)}, {THF7_ALL_MODES,kHz(15)}, {THF7_ALL_MODES,kHz(20)}, {THF7_ALL_MODES,kHz(25)}, {THF7_ALL_MODES,kHz(30)}, {THF7_ALL_MODES,kHz(50)}, {THF7_ALL_MODES,kHz(100)}, RIG_TS_END, }, /* mode/filter list, remember: order matters! */ .filters = { /* real width to be checked (missing specs) */ {RIG_MODE_FM, kHz(12)}, {RIG_MODE_FM, kHz(6)}, /* narrow FM */ {RIG_MODE_AM, kHz(9)}, {RIG_MODE_WFM, kHz(150)}, /* or 230? */ {RIG_MODE_SSB|RIG_MODE_CW, kHz(3)}, RIG_FLT_END, }, .priv = (void *)&thf7_priv_caps, .rig_init = thf7e_init, .rig_open = thf7e_open, .set_freq = th_set_freq, .get_freq = th_get_freq, .set_mode = th_set_mode, .get_mode = th_get_mode, .set_vfo = thf7_set_vfo, .get_vfo = thf7_get_vfo, .set_ctcss_tone = th_set_ctcss_tone, .get_ctcss_tone = th_get_ctcss_tone, .set_ptt = kenwood_set_ptt, .get_dcd = kenwood_get_dcd, .vfo_op = kenwood_vfo_op, .set_mem = th_set_mem, .get_mem = th_get_mem, .set_trn = th_set_trn, /* TBC */ .get_trn = th_get_trn, /* TBC */ .decode_event = th_decode_event, /* TBC */ .set_func = th_set_func, .get_func = th_get_func, .set_level = th_set_level, .get_level = th_get_level, .get_parm = th_get_parm, .get_info = th_get_info, .set_channel = th_set_channel, .get_channel = th_get_channel, .set_ant = th_set_ant, .get_ant = th_get_ant, }; #define ACKBUF_LEN 64 int thf7e_init(RIG *rig) { rig->state.itu_region = RIG_ITU_REGION1; return RIG_OK; } int thf7e_open(RIG *rig) { /* TH-F7E is Region 1 only. * Region 2 is supported by TH-F6A */ if (rig->state.itu_region != RIG_ITU_REGION1) return -RIG_ECONF; return RIG_OK; } /* */ int thf7_set_vfo (RIG *rig, vfo_t vfo) { char vfobuf[16], ackbuf[ACKBUF_LEN]; int retval; size_t ack_len; rig_debug(RIG_DEBUG_TRACE, "%s: called\n", __FUNCTION__); /* * The band must be active before selecting VFO or MEM. * The dilemma is whether MEM should be applied to Band A or Band B. * Remember, not all bands have the same capability * TODO: if (RIG_VFO_MEM) query current band with BC, then do appropriate VMC */ if (vfo != RIG_VFO_MEM) { switch (vfo) { case RIG_VFO_A: case RIG_VFO_VFO: case RIG_VFO_MAIN: sprintf(vfobuf, "BC 0" EOM_TH); break; case RIG_VFO_B: case RIG_VFO_SUB: sprintf(vfobuf, "BC 1" EOM_TH); break; default: rig_debug(RIG_DEBUG_ERR, "%s: Unsupported BC VFO %d\n", __FUNCTION__, vfo); return -RIG_EVFO; } /* wait for response, otherwise next issued command may fail */ ack_len = ACKBUF_LEN-1; retval = kenwood_transaction(rig, vfobuf, strlen(vfobuf), ackbuf, &ack_len); if (retval != RIG_OK) return retval; } switch (vfo) { case RIG_VFO_VFO: case RIG_VFO_MAIN: case RIG_VFO_A: sprintf(vfobuf, "VMC 0,0" EOM_TH); break; case RIG_VFO_SUB: case RIG_VFO_B: sprintf(vfobuf, "VMC 1,0" EOM_TH); break; case RIG_VFO_MEM: sprintf(vfobuf, "VMC 0,1" EOM_TH); break; default: rig_debug(RIG_DEBUG_ERR, "%s: Unsupported VFO %d\n", __FUNCTION__, vfo); return -RIG_EVFO; } /* wait for response, otherwise next issued command may fail */ ack_len = ACKBUF_LEN-1; retval = kenwood_transaction(rig, vfobuf, strlen(vfobuf), ackbuf, &ack_len); if (retval != RIG_OK) return retval; return RIG_OK; } /* */ int thf7_get_vfo (RIG *rig, vfo_t *vfo) { char cmdbuf[16], ackbuf[ACKBUF_LEN],vfoc; int retval; size_t ack_len; rig_debug(RIG_DEBUG_TRACE, "%s: called\n", __FUNCTION__); ack_len=ACKBUF_LEN; retval = kenwood_transaction (rig, "BC" EOM_TH, 3, ackbuf, &ack_len); if (retval != RIG_OK) return retval; if (ack_len < 4 ) { rig_debug(RIG_DEBUG_ERR, "%s: Unexpected reply '%s'\n", __FUNCTION__, ackbuf); return -RIG_ERJCTED; } vfoc=ackbuf[3]; switch (vfoc) { case '0': *vfo = RIG_VFO_A; break; case '1': *vfo = RIG_VFO_B; break; default: rig_debug(RIG_DEBUG_ERR, "%s: Unexpected VFO value '%c'\n", __FUNCTION__, ackbuf[3]); return -RIG_EVFO; } sprintf(cmdbuf,"VMC %c" EOM_TH,vfoc); ack_len=ACKBUF_LEN; retval = kenwood_transaction (rig, cmdbuf, strlen(cmdbuf), ackbuf, &ack_len); if (retval != RIG_OK) return retval; if (ack_len < 8 ) { rig_debug(RIG_DEBUG_ERR, "%s: Unexpected reply '%s'\n", __FUNCTION__, ackbuf); return -RIG_ERJCTED; } switch(ackbuf[6]) { case '0' : case '3' : /* Fine Step Enable */ break; case '1' : /* MR */ case '2' : /* CALL */ case '4' : /* INFO */ *vfo = RIG_VFO_MEM; break; default: rig_debug(RIG_DEBUG_ERR, "%s: Unexpected VFO value '%c'\n", __FUNCTION__, ackbuf[6]); return -RIG_EVFO; } return RIG_OK; }