diff --git a/.gitignore b/.gitignore index 189feded2..08f0f0a99 100644 --- a/.gitignore +++ b/.gitignore @@ -1,6 +1,7 @@ # .gitignore for Hamlib # .gitignore .deps/ +.dirstamp .libs/ *~ *.o diff --git a/NEWS b/NEWS index 139ebcfc2..d395de683 100644 --- a/NEWS +++ b/NEWS @@ -10,6 +10,8 @@ Version 4.0 * API/ABI changes, advance ABI to 4 0 0. * Add GPIO and GPION options for DCD. Jeroen Vreeken * New backend: ELAD FDM DUO. Giovanni, HB9EIK. + * New rotator backend: iOptron. Bob, KD8CGH + * New model: Icom IC-R8600. Ekki, DF4OR Version 3.3 2018-08-12 diff --git a/configure.ac b/configure.ac index 7f0231809..3d4df381f 100644 --- a/configure.ac +++ b/configure.ac @@ -50,7 +50,7 @@ dnl Beware of duplication should a backend directory include both rig and dnl rotor definitions, e.g. "dummy". Optional backends will not be listed dnl here but will be added later, e.g. "winradio". BACKEND_LIST="adat alinco aor barrett dorji drake dummy elad flexradio icom icmarine jrc kachina kenwood kit lowe pcr prm80 racal rft rs skanti tapr tentec tuner uniden wj yaesu" -ROT_BACKEND_LIST="amsat ars celestron cnctrk easycomm ether6 fodtrack gs232a heathkit m2 meade rotorez sartek spid ts7400 prosistel" +ROT_BACKEND_LIST="amsat ars celestron cnctrk easycomm ether6 fodtrack gs232a heathkit m2 meade rotorez sartek spid ts7400 prosistel ioptron" dnl See README.release on setting these values # Values given to -version-info when linking. See libtool documentation. @@ -737,6 +737,7 @@ macros/Makefile include/Makefile lib/Makefile dummy/Makefile +elad/Makefile yaesu/Makefile icom/Makefile icmarine/Makefile @@ -788,8 +789,9 @@ prosistel/Makefile dorji/Makefile barrett/Makefile meade/Makefile +ioptron/Makefile hamlib.pc -elad/Makefile]) +]) AC_OUTPUT diff --git a/doc/Makefile.am b/doc/Makefile.am index 9a6c6e5ff..085baec2e 100644 --- a/doc/Makefile.am +++ b/doc/Makefile.am @@ -19,3 +19,6 @@ AM_MAKEINFOHTMLFLAGS = --no-headers --no-split doc: hamlib.cfg $(SRCDOCLST) doxygen hamlib.cfg + +# Don't attempt to generate DVI file with 'make distcheck' +dvi: diff --git a/dummy/flrig.c b/dummy/flrig.c index b067c5f5d..6e07af008 100644 --- a/dummy/flrig.c +++ b/dummy/flrig.c @@ -305,7 +305,7 @@ static char *xml_parse(char *xml, char *value, int value_len) if (strstr(xml, " 200 OK") == NULL) { return NULL; } - rig_debug(RIG_DEBUG_VERBOSE, "%s XML:\n%s\n", __FUNCTION__, xml); + rig_debug(RIG_DEBUG_TRACE, "%s XML:\n%s\n", __FUNCTION__, xml); // find the xml skipping the other stuff above it char *pxml = strstr(xml, "rigport, tmp_buf, sizeof(tmp_buf), delims, strlen(delims)); - rig_debug(RIG_DEBUG_WARN,"%s: string='%s'",__FUNCTION__,tmp_buf); + rig_debug(RIG_DEBUG_VERBOSE,"%s: string='%s'",__FUNCTION__,tmp_buf); if (len > 0) retry = 3; if (len <= 0) { rig_debug(RIG_DEBUG_ERR,"%s: read_string error=%d\n",__FUNCTION__,len); @@ -465,7 +465,7 @@ static unsigned int modeMapGetHamlib(const char *modeFLRig) snprintf(modeFLRigCheck,sizeof(modeFLRigCheck),"|%.32s|",modeFLRig); rig_debug(RIG_DEBUG_VERBOSE,"%s: get hamlib mode from %s\n",__FUNCTION__,modeFLRig); for(i=0; modeMap[i].mode_hamlib!=0; ++i) { - if (strstr(modeMap[i].mode_flrig,modeFLRigCheck)) { + if (modeMap[i].mode_flrig && strstr(modeMap[i].mode_flrig,modeFLRigCheck)) { rig_debug(RIG_DEBUG_VERBOSE,"%s: got hamlib mode %s\n",__FUNCTION__,rig_strrmode(modeMap[i].mode_hamlib)); return modeMap[i].mode_hamlib; } @@ -482,7 +482,7 @@ static unsigned int modeMapGetHamlib(const char *modeFLRig) static void modeMapAdd(unsigned int *modes,int mode_hamlib,char *mode_flrig) { int i; - rig_debug(RIG_DEBUG_VERBOSE,"%s:mode_flrig=%s\n",__FUNCTION__,mode_flrig); + rig_debug(RIG_DEBUG_TRACE,"%s:mode_flrig=%s\n",__FUNCTION__,mode_flrig); int len1 = strlen(mode_flrig)+3; /* bytes needed for allocating */ for(i=0; modeMap[i].mode_hamlib!=0; ++i) { if (modeMap[i].mode_hamlib==mode_hamlib) { @@ -516,7 +516,7 @@ static int flrig_open(RIG *rig) { char xml[MAXXMLLEN]; char value[MAXXMLLEN]; - rig_debug(RIG_DEBUG_VERBOSE, "%s version %s\n", __FUNCTION__, BACKEND_VER); + rig_debug(RIG_DEBUG_TRACE, "%s version %s\n", __FUNCTION__, BACKEND_VER); struct flrig_priv_data *priv = (struct flrig_priv_data *) rig->state.priv; @@ -923,14 +923,14 @@ static int flrig_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width) // Switch to VFOB if appropriate since we can't set mode directly // MDB int vfoSwitched = 0; - rig_debug(RIG_DEBUG_WARN,"%s: curr_vfo = %s\n",__FUNCTION__,rig_strvfo(priv->curr_vfo)); + rig_debug(RIG_DEBUG_VERBOSE,"%s: curr_vfo = %s\n",__FUNCTION__,rig_strvfo(priv->curr_vfo)); if (!priv->has_get_bwA && vfo == RIG_VFO_B && priv->curr_vfo != RIG_VFO_B) { vfoSwitched = 1; - rig_debug(RIG_DEBUG_WARN,"%s: switch to VFOB = %d\n",__FUNCTION__,vfoSwitched); + rig_debug(RIG_DEBUG_VERBOSE,"%s: switch to VFOB = %d\n",__FUNCTION__,vfoSwitched); } if (vfoSwitched) { // swap to B and we'll swap back later - rig_debug(RIG_DEBUG_WARN,"%s: switching to VFOB = %d\n",__FUNCTION__,vfoSwitched); + rig_debug(RIG_DEBUG_VERBOSE,"%s: switching to VFOB = %d\n",__FUNCTION__,vfoSwitched); retval = flrig_set_vfo(rig, RIG_VFO_B); if (retval < 0) { return retval; @@ -986,9 +986,9 @@ static int flrig_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width) } // Return to VFOA if needed - rig_debug(RIG_DEBUG_WARN,"%s: switch to VFOA? = %d\n",__FUNCTION__,vfoSwitched); + rig_debug(RIG_DEBUG_VERBOSE,"%s: switch to VFOA? = %d\n",__FUNCTION__,vfoSwitched); if (vfoSwitched) { - rig_debug(RIG_DEBUG_WARN,"%s: switching to VFOA\n",__FUNCTION__); + rig_debug(RIG_DEBUG_VERBOSE,"%s: switching to VFOA\n",__FUNCTION__); retval = flrig_set_vfo(rig, RIG_VFO_A); if (retval < 0) { return retval; @@ -1439,7 +1439,7 @@ static int flrig_get_split_freq_mode(RIG *rig, vfo_t vfo, freq_t *freq, rmode_t static const char *flrig_get_info(RIG *rig) { struct flrig_priv_data *priv = (struct flrig_priv_data *) rig->state.priv; - rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __FUNCTION__); + rig_debug(RIG_DEBUG_TRACE, "%s called\n", __FUNCTION__); return priv->info; } diff --git a/icom/Makefile.am b/icom/Makefile.am index ea9bf4ac6..3be4574dc 100644 --- a/icom/Makefile.am +++ b/icom/Makefile.am @@ -4,7 +4,7 @@ ICOMSRC = ic706.c icr8500.c ic735.c ic775.c ic756.c \ os535.c os456.c omni.c delta2.c ic92d.c \ ic736.c ic738.c ic7410.c ic746.c ic703.c ic726.c ic271.c \ ic765.c ic781.c ic471.c icr9000.c icr9500.c \ - icr10.c icr20.c icr6.c icr71.c icr72.c icr75.c icrx7.c \ + icr10.c icr20.c icr6.c icr71.c icr72.c icr75.c icrx7.c icr8600.c \ id1.c id5100.c perseus.c ic2730.c \ ic707.c ic728.c ic751.c ic761.c \ ic78.c ic7800.c ic785x.c \ diff --git a/icom/icom.c b/icom/icom.c index b39b032c2..6be08d15f 100644 --- a/icom/icom.c +++ b/icom/icom.c @@ -249,6 +249,27 @@ const struct ts_sc_list ic910_ts_sc_list[] = { { 0, 0 }, }; +const struct ts_sc_list r8600_ts_sc_list[] = { + { 10, 0x00 }, + { 100, 0x01 }, + { kHz(1), 0x02 }, + { kHz(2.5), 0x03 }, + { 3125, 0x04 }, + { kHz(5), 0x05 }, + { 6250, 0x06 }, + { 8330, 0x07 }, + { kHz(9), 0x08 }, + { kHz(10), 0x09 }, + { kHz(12.5), 0x10 }, + { kHz(20), 0x11 }, + { kHz(25), 0x12 }, + { kHz(100), 0x13 }, + { 0, 0x14 }, /* programmable tuning step not supported */ + { 0, 0 }, +}; + + + /* rtty filter list for some DSP rigs ie PRO */ #define RTTY_FIL_NB 5 const pbwidth_t rtty_fil[] = { @@ -357,6 +378,7 @@ static const struct icom_addr icom_addr_list[] = { { RIG_MODEL_IC7700, 0x74 }, { RIG_MODEL_PERSEUS, 0xE1 }, { RIG_MODEL_X108G, 0x70 }, + { RIG_MODEL_ICR8600, 0x96 }, { RIG_MODEL_NONE, 0 }, }; @@ -2425,15 +2447,15 @@ int icom_set_func(RIG *rig, vfo_t vfo, setting_t func, int status) fct_cn = C_CTL_FUNC; fct_sc = S_FUNC_DIAL_LK; break; - case RIG_FUNC_AFC: /* IC-910H */ - fct_cn = C_CTL_FUNC; - fct_sc = S_FUNC_AFC; - break; - case RIG_FUNC_SATMODE: /* IC-910H */ - fct_cn = C_CTL_MEM; - fct_sc = S_MEM_SATMODE; - break; - case RIG_FUNC_SCOPE: + case RIG_FUNC_AFC: /* IC-910H */ + fct_cn = C_CTL_FUNC; + fct_sc = S_FUNC_AFC; + break; + case RIG_FUNC_SATMODE: /* IC-910H */ + fct_cn = C_CTL_MEM; + fct_sc = S_MEM_SATMODE; + break; + case RIG_FUNC_SCOPE: if (priv->civ_version == 1) { /* IC-7200/7300 */ fct_cn = 0x27; fct_sc = 0x10; @@ -2450,6 +2472,10 @@ int icom_set_func(RIG *rig, vfo_t vfo, setting_t func, int status) fct_sc = status ? S_SCAN_RSMON : S_SCAN_RSMOFF; fct_len = 0; break; + case RIG_FUNC_AIP: /* IC-R8600 IP+ function, misusing AIP since RIG_FUNC_ word is full (32 bit) */ + fct_cn = C_CTL_MEM; /* 1a */ + fct_sc = S_FUNC_IPPLUS; + break; default: rig_debug(RIG_DEBUG_ERR,"Unsupported set_func %d", func); return -RIG_EINVAL; @@ -2532,29 +2558,33 @@ int icom_get_func(RIG *rig, vfo_t vfo, setting_t func, int *status) fct_sc = S_FUNC_MN; break; case RIG_FUNC_RF: - fct_cn = C_CTL_FUNC; - fct_sc = S_FUNC_RF; - break; + fct_cn = C_CTL_FUNC; + fct_sc = S_FUNC_RF; + break; case RIG_FUNC_VSC: - fct_cn = C_CTL_FUNC; - fct_sc = S_FUNC_VSC; - break; + fct_cn = C_CTL_FUNC; + fct_sc = S_FUNC_VSC; + break; case RIG_FUNC_LOCK: fct_cn = C_CTL_FUNC; fct_sc = S_FUNC_DIAL_LK; break; - case RIG_FUNC_AFC: /* IC-910H */ - fct_cn = C_CTL_FUNC; - fct_sc = S_FUNC_AFC; - break; - case RIG_FUNC_SATMODE: /* IC-910H */ - fct_cn = C_CTL_MEM; - fct_sc = S_MEM_SATMODE; - break; - case RIG_FUNC_SCOPE: /* IC-910H */ - fct_cn = C_CTL_MEM; - fct_sc = S_MEM_BANDSCOPE; - break; + case RIG_FUNC_AFC: /* IC-910H */ + fct_cn = C_CTL_FUNC; + fct_sc = S_FUNC_AFC; + break; + case RIG_FUNC_SATMODE: /* IC-910H */ + fct_cn = C_CTL_MEM; + fct_sc = S_MEM_SATMODE; + break; + case RIG_FUNC_SCOPE: /* IC-910H */ + fct_cn = C_CTL_MEM; + fct_sc = S_MEM_BANDSCOPE; + break; + case RIG_FUNC_AIP: /* IC-R8600 IP+ function, misusing AIP since RIG_FUNC_ word is full (32 bit) */ + fct_cn = C_CTL_MEM; /* 1a */ + fct_sc = S_FUNC_IPPLUS; + break; default: rig_debug(RIG_DEBUG_ERR,"Unsupported get_func %d", func); return -RIG_EINVAL; @@ -2582,6 +2612,7 @@ int icom_get_func(RIG *rig, vfo_t vfo, setting_t func, int *status) * icom_set_parm * Assumes rig!=NULL These are very much rig specific and should probably be in rig files. These are for ICR75C only. +Yes. Even more after the IC-R8600 waas added */ int icom_set_parm(RIG *rig, setting_t parm, value_t val) { @@ -2600,7 +2631,8 @@ int icom_set_parm(RIG *rig, setting_t parm, value_t val) switch (parm) { case RIG_PARM_ANN: - if ((val.i == RIG_ANN_FREQ) || (val.i == RIG_ANN_RXMODE)) { + /* previously only for R75, which used RIG_ANN_? codes as subcommand as well. This does not work for IC-R8600 anymore */ + if ((val.i == RIG_ANN_FREQ) || (val.i == RIG_ANN_RXMODE) || ((val.i == RIG_ANN_NONE) && (rig->caps->rig_model == RIG_MODEL_ICR8600)) ) { prm_cn = C_CTL_ANN; prm_sc = val.i; prm_len = 0; @@ -2635,8 +2667,14 @@ int icom_set_parm(RIG *rig, setting_t parm, value_t val) if (priv->civ_version == 1) { prm_sc = 0x05; prm_len = 4; - prmbuf[0] = 0x00; - prmbuf[1] = 0x81; + if (rig->caps->rig_model == RIG_MODEL_ICR8600) { + prmbuf[0] = 0x01; + prmbuf[1] = 0x15; + } + else { + prmbuf[0] = 0x00; + prmbuf[1] = 0x81; + }; to_bcd_be(prmbuf+2, (long long)icom_val, (prm_len-2)*2); } else { @@ -2646,6 +2684,27 @@ int icom_set_parm(RIG *rig, setting_t parm, value_t val) to_bcd_be(prmbuf+1, (long long)icom_val, (prm_len-1)*2); } break; + case RIG_PARM_KEYLIGHT: + prm_cn = C_CTL_MEM; + icom_val = val.f * 255; + if (priv->civ_version == 1) { + prm_sc = 0x05; + prm_len = 4; + if (rig->caps->rig_model == RIG_MODEL_ICR8600) { + prmbuf[0] = 0x01; + prmbuf[1] = 0x16; + } + else { + /* replace with sub-subcommand codes for your rig */ + return -RIG_EINVAL; + }; + to_bcd_be(prmbuf+2, (long long)icom_val, (prm_len-2)*2); + } + else { + /* only supported on newer rigs */ + return -RIG_EINVAL; + } + break; case RIG_PARM_BEEP: prm_cn = C_CTL_MEM; if (priv->civ_version == 1) { @@ -2735,8 +2794,14 @@ int icom_get_parm(RIG *rig, setting_t parm, value_t *val) prm_cn = C_CTL_MEM; prm_sc = 0x05; prm_len = 2; - prmbuf[0] = 0x00; - prmbuf[1] = 0x81; + if (rig->caps->rig_model == RIG_MODEL_ICR8600) { + prmbuf[0] = 0x01; + prmbuf[1] = 0x15; + } + else { + prmbuf[0] = 0x00; + prmbuf[1] = 0x81; + } } else { prm_cn = C_CTL_MEM; @@ -2745,6 +2810,25 @@ int icom_get_parm(RIG *rig, setting_t parm, value_t *val) prmbuf[0] = S_PRM_BACKLT; } break; + case RIG_PARM_KEYLIGHT: + if (priv->civ_version == 1) { + prm_cn = C_CTL_MEM; + prm_sc = 0x05; + prm_len = 2; + if (rig->caps->rig_model == RIG_MODEL_ICR8600) { + prmbuf[0] = 0x01; + prmbuf[1] = 0x16; + } + else { + /* replace with sub-subcommand codes for your rig */ + return -RIG_EINVAL; + } + } + else { + /* only supported on newer rigs */ + return -RIG_EINVAL; + } + break; case RIG_PARM_BEEP: if (priv->civ_version == 1) { prm_cn = C_CTL_MEM; @@ -2827,6 +2911,15 @@ int icom_get_parm(RIG *rig, setting_t parm, value_t *val) } val->f = (float)icom_val/255.0; break; + case RIG_PARM_KEYLIGHT: + icom_val = 0; + if (priv->civ_version == 1) { + icom_val = from_bcd_be(resbuf+cmdhead+1, (res_len-1)*2); + } else { + return -RIG_EINVAL; + } + val->f = (float)icom_val/255.0; + break; case RIG_PARM_BEEP: if (priv->civ_version == 1) { icom_val = from_bcd_be(resbuf+cmdhead+1, (res_len-1)*2); @@ -3260,7 +3353,7 @@ int icom_set_ant(RIG * rig, vfo_t vfo, ant_t ant) } antarg = 0; - ant_len = (rig->caps->rig_model == RIG_MODEL_ICR75) ? 0 : 1; + ant_len = ((rig->caps->rig_model == RIG_MODEL_ICR75) || (rig->caps->rig_model == RIG_MODEL_ICR8600))? 0 : 1; retval = icom_transaction (rig, C_CTL_ANT, i_ant, &antarg, ant_len, ackbuf, &ack_len); if (retval != RIG_OK) @@ -3838,6 +3931,7 @@ DECLARE_INITRIG_BACKEND(icom) rig_register(&icr7000_caps); rig_register(&icr7100_caps); rig_register(&icr8500_caps); + rig_register(&icr8600_caps); rig_register(&icr9000_caps); rig_register(&icr9500_caps); diff --git a/icom/icom.h b/icom/icom.h index 82a790953..1920086c3 100644 --- a/icom/icom.h +++ b/icom/icom.h @@ -126,6 +126,7 @@ struct icom_priv_data { }; extern const struct ts_sc_list r8500_ts_sc_list[]; +extern const struct ts_sc_list r8600_ts_sc_list[]; extern const struct ts_sc_list ic737_ts_sc_list[]; extern const struct ts_sc_list r75_ts_sc_list[]; extern const struct ts_sc_list r7100_ts_sc_list[]; @@ -280,5 +281,6 @@ extern const struct rig_caps perseus_caps; extern const struct rig_caps x108g_caps; +extern const struct rig_caps icr8600_caps; #endif /* _ICOM_H */ diff --git a/icom/icom_defs.h b/icom/icom_defs.h index c9557db54..bc34c88a9 100644 --- a/icom/icom_defs.h +++ b/icom/icom_defs.h @@ -145,7 +145,7 @@ /* * Set MEM (C_SET_MEM) sub commands */ -#define S_BANK 0xa0 /* Select memory bank */ +#define S_BANK 0xa0 /* Select memory bank (aka 'memory group' with IC-R8600) */ /* * Scan control (C_CTL_SCAN) subcommands @@ -332,6 +332,17 @@ #define S_MEM_SATMODE 0x07 /* Satellite mode (on/off) */ #define S_MEM_BANDSCOPE 0x08 /* Simple bandscope (on/off) */ +/* IC-R8600 and others */ +#define S_MEM_SKIP_SLCT_OFF 0x00 +#define S_MEM_SKIP_SLCT_ON 0x10 +#define S_MEM_PSKIP_SLCT_ON 0x20 +#define S_MEM_DUP_OFF 0x00 +#define S_MEM_DUP_MINUS 0x01 +#define S_MEM_DUP_PLUS 0x02 +#define S_MEM_TSTEP_OFF 0x00 +#define S_MEM_TSTEP_ON 0x01 +#define S_FUNC_IPPLUS 0x07 /* IP+ subcommand 0x1a 0x07 */ + /* * Tone control (C_SET_TONE) subcommands diff --git a/icom/icr8600.c b/icom/icr8600.c new file mode 100644 index 000000000..9ecb31755 --- /dev/null +++ b/icom/icr8600.c @@ -0,0 +1,477 @@ +/* + * Hamlib CI-V backend - description of IC-R75 + * Copyright (c) 2000-2004 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 + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include +#include + +#include "hamlib/rig.h" +#include "misc.h" +#include "idx_builtin.h" + +#include "icom.h" +#include "icom_defs.h" +#include "frame.h" + + +/* + * IC-R8600 + * + * TODO: + * RIG_FUNC + + what about RF (TPF)? RIG_FUNC_RF is not an audio filter, r8600 has an audio TPF. Use FUNC_RF? RIG_FUNC_ is full... + + add a gazillion of other, new functions, but how when RIG_FUNC_ is full? + * RIG_LEVEL_ + + add a gazillion of other, new level settings + * check _PARM_ALL features, what is supported and what not. + * correct ICR8600_STR_CAL data. Currently its just a copy of the IC-R75 data + * improve ICR8600_MEM_CAP, Currently its just a copy of the IC-R75 data, but the IC-R8600 can save much more data + * check icr8600_caps.lvl_gran for correctness, currently just copied data from IC-R75 + * extend icr8600_caps.parm_gran for date + * correct filters in caps struct + * check LEVEL AGC, rig responds with 1:slow, 3:mid, 5:fast, docs says 1,2,3 Also AGC is mode specific. Was this alsways the case? Do we bother? + * calibrate LEVEL STRENGTH + */ + +/* + Notes by DF4OR, while trying to understand hamlib + * RIG_FUNC_ is a 32 bit word, not extensible, how to add new functions/capabilities? + * TSQL: RIG_FUNC_TSQL is Tsql on/off function (TSQL status 0x16 0x43). + Actual TSQL frequency is set with icom_set_ctcss_sql() (0x1b 0x01) + icom_set_ctcss_tone() is for transmit ctrcss tone (not applicable here) + same for DCS + * Scan resume settingsare the old style (0x0e 0xd0-0xd3) and incomplete, implement better with scan funcs + +*/ + + +#define ICR8600_MODES (RIG_MODE_LSB|RIG_MODE_USB|RIG_MODE_AM|RIG_MODE_CW|RIG_MODE_RTTY|RIG_MODE_FM|RIG_MODE_WFM|RIG_MODE_CWR|RIG_MODE_RTTYR|RIG_MODE_SAM|RIG_MODE_SAL|RIG_MODE_SAH|RIG_MODE_P25|RIG_MODE_DSTAR|RIG_MODE_DPMR|RIG_MODE_NXDNVN|RIG_MODE_NXDN_N|RIG_MODE_DCR) + +#define ICR8600_FUNC_ALL (RIG_FUNC_NB|RIG_FUNC_ANF|RIG_FUNC_MN|RIG_FUNC_NR|RIG_FUNC_AIP|RIG_FUNC_LOCK|RIG_FUNC_VSC|RIG_FUNC_RESUME|RIG_FUNC_TSQL) + +#define ICR8600_LEVEL_ALL (RIG_LEVEL_ATT|RIG_LEVEL_AF|RIG_LEVEL_RF|RIG_LEVEL_SQL|RIG_LEVEL_NR|RIG_LEVEL_PBT_IN|RIG_LEVEL_PBT_OUT|RIG_LEVEL_CWPITCH|RIG_LEVEL_PREAMP|RIG_LEVEL_AGC|RIG_LEVEL_RAWSTR|RIG_LEVEL_STRENGTH) + +#define ICR8600_PARM_ALL (RIG_PARM_ANN|RIG_PARM_BACKLIGHT|RIG_PARM_BEEP|RIG_PARM_TIME|RIG_PARM_KEYLIGHT) + +#define ICR8600_VFO_ALL (RIG_VFO_VFO|RIG_VFO_MEM) + +#define ICR8600_VFO_OPS (RIG_OP_FROM_VFO|RIG_OP_TO_VFO|RIG_OP_MCL) +#define ICR8600_SCAN_OPS (RIG_SCAN_MEM|RIG_SCAN_VFO|RIG_SCAN_SLCT|RIG_SCAN_PRIO|RIG_SCAN_PRIO|RIG_SCAN_DELTA|RIG_SCAN_STOP) + +#define ICR8600_ANTS_HF (RIG_ANT_1|RIG_ANT_2|RIG_ANT_3) +#define ICR8600_ANTS_VHF (RIG_ANT_1) + +#define ICR8600_STR_CAL { 17, { \ + { 0, -60 }, \ + { 37, -54 }, \ + { 52, -48 }, \ + { 61, -42 }, \ + { 72, -36 }, \ + { 86, -30 }, \ + { 95, -24 }, \ + { 109, -18 }, \ + { 124, -12 }, \ + { 128, -6 }, \ + { 146, 0 }, \ + { 166, 10 }, \ + { 186, 20 }, \ + { 199, 30 }, \ + { 225, 40 }, \ + { 233, 50 }, \ + { 255, 60 }, \ + } } + +/* + * channel caps. + */ +#define ICR8600_MEM_CAP { \ + .freq = 1, \ + .mode = 1, \ + .width = 1, \ + .ant = 1, \ + .levels = RIG_LEVEL_ATT|RIG_LEVEL_PREAMP, \ + .channel_desc = 1, \ + .flags = 1, \ +} + +static int icr8600_set_channel(RIG *rig, const channel_t *chan); +static int icr8600_get_channel(RIG *rig, channel_t *chan); + +static const struct icom_priv_caps icr8600_priv_caps = { + 0x96, /* default address */ + 0, /* 731 mode */ + 0, /* no XCHG */ + r8600_ts_sc_list, /* list of tuning steps */ + .civ_version = 1 /* modifies behaviour in various icom.c functions */ +}; + +const struct rig_caps icr8600_caps = { +.rig_model = RIG_MODEL_ICR8600, +.model_name = "IC-R8600", +.mfg_name = "Icom", +.version = "0.1alpha", +.copyright = "LGPL", +.status = RIG_STATUS_ALPHA, +.rig_type = RIG_TYPE_RECEIVER, +.ptt_type = RIG_PTT_NONE, +.dcd_type = RIG_DCD_RIG, +.port_type = RIG_PORT_SERIAL, +.serial_rate_min = 300, +.serial_rate_max = 19200, // USB can do up to 115000 +.serial_data_bits = 8, +.serial_stop_bits = 1, +.serial_parity = RIG_PARITY_NONE, +.serial_handshake = RIG_HANDSHAKE_NONE, +.write_delay = 0, +.post_write_delay = 1, +.timeout = 1000, +.retry = 3, +.has_get_func = ICR8600_FUNC_ALL, +.has_set_func = ICR8600_FUNC_ALL, +.has_get_level = ICR8600_LEVEL_ALL, +.has_set_level = RIG_LEVEL_SET(ICR8600_LEVEL_ALL), +.has_get_parm = ICR8600_PARM_ALL, +.has_set_parm = RIG_PARM_SET(ICR8600_PARM_ALL), +.level_gran = { + [LVL_RAWSTR] = { .min = { .i = 0 }, .max = { .i = 255 } }, + [LVL_PBT_IN] = { .min = { .f = -1280 }, .max = { .f = +1280 }, .step = { .f = 15 } }, + [LVL_PBT_OUT] = { .min = { .f = -1280 }, .max = { .f = +1280 }, .step = { .f = 15 } }, + [LVL_CWPITCH] = { .min = { .i = 300 }, .max = { .i = 900 }, .step = { .i = 10 } }, + [LVL_NR] = { .min = { .f = 0.0 }, .max = { .f = 1.0 }, .step = { .f = 0.066666667 } }, +}, +.parm_gran = { + [PARM_TIME] = { .min = { .i = 0 }, .max = { .i = 86399} }, +}, +.ctcss_list = common_ctcss_list, +.dcs_list = common_dcs_list, +.preamp = { 20, RIG_DBLST_END, }, /* 20 on HF, 14 on VHF, UHF, same setting */ +.attenuator = { 10, 20, 30, RIG_DBLST_END, }, +.max_rit = Hz(0), +.max_xit = Hz(0), +.max_ifshift = Hz(0), +.targetable_vfo = 0, +.vfo_ops = ICR8600_VFO_OPS, +.scan_ops = ICR8600_SCAN_OPS, +.transceive = RIG_TRN_RIG, +.bank_qty = 100, +.chan_desc_sz = 16, + +.chan_list = { + { 0, 99, RIG_MTYPE_MEM, ICR8600_MEM_CAP }, + { 0, 99, RIG_MTYPE_EDGE, ICR8600_MEM_CAP }, + /* to be extended */ + RIG_CHAN_END, + }, + +.rx_range_list1 = { + { kHz(10), MHz(3000), ICR8600_MODES, -1, -1, ICR8600_VFO_ALL, ICR8600_ANTS_VHF }, + { kHz(10), MHz(30), ICR8600_MODES, -1, -1, ICR8600_VFO_ALL, ICR8600_ANTS_HF }, + RIG_FRNG_END, }, +.tx_range_list1 = { RIG_FRNG_END, }, + +.rx_range_list2 = { + { kHz(10), MHz(3000), ICR8600_MODES, -1, -1, ICR8600_VFO_ALL, ICR8600_ANTS_VHF }, + { kHz(10), MHz(30), ICR8600_MODES, -1, -1, ICR8600_VFO_ALL, ICR8600_ANTS_HF }, + RIG_FRNG_END, }, +.tx_range_list2 = { RIG_FRNG_END, }, + +.tuning_steps = { + {ICR8600_MODES,Hz(10)}, + {ICR8600_MODES,Hz(100)}, + {ICR8600_MODES,kHz(1)}, + {ICR8600_MODES,Hz(2500)}, + {ICR8600_MODES,Hz(3125)}, + {ICR8600_MODES,kHz(5)}, + {ICR8600_MODES,kHz(6.25)}, + {ICR8600_MODES,Hz(8330)}, + {ICR8600_MODES,kHz(9)}, + {ICR8600_MODES,kHz(10)}, + {ICR8600_MODES,kHz(12.5)}, + {ICR8600_MODES,kHz(20)}, + {ICR8600_MODES,kHz(25)}, + {ICR8600_MODES,kHz(100)}, + RIG_TS_END, + /* programmable tuning step not implemented */ + }, + /* mode/filter list, remember: order matters! */ +.filters = { + {RIG_MODE_SSB|RIG_MODE_CW|RIG_MODE_CWR|RIG_MODE_RTTY|RIG_MODE_RTTYR, kHz(2.4)}, + {RIG_MODE_SSB|RIG_MODE_CW|RIG_MODE_CWR|RIG_MODE_RTTY|RIG_MODE_RTTYR, kHz(1.9)}, + {RIG_MODE_SSB|RIG_MODE_CW|RIG_MODE_CWR|RIG_MODE_RTTY|RIG_MODE_RTTYR, kHz(6)}, + {RIG_MODE_AM|RIG_MODE_AMS, kHz(6)}, + {RIG_MODE_AM|RIG_MODE_AMS, kHz(2.4)}, + {RIG_MODE_AM|RIG_MODE_AMS, kHz(15)}, + {RIG_MODE_FM, kHz(15)}, + {RIG_MODE_FM, kHz(6)}, + RIG_FLT_END, + }, + +.str_cal = ICR8600_STR_CAL, + +.cfgparams = icom_cfg_params, + +.set_conf = icom_set_conf, +.get_conf = icom_get_conf, + +.priv = (void*)&icr8600_priv_caps, +.rig_init = icom_init, +.rig_cleanup = icom_cleanup, +.rig_open = NULL, +.rig_close = NULL, + +.set_freq = icom_set_freq, +.get_freq = icom_get_freq, +.set_mode = icom_set_mode, +.get_mode = icom_get_mode, +.set_vfo = icom_set_vfo, +.set_ant = icom_set_ant, +.get_ant = icom_get_ant, + +.decode_event = icom_decode_event, +.set_func = icom_set_func, +.get_func = icom_get_func, +.set_level = icom_set_level, +.get_level = icom_get_level, +.set_parm = icom_set_parm, +.get_parm = icom_get_parm, +.get_dcd = icom_get_dcd, +.set_mem = icom_set_mem, +.vfo_op = icom_vfo_op, +.scan = icom_scan, +.set_ts = icom_set_ts, +.get_ts = icom_get_ts, +.set_powerstat = icom_set_powerstat, +.get_powerstat = icom_get_powerstat, +.set_ctcss_sql = icom_set_ctcss_sql, +.get_ctcss_sql = icom_get_ctcss_sql, +.set_channel = icr8600_set_channel, +.get_channel = icr8600_get_channel, + +}; + + + + + + + +/* + * icr8600_set_channel + * Assumes rig!=NULL, rig->state.priv!=NULL, chan!=NULL + * Derived from IC-R75 set_channel function + * TODO: adjust to IC-R8600 + */ +int icr8600_set_channel(RIG *rig, const channel_t *chan) +{ + unsigned char chanbuf[MAXFRAMELEN], ackbuf[MAXFRAMELEN]; + int chan_len, freq_len, ack_len, retval; + unsigned char icmode; + signed char icmode_ext; + int err; + + // octets 0,1: group number, bcd + to_bcd_be(chanbuf, chan->bank_num, 4); + + // octets 2,3: channel number, bcd + to_bcd_be(chanbuf+2, chan->channel_num, 4); + + // octet 4: skip/select + // hi nibble: skip off, skip or pskip + // lo nibble: 0-9 scan group + chanbuf[4] = S_MEM_SKIP_SLCT_OFF; + if (chan->flags & RIG_CHFLAG_SKIP) + chanbuf[4] = S_MEM_SKIP_SLCT_ON; + if (chan->flags & RIG_CHFLAG_PSKIP) + chanbuf[4] = S_MEM_PSKIP_SLCT_ON; + chanbuf[4] |= (chan->scan_group & 0x0f); + + + // octets 5,6,7,8,9: rx frequency + // IC-R8600 knows only 5 byte len frequencies, as do all Icom memory frequencies, no need to cater for varying lengths + freq_len = 5; + to_bcd(chanbuf+5, chan->freq, freq_len*2); // to_bcd needs nibble len + + // octets 10, 11: rx mode + err = rig2icom_mode(rig, chan->mode, chan->width, &icmode, &icmode_ext); + if (err != RIG_OK) + return err; + + chanbuf[10] = icmode; + chanbuf[11] = icmode_ext; + + // octet 12: duplex setting TODO: fixed at off, I have to better understand channel struct and what I can modify and what not. + chanbuf[12] = S_MEM_DUP_OFF; + + // octets 13,14,15,16: offset freq + to_bcd(chanbuf+13, chan->rptr_offs, 4*2); // to_bcd needs nibble len + + // octets 17,18: tuning steps + if (chan->tuning_step > 0) { + chanbuf[17] = S_MEM_TSTEP_ON; + int i; + for (i=0; ituning_step) { + chanbuf[18] = r8600_ts_sc_list[i].sc; + break; + } + } + if (i >= TSLSTSIZ) + return -RIG_EINVAL; /* not found, unsupported */ + } + else { + chanbuf[17] = S_MEM_TSTEP_OFF; + chanbuf[18] = 0; // docs unclear what is allowed here, test. + }; + + // octets 19,20: programmable tuning step, 4 dig BCD + to_bcd_be(chanbuf+19, chan->channel_num, 4); + + // octet 21: attenuator + to_bcd_be(chanbuf+21, chan->levels[rig_setting2idx(RIG_LEVEL_ATT)].i, 2); + + // octet 22: preamp on/off. THis is no level, but an on/off function, need to adjust. TODO + to_bcd_be(chanbuf+22, chan->levels[rig_setting2idx(RIG_LEVEL_PREAMP)].i, 2); + + // octet 23: antenna 0,1,2 + to_bcd_be(chanbuf+23,chan->ant,2); + + // octet 24: IP+ setting, on/off + if ((chan->funcs & RIG_FUNC_AIP) > 0) // IP+. The tern AIP is slightly misleading, but RIG_FUNC_ is full (32 bit), so I use AIP. + chanbuf[24] = 0x01; + else + chanbuf[24] = 0x00; + + // octets 25-40: name + memset(chanbuf+25, 0x20, 16); // space + snprintf((char *) (chanbuf+25), 17, "%.16s", chan->channel_desc); + + chan_len = 41; + + retval = icom_transaction (rig, C_CTL_MEM, S_MEM_CNTNT, chanbuf, chan_len, ackbuf, &ack_len); + if (retval != RIG_OK) + return retval; + + if (ack_len != 1 || ackbuf[0] != ACK) { + rig_debug(RIG_DEBUG_ERR,"icom_set_channel: ack NG (%#.2x), " + "len=%d\n", ackbuf[0],ack_len); + return -RIG_ERJCTED; + } + + return RIG_OK; +} + + + +/* + * icr8600_get_channel + * Assumes rig!=NULL, rig->state.priv!=NULL, chan!=NULL + * TODO: still a WIP --SF + */ +int icr8600_get_channel(RIG *rig, channel_t *chan) +{ + struct icom_priv_data *priv; + struct rig_state *rs; + unsigned char chanbuf[24]; + int chan_len, freq_len, retval; + + rs = &rig->state; + priv = (struct icom_priv_data*)rs->priv; + + to_bcd_be(chanbuf,chan->channel_num,4); + chan_len = 2; + + freq_len = priv->civ_731_mode ? 4:5; + + retval = icom_transaction (rig, C_CTL_MEM, S_MEM_CNTNT, + chanbuf, chan_len, chanbuf, &chan_len); + if (retval != RIG_OK) + return retval; + + chan->vfo = RIG_VFO_MEM; + chan->ant = RIG_ANT_NONE; + chan->freq = 0; + chan->mode = RIG_MODE_NONE; + chan->width = RIG_PASSBAND_NORMAL; + chan->tx_freq = 0; + chan->tx_mode = RIG_MODE_NONE; + chan->tx_width = RIG_PASSBAND_NORMAL; + chan->split = RIG_SPLIT_OFF; + chan->tx_vfo = RIG_VFO_NONE; + chan->rptr_shift = RIG_RPT_SHIFT_NONE; + chan->rptr_offs = 0; + chan->tuning_step = 0; + chan->rit = 0; + chan->xit = 0; + chan->funcs = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_PREAMP)].i = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_ATT)].i = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_AF)].f = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_RF)].f = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_SQL)].f = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_NR)].f = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_PBT_IN)].f = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_PBT_OUT)].f = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_CWPITCH)].i = 0; + chan->levels[rig_setting2idx(RIG_LEVEL_AGC)].i = RIG_AGC_OFF; + chan->ctcss_tone = 0; + chan->ctcss_sql = 0; + chan->dcs_code = 0; + chan->dcs_sql = 0; + chan->scan_group = 0; + chan->flags = RIG_CHFLAG_SKIP; + strcpy(chan->channel_desc, " "); + + /* + * freqbuf should contain Cn,Data area + */ + if ((chan_len != freq_len+18) && (chan_len != 5)) { + rig_debug(RIG_DEBUG_ERR,"icr75_get_channel: wrong frame len=%d\n", + chan_len); + return -RIG_ERJCTED; + } + + /* do this only if not a blank channel */ + if (chan_len != 5) { + /* + * from_bcd requires nibble len + */ + chan->flags = RIG_CHFLAG_NONE; + + chan->freq = from_bcd(chanbuf+5, freq_len*2); + + chan_len = 4+freq_len+1; + + icom2rig_mode(rig, chanbuf[chan_len], chanbuf[chan_len+1], + &chan->mode, &chan->width); + chan_len += 2; + if (from_bcd_be(chanbuf+chan_len++,2) != 0) + chan->levels[rig_setting2idx(RIG_LEVEL_ATT)].i = 20; + if (from_bcd_be(chanbuf+chan_len++,2) != 0) + chan->levels[rig_setting2idx(RIG_LEVEL_PREAMP)].i = 20; + chan->ant = from_bcd_be(chanbuf+chan_len++,2); + strncpy(chan->channel_desc, (char *) (chanbuf+chan_len), 8); + } + + return RIG_OK; +} diff --git a/include/hamlib/rig.h b/include/hamlib/rig.h index 48cbbe952..e39e353d6 100644 --- a/include/hamlib/rig.h +++ b/include/hamlib/rig.h @@ -745,7 +745,7 @@ enum rig_parm_e { RIG_PARM_KEYLIGHT = (1 << 7) /*!< \c KEYLIGHT -- Button backlight, on/off */ }; -#define RIG_PARM_FLOAT_LIST (RIG_PARM_BACKLIGHT|RIG_PARM_BAT) +#define RIG_PARM_FLOAT_LIST (RIG_PARM_BACKLIGHT|RIG_PARM_BAT|RIG_PARM_KEYLIGHT) #define RIG_PARM_READONLY_LIST (RIG_PARM_BAT) #define RIG_PARM_IS_FLOAT(l) ((l)&RIG_PARM_FLOAT_LIST) @@ -843,6 +843,7 @@ typedef unsigned long setting_t; * \c STRING used in rigctl * * \sa rig_parse_mode(), rig_strrmode() + * TODO: Add new 8600 modes to rig2icom_mode() and icom2rig_mode() in frame.c */ typedef enum { RIG_MODE_NONE = 0, /*!< '' -- None */ @@ -868,6 +869,12 @@ typedef enum { RIG_MODE_DSB = (1 << 19), /*!< \c DSB -- Double sideband suppressed carrier */ RIG_MODE_FMN = (1 << 21), /*!< \c FMN -- FM Narrow Kenwood ts990s */ RIG_MODE_PKTAM = (1 << 22), /*!< \c PKTAM -- Packet/Digital AM mode e.g. IC7300 */ + RIG_MODE_P25 = (1 << 23), /*!< \c P25 -- APCO/P25 VHF,UHF digital mode IC-R8600 */ + RIG_MODE_DSTAR = (1 << 24), /*!< \c D-Star -- VHF,UHF digital mode IC-R8600 */ + RIG_MODE_DPMR = (1 << 25), /*!< \c dPMR -- digital PMR, VHF,UHF digital mode IC-R8600 */ + RIG_MODE_NXDNVN = (1 << 26), /*!< \c NXDN-VN -- VHF,UHF digital mode IC-R8600 */ + RIG_MODE_NXDN_N = (1 << 27), /*!< \c NXDN-N -- VHF,UHF digital mode IC-R8600 */ + RIG_MODE_DCR = (1 << 28), /*!< \c DCR -- VHF,UHF digital mode IC-R8600 */ RIG_MODE_TESTS_MAX /*!< \c MUST ALWAYS BE LAST, Max Count for dumpcaps.c */ } rmode_t; @@ -983,7 +990,10 @@ struct filter_list { * \brief DATA port mode flag */ #define RIG_CHFLAG_DATA (1<<1) - +/** + * \brief programmed skip (PSKIP) memory channel during scan (lock out), channel_t.flags + */ +#define RIG_CHFLAG_PSKIP (1<<2) /** * \brief Extension attribute definition diff --git a/include/hamlib/riglist.h b/include/hamlib/riglist.h index 673202977..c137b0239 100644 --- a/include/hamlib/riglist.h +++ b/include/hamlib/riglist.h @@ -231,7 +231,8 @@ #define RIG_MODEL_X108G RIG_MAKE_MODEL(RIG_ICOM, 76) /* Xiegu X108 */ #define RIG_MODEL_ICR6 RIG_MAKE_MODEL(RIG_ICOM, 77) #define RIG_MODEL_IC7610 RIG_MAKE_MODEL(RIG_ICOM, 78) -/* next one is 79 */ +#define RIG_MODEL_ICR8600 RIG_MAKE_MODEL(RIG_ICOM, 79) +/* next one is 80 */ /* diff --git a/include/hamlib/rotlist.h b/include/hamlib/rotlist.h index 9afdf0ac8..a40268730 100644 --- a/include/hamlib/rotlist.h +++ b/include/hamlib/rotlist.h @@ -361,6 +361,18 @@ #define ROT_BACKEND_MEADE "meade" #define ROT_MODEL_MEADE ROT_MAKE_MODEL(ROT_MEADE, 1) +/** + * \def ROT_MODEL_IOPTRON + * \brief A macro that returns the model number of the IOPTRON backend. + * + * The IOPTRON backen can be used with IOPTRON telescope mounts + */ +#define ROT_IOPTRON 19 +#define ROT_BACKEND_IOPTRON "ioptron" +#define ROT_MODEL_IOPTRON ROT_MAKE_MODEL(ROT_IOPTRON, 1) + + + /** * \typedef typedef int rot_model_t diff --git a/ioptron/Android.mk b/ioptron/Android.mk new file mode 100644 index 000000000..439c0b482 --- /dev/null +++ b/ioptron/Android.mk @@ -0,0 +1,12 @@ +LOCAL_PATH:= $(call my-dir) + +include $(CLEAR_VARS) + +LOCAL_SRC_FILES := rot_ioptron.c +LOCAL_MODULE := rot_ioptron + +LOCAL_CFLAGS := -DHAVE_CONFIG_H +LOCAL_C_INCLUDES := android include src +LOCAL_LDLIBS := -lhamlib -Lobj/local/armeabi + +include $(BUILD_STATIC_LIBRARY) diff --git a/ioptron/Makefile.am b/ioptron/Makefile.am new file mode 100644 index 000000000..220f11da4 --- /dev/null +++ b/ioptron/Makefile.am @@ -0,0 +1,6 @@ +IOPTRONSRC = rot_ioptron.c rot_ioptron.h + +noinst_LTLIBRARIES = libhamlib-ioptron.la +libhamlib_ioptron_la_SOURCES = $(IOPTRONSRC) + +EXTRA_DIST = Android.mk diff --git a/ioptron/README_ioptron b/ioptron/README_ioptron new file mode 100644 index 000000000..d001c0431 --- /dev/null +++ b/ioptron/README_ioptron @@ -0,0 +1,10 @@ +This is a small backend for iOptron alt-az mounts. It implements get position, goto position, stop and get info. It has been tested from the command line and with Gpredict with an iEQ45 Pro in alt-az mode. It should work for other iOptron alt-az mounts such as the AZ Mount Pro, Cube-II, CubePro and iEQ30 Pro in alt-az mode as iOptron claims that they all use the same command language. + +A warning on iOptron command language. iOptron is in the process of moving from V2 to V3 of the command lamguage and presently (December 2018) uses a mix of the two. This back end should work with mounts with current firmware, but new firmware may change commands and break it. + +Minor annoyance - the mount will automatically start siderial tracking after a slew. Adding a stop tracking command at the end of the goto set did not solve the problem. + +Bigger annoyance - Be careful with the GEM mounts (iEQ30, iEQ45) in alt-az mode. The dec/el motor cord easily catches on the ra/az clutch knobs when slewing in az. I attached a small standoff to keep the cord out of the way. + +Reccomendation - since the hand controller remains plugged, in I suggest that you use it for calibration, manual slews and setting and going to the zero position. + diff --git a/ioptron/rot_ioptron.c b/ioptron/rot_ioptron.c new file mode 100644 index 000000000..d8671d6c5 --- /dev/null +++ b/ioptron/rot_ioptron.c @@ -0,0 +1,350 @@ +/* + * Hamlib Rotator backend - Celestron + * Copyright (c) 2011 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 + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include +#include +#include +#include +#include +#include +#include +#include + +#include "hamlib/rotator.h" +#include "serial.h" +#include "misc.h" +#include "register.h" + +#include "rot_ioptron.h" + +#define ACK "#" +#define ACK1 '1' + +#define BUFSZ 128 + +/** + * ioptron_transaction + * + * cmdstr - Command to be sent to the rig. + * data - Buffer for reply string. Can be NULL, indicating that no reply is + * is needed, but answer will still be read. + * data_len - in: Size of buffer. It is the caller's responsibily to provide + * a large enough buffer for all possible replies for a command. + * + * COMMANDS note: as of 12/2018 a mixture of V2 and V3 + * | TTTTTTTT(T) .01 arc seconds + * | alt- sign with 8 digits, az - 9 digits | + * | Command | Atribute | Return value | Description | + * -------------------------------------------------------------------| + * | :GAC# | .01 arcsec | sTTTTTTTTTTTTTTTTT# | gets alt(s8), az(9) | + * | :SzTTTTTTTTT# | .01 arcsec | '1' == OK | Set Target azimuth | + * | :SasTTTTTTTT# |.01 arcsec | '1' == OK | Set Target elevation | + * | :Q# | - | '1' == OK | Halt all slewing | + * | :ST0# | - | '1' == OK | Halt tracking | + * | :MS# | - | '1' == OK | GoTo Target | + * | + * returns: + * RIG_OK - if no error occured. + * RIG_EIO - if an I/O error occured while sending/receiving data. + * RIG_ETIMEOUT - if timeout expires without any characters received. + */ + +static int +ioptron_transaction(ROT *rot, const char *cmdstr, + char *data, size_t data_len) +{ + struct rot_state *rs; + int retval; + int retry_read = 0; + char replybuf[BUFSZ]; + + rs = &rot->state; + +transaction_write: + + serial_flush(&rs->rotport); + + if (cmdstr) + { + retval = write_block(&rs->rotport, cmdstr, strlen(cmdstr)); + + if (retval != RIG_OK) + { + goto transaction_quit; + } + } + + /** Always read the reply to know whether the cmd went OK */ + if (!data) + { + data = replybuf; + } + + if (!data_len) + { + data_len = BUFSZ; + } + + /** the answer */ + memset(data, 0, data_len); + retval = read_string(&rs->rotport, data, data_len, ACK, strlen(ACK)); + + if (retval < 0) + { + if (retry_read++ < rot->state.rotport.retry) + { + goto transaction_write; + } + + goto transaction_quit; + } + + /** check for acknowledge */ + if (retval < 1) + { + rig_debug(RIG_DEBUG_ERR, "%s: unexpected response, len %d: '%s'\n", __func__, + retval, data); + return -RIG_EPROTO; + } + + retval = RIG_OK; +transaction_quit: + return retval; +} + +/** + * Opens the Port and sets all needed parametes for operation + * as of 12/2018 initiates mount with V3 :MountInfo# + */ +static int ioptron_open(ROT *rot) +{ + rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __func__); + + return ioptron_transaction(rot, ":Mountinfo#", NULL, 0); +} + +/** sets mount position, requires 4 steps + * set azmiuth + * set altitude + * goto set + * stop tracking - mount starts tracking after goto + */ +static int +ioptron_set_position(ROT *rot, azimuth_t az, elevation_t el) +{ + char cmdstr[32]; + char retbuf[10]; + int retval; + float faz, fel; + + rig_debug(RIG_DEBUG_TRACE, "%s called: %f %f\n", __func__, az, el); + +/* units .01 arc sec */ + faz = az * 360000; + fel = el * 360000; +/* set azmiuth, returns '1" if OK */ + sprintf(cmdstr, ":Sz%09.0f#", faz); + retval = ioptron_transaction(rot, cmdstr, retbuf, sizeof(retbuf)); + + if (retval != RIG_OK || retbuf[0] != ACK1) + { + return -RIG_EPROTO; + } + +/* set altitude, returns '1" if OK */ + sprintf(cmdstr, ":Sa+%08.0f#", fel); + retval = ioptron_transaction(rot, cmdstr, retbuf, sizeof(retbuf)); + + if (retval != RIG_OK || retbuf[0] != ACK1) + { + return -RIG_EPROTO; + } + +/* move to set target, V2 command, returns '1" if OK */ + sprintf(cmdstr, ":MS#"); // + retval = ioptron_transaction(rot, cmdstr, retbuf, sizeof(retbuf)); + + if (retval != RIG_OK || retbuf[0] != ACK1) + { + return -RIG_EPROTO; + } + +/* stop tracking, V2 command, returns '1" if OK */ + sprintf(cmdstr, ":ST0#"); + retval = ioptron_transaction(rot, cmdstr, retbuf, sizeof(retbuf)); + + if (retval != RIG_OK || retbuf[0] != ACK1) + { + return -RIG_EPROTO; + } + + return retval; +} + +/** gets current position */ +static int +ioptron_get_position(ROT *rot, azimuth_t *az, elevation_t *el) +{ + char posbuf[32]; + int retval; + float w; + + rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__); + + /** Get Az-Alt */ + retval = ioptron_transaction(rot, ":GAC#", posbuf, sizeof(posbuf)); + + if (retval != RIG_OK || strlen(posbuf) < 18) + { + return retval < 0 ? retval : -RIG_EPROTO; + } + + if (sscanf(posbuf, "%9f", &w) != 1) + { + return -RIG_EPROTO; + } + + /** convert from .01 arc sec to degrees */ + *el = ((elevation_t)w / 360000.); + + if (sscanf(posbuf + 9, "%9f", &w) != 1) + { + return -RIG_EPROTO; + } + + *az = ((azimuth_t)w / 360000.); + + rig_debug(RIG_DEBUG_TRACE, "%s: (az, el) = (%.1f, %.1f)\n", + __func__, *az, *el); + + return RIG_OK; +} + +/** stop everything **/ +static int +ioptron_stop(ROT *rot) +{ + int retval; + char retbuf[10]; + + rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__); + + /** stop slew, returns "1" if OK */ + retval = ioptron_transaction(rot, ":Q#", retbuf, 10); + + if (retval != RIG_OK || retbuf[0] != ACK1) + { + return -RIG_EPROTO; + } + + /** stops tracking returns "1" if OK */ + retval = ioptron_transaction(rot, ":ST0#", retbuf, 10); + + if (retval != RIG_OK || retbuf[0] != ACK1) + { + return -RIG_EPROTO; + } + + return retval; +} + +/** get mount type code, initializes mount */ +static const char * +ioptron_get_info(ROT *rot) +{ + static char info[16]; + char str[6]; + + rig_debug(RIG_DEBUG_TRACE, "%s called\n", __func__); + int retval; + + retval = ioptron_transaction(rot, ":MountInfo#", str, sizeof(str)); + + rig_debug(RIG_DEBUG_TRACE, "retval, RIG_OK str %d %d %str\n", retval, RIG_OK, + str); + + sprintf(info, "MountInfo %s", str); + + return info; +} + + + +/** ************************************************************************* + * + * ioptron mount capabilities. + * + * Protocol documentation: + * from ioptron: + * RS232-Command_Language pdf + * note that iOptron is currently (12/2018) using a mix of V2 and V3 commands :( + */ + +const struct rot_caps ioptron_rot_caps = +{ + .rot_model = ROT_MODEL_IOPTRON, + .model_name = "iOptron", + .mfg_name = "iOptron", + .version = "0.1", + .copyright = "LGPL", + .status = RIG_STATUS_ALPHA, + .rot_type = ROT_TYPE_AZEL, + .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 = 1000, /* worst case scenario 3500 */ + .retry = 1, + + .min_az = 0.0, + .max_az = 360.0, + .min_el = 0.0, + .max_el = 180.0, + + .rot_open = ioptron_open, + .get_position = ioptron_get_position, + .set_position = ioptron_set_position, + .stop = ioptron_stop, + .get_info = ioptron_get_info, +}; + +/* ****************************************************************** */ + +DECLARE_INITROT_BACKEND(ioptron) +{ + rig_debug(RIG_DEBUG_VERBOSE, "%s called\n", __FUNCTION__); + + rot_register(&ioptron_rot_caps); + + return RIG_OK; +} + +/* ****************************************************************** */ +/* end of file */ + diff --git a/ioptron/rot_ioptron.h b/ioptron/rot_ioptron.h new file mode 100644 index 000000000..9918c4258 --- /dev/null +++ b/ioptron/rot_ioptron.h @@ -0,0 +1,31 @@ +/* + * Hamlib Meade telescope rotor backend - main header + * Copyright (c) 2018 by Andreas Mueller (DC1MIL) + * + * + * 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 + * + */ + +#ifndef _IOPTRON_H +#define _IOPTRON_H 1 + +#define BUFSIZE 128 +#define CR "\r" +#define LF "\x0a" + +extern const struct rot_caps ioptron_caps; + +#endif /* _IOPTRON_H */ diff --git a/src/rot_reg.c b/src/rot_reg.c index 7d04acf7b..7c7f6da50 100644 --- a/src/rot_reg.c +++ b/src/rot_reg.c @@ -82,6 +82,7 @@ DEFINE_INITROT_BACKEND(ether6); DEFINE_INITROT_BACKEND(cnctrk); DEFINE_INITROT_BACKEND(prosistel); DEFINE_INITROT_BACKEND(meade); +DEFINE_INITROT_BACKEND(ioptron); /** * \def ROT_BACKEND_LIST @@ -119,6 +120,7 @@ static struct { ROT_CNCTRK, ROT_BACKEND_CNCTRK, ROT_FUNCNAMA(cnctrk) }, { ROT_PROSISTEL, ROT_BACKEND_PROSISTEL, ROT_FUNCNAMA(prosistel) }, { ROT_MEADE, ROT_BACKEND_MEADE, ROT_FUNCNAMA(meade) }, + { ROT_IOPTRON, ROT_BACKEND_IOPTRON, ROT_FUNCNAMA(ioptron) }, { 0, NULL }, /* end */ };