/* * Hamlib AOR backend - AR5000 description * * Copyright (c) 2000-2008 by Stephane Fillod * * * 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 #include #include #include #include "aor.h" #define AR5000_MODES (RIG_MODE_AM|RIG_MODE_CW|RIG_MODE_SSB|RIG_MODE_FM| \ RIG_MODE_WFM|RIG_MODE_SAM|RIG_MODE_SAL|RIG_MODE_SAH) #define AR5000_FUNC_ALL (RIG_FUNC_TSQL | RIG_FUNC_ABM) #define AR5000_LEVEL (RIG_LEVEL_ATT | RIG_LEVEL_AGC | RIG_LEVEL_RAWSTR) #define AR5000_PARM (RIG_PARM_NONE) #define AR5000_VFO_OPS (RIG_OP_MCL | RIG_OP_UP | RIG_OP_DOWN) #define AR5000_SCAN_OPS (RIG_SCAN_MEM|RIG_SCAN_VFO|RIG_SCAN_PROG|RIG_SCAN_SLCT) #define AR5000_VFO (RIG_VFO_A | RIG_VFO_B | RIG_VFO_C | RIG_VFO_N(3) | RIG_VFO_N(4)) /* As reported with rigctl 'l RAWSTR' for AR5000A S/n: 171218 on 7040kHz / CW / 3kHz Bw. The data available on http://www.aoruk.com did not match very well on HF */ #define AR5000_STR_CAL { 16, { \ { 0, -60 }, \ { 3, -48 }, \ { 14, -42 }, \ { 26, -36 }, \ { 34, -30 }, \ { 42, -24 }, \ { 52, -18 }, \ { 62, -12 }, \ { 74, -6 }, \ { 87, 0 }, \ { 101, 10 }, \ { 117, 20 }, \ { 135, 30 }, \ { 152, 40 }, \ { 202, 50 }, \ { 255, 60 }, \ } } #define AR5000_MEM_CAP { \ .freq = 1, \ .mode = 1, \ .width = 1, \ .bank_num = 1, \ .tuning_step = 1, \ .channel_desc = 1, \ .flags = 1, \ .levels = RIG_LEVEL_ATT | RIG_LEVEL_AGC, \ .funcs = RIG_FUNC_ABM, \ } static int format5k_mode(RIG *rig, char *buf, int buf_len, rmode_t mode, pbwidth_t width); static int parse5k_aor_mode(RIG *rig, char aormode, char aorwidth, rmode_t *mode, pbwidth_t *width); static const struct aor_priv_caps ar5k_priv_caps = { .format_mode = format5k_mode, .parse_aor_mode = parse5k_aor_mode, .bank_base1 = '0', .bank_base2 = '0', }; /* * ar5000 rig capabilities. * Notice that some rigs share the same functions. * Also this struct is READONLY! * * part of info from http://www.aoruk.com/5000.htm * * TODO: retrieve BW info, and rest of commands */ const struct rig_caps ar5000_caps = { RIG_MODEL(RIG_MODEL_AR5000), .model_name = "AR5000", .mfg_name = "AOR", .version = BACKEND_VER ".0", .copyright = "LGPL", .status = RIG_STATUS_STABLE, .rig_type = RIG_TYPE_SCANNER, .ptt_type = RIG_PTT_NONE, .dcd_type = RIG_DCD_RIG, .port_type = RIG_PORT_SERIAL, .serial_rate_min = 4800, .serial_rate_max = 19200, .serial_data_bits = 8, .serial_stop_bits = 2, .serial_parity = RIG_PARITY_NONE, .serial_handshake = RIG_HANDSHAKE_XONXOFF, .write_delay = 0, .post_write_delay = 0, .timeout = 200, .retry = 3, .has_get_func = RIG_FUNC_NONE, .has_set_func = AR5000_FUNC_ALL, .has_get_level = AR5000_LEVEL, .has_set_level = RIG_LEVEL_SET(AR5000_LEVEL), .has_get_parm = RIG_PARM_NONE, .has_set_parm = RIG_PARM_NONE, /* FIXME: parms */ .level_gran = {}, /* FIXME: granularity */ .parm_gran = {}, .ctcss_list = NULL, /* FIXME: CTCSS list */ .dcs_list = NULL, .preamp = { RIG_DBLST_END, }, .attenuator = { 10, 20, RIG_DBLST_END, }, .max_rit = Hz(0), .max_xit = Hz(0), .max_ifshift = Hz(0), .targetable_vfo = 0, .transceive = RIG_TRN_RIG, .bank_qty = 10, .chan_desc_sz = 8, .vfo_ops = AR5000_VFO_OPS, .scan_ops = AR5000_SCAN_OPS, .str_cal = AR5000_STR_CAL, .chan_list = { { 0, 999, RIG_MTYPE_MEM, AR5000_MEM_CAP }, RIG_CHAN_END, }, .rx_range_list1 = { {kHz(10), MHz(2600), AR5000_MODES, -1, -1, AR5000_VFO}, RIG_FRNG_END, }, .tx_range_list1 = { RIG_FRNG_END, }, .rx_range_list2 = { {kHz(10), MHz(2600), AR5000_MODES, -1, -1, AR5000_VFO}, RIG_FRNG_END, }, /* rx range */ .tx_range_list2 = { RIG_FRNG_END, }, /* no tx range, this is a scanner! */ .tuning_steps = { {AR5000_MODES, 1}, {AR5000_MODES, 10}, {AR5000_MODES, 50}, {AR5000_MODES, 100}, {AR5000_MODES, 500}, {AR5000_MODES, kHz(1)}, {AR5000_MODES, kHz(5)}, {AR5000_MODES, kHz(6.25)}, {AR5000_MODES, kHz(9)}, {AR5000_MODES, kHz(10)}, {AR5000_MODES, kHz(12.5)}, {AR5000_MODES, kHz(20)}, {AR5000_MODES, kHz(25)}, {AR5000_MODES, kHz(30)}, {AR5000_MODES, kHz(50)}, {AR5000_MODES, kHz(100)}, {AR5000_MODES, kHz(500)}, #if 0 {AR5000_MODES, 0}, /* any tuning step */ #endif RIG_TS_END, }, /* mode/filter list, .remember = order matters! */ .filters = { {RIG_MODE_SSB | RIG_MODE_SAL | RIG_MODE_SAH | RIG_MODE_CW, kHz(3)}, {RIG_MODE_CW, Hz(500)}, /* narrow */ {RIG_MODE_AM | RIG_MODE_SAM, kHz(6)}, {RIG_MODE_AM | RIG_MODE_SAM, kHz(3)}, /* narrow */ {RIG_MODE_AM | RIG_MODE_FM | RIG_MODE_SAM, kHz(15)}, {RIG_MODE_FM, kHz(6)}, /* narrow */ {RIG_MODE_FM, kHz(30)}, /* wide */ {RIG_MODE_WFM, kHz(110)}, {RIG_MODE_WFM, kHz(30)}, /* narrow */ {RIG_MODE_WFM, kHz(220)}, /* wide */ RIG_FLT_END, }, .priv = (void *)& ar5k_priv_caps, .rig_init = NULL, .rig_cleanup = NULL, .rig_open = NULL, .rig_close = aor_close, .set_freq = aor_set_freq, .get_freq = aor_get_freq, .set_mode = aor_set_mode, .get_mode = aor_get_mode, .set_vfo = aor_set_vfo, .get_vfo = aor_get_vfo, .set_level = aor_set_level, .get_level = aor_get_level, .get_dcd = aor_get_dcd, .set_ts = aor_set_ts, .set_powerstat = aor_set_powerstat, .vfo_op = aor_vfo_op, .scan = aor_scan, .get_info = aor_get_info, .set_mem = aor_set_mem, .get_mem = aor_get_mem, .set_bank = aor_set_bank, .set_channel = aor_set_channel, .get_channel = aor_get_channel, .get_chan_all_cb = aor_get_chan_all_cb, }; /* * ar5000a rig capabilities. * Notice that some rigs share the same functions. * Also this struct is READONLY! * * part of info from http://www.aoruk.com/5000.htm * * TODO: retrieve BW info, and rest of commands */ const struct rig_caps ar5000a_caps = { RIG_MODEL(RIG_MODEL_AR5000A), .model_name = "AR5000A", .mfg_name = "AOR", .version = BACKEND_VER ".0", .copyright = "LGPL", .status = RIG_STATUS_ALPHA, .rig_type = RIG_TYPE_SCANNER, .ptt_type = RIG_PTT_NONE, .dcd_type = RIG_DCD_RIG, .port_type = RIG_PORT_SERIAL, .serial_rate_min = 4800, .serial_rate_max = 19200, .serial_data_bits = 8, .serial_stop_bits = 2, .serial_parity = RIG_PARITY_NONE, .serial_handshake = RIG_HANDSHAKE_XONXOFF, .write_delay = 0, .post_write_delay = 0, .timeout = 200, .retry = 3, .has_get_func = RIG_FUNC_NONE, .has_set_func = AR5000_FUNC_ALL, .has_get_level = AR5000_LEVEL, .has_set_level = RIG_LEVEL_SET(AR5000_LEVEL), .has_get_parm = RIG_PARM_NONE, .has_set_parm = RIG_PARM_NONE, /* FIXME: parms */ .level_gran = {}, /* FIXME: granularity */ .parm_gran = {}, .ctcss_list = NULL, /* FIXME: CTCSS list */ .dcs_list = NULL, .preamp = { RIG_DBLST_END, }, .attenuator = { 10, 20, RIG_DBLST_END, }, .max_rit = Hz(0), .max_xit = Hz(0), .max_ifshift = Hz(0), .targetable_vfo = 0, .transceive = RIG_TRN_RIG, .bank_qty = 10, .chan_desc_sz = 8, .vfo_ops = AR5000_VFO_OPS, .scan_ops = AR5000_SCAN_OPS, .str_cal = AR5000_STR_CAL, .chan_list = { { 0, 999, RIG_MTYPE_MEM, AR5000_MEM_CAP }, RIG_CHAN_END, }, .rx_range_list1 = { {kHz(10), MHz(3000), AR5000_MODES, -1, -1, AR5000_VFO}, RIG_FRNG_END, }, .tx_range_list1 = { RIG_FRNG_END, }, .rx_range_list2 = { {kHz(10), MHz(3000), AR5000_MODES, -1, -1, AR5000_VFO}, RIG_FRNG_END, }, /* rx range */ .tx_range_list2 = { RIG_FRNG_END, }, /* no tx range, this is a scanner! */ .tuning_steps = { {AR5000_MODES, 1}, {AR5000_MODES, 10}, {AR5000_MODES, 50}, {AR5000_MODES, 100}, {AR5000_MODES, 500}, {AR5000_MODES, kHz(1)}, {AR5000_MODES, kHz(5)}, {AR5000_MODES, kHz(6.25)}, {AR5000_MODES, kHz(9)}, {AR5000_MODES, kHz(10)}, {AR5000_MODES, kHz(12.5)}, {AR5000_MODES, kHz(20)}, {AR5000_MODES, kHz(25)}, {AR5000_MODES, kHz(30)}, {AR5000_MODES, kHz(50)}, {AR5000_MODES, kHz(100)}, {AR5000_MODES, kHz(500)}, #if 0 {AR5000_MODES, 0}, /* any tuning step */ #endif RIG_TS_END, }, /* mode/filter list, .remember = order matters! */ .filters = { {RIG_MODE_SSB | RIG_MODE_SAL | RIG_MODE_SAH | RIG_MODE_CW, kHz(3)}, {RIG_MODE_CW, Hz(500)}, /* narrow */ {RIG_MODE_AM | RIG_MODE_SAM, kHz(6)}, {RIG_MODE_AM | RIG_MODE_SAM, kHz(3)}, /* narrow */ {RIG_MODE_AM | RIG_MODE_FM | RIG_MODE_SAM, kHz(15)}, {RIG_MODE_FM, kHz(6)}, /* narrow */ {RIG_MODE_FM, kHz(30)}, /* wide */ {RIG_MODE_WFM, kHz(110)}, {RIG_MODE_WFM, kHz(30)}, /* narrow */ {RIG_MODE_WFM, kHz(220)}, /* wide */ RIG_FLT_END, }, .priv = (void *)& ar5k_priv_caps, .rig_init = NULL, .rig_cleanup = NULL, .rig_open = NULL, .rig_close = aor_close, .set_freq = aor_set_freq, .get_freq = aor_get_freq, .set_mode = aor_set_mode, .get_mode = aor_get_mode, .set_vfo = aor_set_vfo, .get_vfo = aor_get_vfo, .set_level = aor_set_level, .get_level = aor_get_level, .get_dcd = aor_get_dcd, .set_ts = aor_set_ts, .set_powerstat = aor_set_powerstat, .vfo_op = aor_vfo_op, .scan = aor_scan, .get_info = aor_get_info, .set_mem = aor_set_mem, .get_mem = aor_get_mem, .set_bank = aor_set_bank, .set_channel = aor_set_channel, .get_channel = aor_get_channel, .get_chan_all_cb = aor_get_chan_all_cb, }; /* * Function definitions below */ /* * modes in use by the "MD" command of AR5000 */ #define AR5K_FM '0' #define AR5K_AM '1' #define AR5K_LSB '2' #define AR5K_USB '3' #define AR5K_CW '4' #define AR5K_SAM '5' #define AR5K_SAL '6' #define AR5K_SAH '7' int format5k_mode(RIG *rig, char *buf, int buf_len, rmode_t mode, pbwidth_t width) { int aormode; switch (mode) { case RIG_MODE_AM: aormode = AR5K_AM; break; case RIG_MODE_WFM: case RIG_MODE_FM: aormode = AR5K_FM; break; case RIG_MODE_LSB: aormode = AR5K_LSB; break; case RIG_MODE_USB: aormode = AR5K_USB; break; case RIG_MODE_CW: aormode = AR5K_CW; break; case RIG_MODE_SAM: aormode = AR5K_SAM; break; case RIG_MODE_SAL: aormode = AR5K_SAL; break; case RIG_MODE_SAH: aormode = AR5K_SAH; break; default: rig_debug(RIG_DEBUG_ERR, "%s: unsupported mode %s\n", __func__, rig_strrmode(mode)); return -RIG_EINVAL; } if (width != RIG_PASSBAND_NOCHANGE) { int aorwidth; if (width == RIG_PASSBAND_NORMAL) { width = rig_passband_normal(rig, mode); } switch (width) { case 500: aorwidth = '0'; break; case s_kHz(3): aorwidth = '1'; break; case s_kHz(6): aorwidth = '2'; break; case s_kHz(15): aorwidth = '3'; break; case s_kHz(30): aorwidth = '4'; break; case s_kHz(110): aorwidth = '5'; break; case s_kHz(220): aorwidth = '6'; break; default: rig_debug(RIG_DEBUG_ERR, "%s: unsupported width %d\n", __func__, (int)width); return -RIG_EINVAL; } SNPRINTF(buf, buf_len, "MD%c BW%c", aormode, aorwidth); return strlen(buf); } else { SNPRINTF(buf, buf_len, "MD%c", aormode); return strlen(buf); } } int parse5k_aor_mode(RIG *rig, char aormode, char aorwidth, rmode_t *mode, pbwidth_t *width) { switch (aormode) { case AR5K_FM: *mode = RIG_MODE_FM; break; case AR5K_AM: *mode = RIG_MODE_AM; break; case AR5K_LSB: *mode = RIG_MODE_LSB; break; case AR5K_USB: *mode = RIG_MODE_USB; break; case AR5K_CW: *mode = RIG_MODE_CW; break; case AR5K_SAM: *mode = RIG_MODE_SAM; break; case AR5K_SAL: *mode = RIG_MODE_SAL; break; case AR5K_SAH: *mode = RIG_MODE_SAH; break; default: rig_debug(RIG_DEBUG_ERR, "%s: unsupported mode '%c'\n", __func__, aormode); return -RIG_EPROTO; } switch (aorwidth) { case '0': *width = 500; break; case '1': *width = s_kHz(3); break; case '2': *width = s_kHz(6); break; case '3': *width = s_kHz(15); break; case '4': *width = s_kHz(30); break; case '5': *width = s_kHz(110); break; case '6': *width = s_kHz(220); break; default: rig_debug(RIG_DEBUG_ERR, "%s: unsupported width %d\n", __func__, aorwidth); return -RIG_EPROTO; } return RIG_OK; }