/* * hamlib - (C) Frank Singleton 2000 (vk3fcs@ix.netcom.com) * * ft847.c - (C) Frank Singleton 2000 (vk3fcs@ix.netcom.com) * This shared library provides an API for communicating * via serial interface to an FT-847 using the "CAT" interface. * * * $Id: ft847.c,v 1.28 2000-12-22 01:27:01 javabear Exp $ * * * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * */ /* * TODO - Remove static stuff, see ft747 for new style. * - create yaesu.h for common command structure etc.. * - add mode set before freq set to avoid prior mode offset (eg: CW) * */ /* * Notes on limitations in RIG control capabilities. These are * related to the Yaesu's FT847 design, not my program :-) * * 1. Rig opcodes allow only 10Hz resolution. * 2. Cannot select VFO B * 3. Using CAT and Tuner controls simultaneously can * cause problems. * */ #include #include /* Standard input/output definitions */ #include /* String function definitions */ #include /* UNIX standard function definitions */ #include /* File control definitions */ #include /* Error number definitions */ #include /* POSIX terminal control definitions */ #include #include #include #include "serial.h" #include "ft847.h" #include "misc.h" /* prototypes */ static int ft847_send_priv_cmd(RIG *rig, unsigned char ci); /* Native ft847 cmd set prototypes. These are READ ONLY as each */ /* rig instance will copy from these and modify if required . */ /* Complete sequences (1) can be read and used directly as a cmd sequence . */ /* Incomplete sequences (0) must be completed with extra parameters */ /* eg: mem number, or freq etc.. */ static const ft847_cmd_set_t ncmd[] = { { 1, { 0x00, 0x00, 0x00, 0x00, 0x00 } }, /* CAT = On */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x80 } }, /* CAT = Off */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x08 } }, /* ptt on */ { 1, { 0x00, 0x00, 0x00, 0x01, 0x88 } }, /* ptt off */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x4e } }, /* sat mode on */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x8e } }, /* sat mode off */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x01 } }, /* set freq main */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x11 } }, /* set freq sat rx */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x21 } }, /* set freq sat tx */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main LSB */ { 1, { 0x01, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main USB */ { 1, { 0x02, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main CW */ { 1, { 0x03, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main CWR */ { 1, { 0x04, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main AM */ { 1, { 0x08, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main FM */ { 1, { 0x82, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main CWN */ { 1, { 0x83, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main CWRN */ { 1, { 0x84, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main AMN */ { 1, { 0x88, 0x00, 0x00, 0x00, 0x07 } }, /* mode set main FMN */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx LSB */ { 1, { 0x01, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx USB */ { 1, { 0x02, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx CW */ { 1, { 0x03, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx CWR */ { 1, { 0x04, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx AM */ { 1, { 0x08, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx FM */ { 1, { 0x82, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx CWN */ { 1, { 0x83, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx CWRN */ { 1, { 0x84, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx AMN */ { 1, { 0x88, 0x00, 0x00, 0x00, 0x17 } }, /* mode set sat rx FMN */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx LSB */ { 1, { 0x01, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx USB */ { 1, { 0x02, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx CW */ { 1, { 0x03, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx CWR */ { 1, { 0x04, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx AM */ { 1, { 0x08, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx FM */ { 1, { 0x82, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx CWN */ { 1, { 0x83, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx CWRN */ { 1, { 0x84, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx AMN */ { 1, { 0x88, 0x00, 0x00, 0x00, 0x27 } }, /* mode set sat tx FMN */ { 1, { 0x0a, 0x00, 0x00, 0x00, 0x0a } }, /* set DCS on, main */ { 1, { 0x2a, 0x00, 0x00, 0x00, 0x0a } }, /* set CTCSS/DCS enc/dec on, main */ { 1, { 0x4a, 0x00, 0x00, 0x00, 0x0a } }, /* set CTCSS/DCS enc on, main */ { 1, { 0x8a, 0x00, 0x00, 0x00, 0x0a } }, /* set CTCSS/DCS off, main */ { 1, { 0x0a, 0x00, 0x00, 0x00, 0x1a } }, /* set DCS on, sat rx */ { 1, { 0x2a, 0x00, 0x00, 0x00, 0x1a } }, /* set CTCSS/DCS enc/dec on, sat rx */ { 1, { 0x4a, 0x00, 0x00, 0x00, 0x1a } }, /* set CTCSS/DCS enc on, sat rx */ { 1, { 0x8a, 0x00, 0x00, 0x00, 0x1a } }, /* set CTCSS/DCS off, sat rx */ { 1, { 0x0a, 0x00, 0x00, 0x00, 0x2a } }, /* set DCS on, sat tx */ { 1, { 0x2a, 0x00, 0x00, 0x00, 0x2a } }, /* set CTCSS/DCS enc/dec on, sat tx */ { 1, { 0x4a, 0x00, 0x00, 0x00, 0x2a } }, /* set CTCSS/DCS enc on, sat tx */ { 1, { 0x8a, 0x00, 0x00, 0x00, 0x2a } }, /* set CTCSS/DCS off, sat tx */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x0b } }, /* set CTCSS freq, main */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x1b } }, /* set CTCSS freq, sat rx */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x2b } }, /* set CTCSS freq, sat tx */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x0c } }, /* set DCS code, main */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x1c } }, /* set DCS code, sat rx */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x2c } }, /* set DCS code, sat tx */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x09 } }, /* set RPT shift MINUS */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x49 } }, /* set RPT shift PLUS */ { 0, { 0x00, 0x00, 0x00, 0x00, 0x89 } }, /* set RPT shift SIMPLEX */ { 0, { 0x00, 0x00, 0x00, 0x00, 0xf9 } }, /* set RPT offset freq */ { 1, { 0x00, 0x00, 0x00, 0x00, 0xe7 } }, /* get RX status */ { 1, { 0x00, 0x00, 0x00, 0x00, 0xf7 } }, /* get TX status */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x03 } }, /* get FREQ and MODE status, main */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x13 } }, /* get FREQ and MODE status, sat rx */ { 1, { 0x00, 0x00, 0x00, 0x00, 0x23 } }, /* get FREQ and MODE status, sat tx */ }; /* * Receiver caps */ #define FT847_ALL_RX_MODES (RIG_MODE_AM|RIG_MODE_CW|RIG_MODE_USB|RIG_MODE_LSB|RIG_MODE_RTTY|RIG_MODE_FM) #define FT847_SSB_CW_RX_MODES (RIG_MODE_CW|RIG_MODE_USB|RIG_MODE_LSB) #define FT847_AM_FM_RX_MODES (RIG_MODE_AM|RIG_MODE_FM) /* tx doesn't have WFM. * 100W in 160-6m (25 watts AM carrier) * 50W in 2m/70cm (12.5 watts AM carrier) */ #define FT847_OTHER_TX_MODES (RIG_MODE_AM|RIG_MODE_CW|RIG_MODE_USB|RIG_MODE_LSB|RIG_MODE_RTTY|RIG_MODE_FM) #define FT847_AM_TX_MODES (RIG_MODE_AM) #define FT847_FUNC_ALL (RIG_FUNC_FAGC|RIG_FUNC_NB|RIG_FUNC_COMP|RIG_FUNC_VOX|RIG_FUNC_TONE|RIG_FUNC_TSQL|RIG_FUNC_SBKIN|RIG_FUNC_FBKIN) /* fix */ /* * ft847 rigs capabilities. * Notice that some rigs share the same functions. * Also this struct is READONLY! */ const struct rig_caps ft847_caps = { RIG_MODEL_FT847, "FT-847", "Yaesu", "0.1", RIG_STATUS_ALPHA, RIG_TYPE_TRANSCEIVER,RIG_PTT_RIG, 4800, 57600, 8, 2, RIG_PARITY_NONE, RIG_HANDSHAKE_NONE,FT847_WRITE_DELAY ,FT847_POST_WRITE_DELAY, 100, 0, FT847_FUNC_ALL, 0, 0, 78, RIG_TRN_OFF, { {100000,76000000,FT847_ALL_RX_MODES,-1,-1}, /* rx range begin */ {108000000,174000000,FT847_ALL_RX_MODES,-1,-1}, {420000000,512000000,FT847_ALL_RX_MODES,-1,-1}, {0,0,0,0,0}, }, /* rx range end */ { {1800000,1999999,FT847_OTHER_TX_MODES,5000,100000}, /* 5-100W class */ {1800000,1999999,FT847_AM_TX_MODES,1000,25000}, /* 1-5W class */ {3500000,3999999,FT847_OTHER_TX_MODES,5000,100000}, {3500000,3999999,FT847_AM_TX_MODES,1000,25000}, {7000000,7300000,FT847_OTHER_TX_MODES,5000,100000}, {7000000,7300000,FT847_AM_TX_MODES,1000,25000}, {10000000,10150000,FT847_OTHER_TX_MODES,5000,100000}, {10000000,10150000,FT847_AM_TX_MODES,1000,25000}, {14000000,14350000,FT847_OTHER_TX_MODES,5000,100000}, {14000000,14350000,FT847_AM_TX_MODES,1000,25000}, {18068000,18168000,FT847_OTHER_TX_MODES,5000,100000}, {18068000,18168000,FT847_AM_TX_MODES,1000,25000}, {21000000,21450000,FT847_OTHER_TX_MODES,5000,100000}, {21000000,21450000,FT847_AM_TX_MODES,1000,25000}, {24890000,24990000,FT847_OTHER_TX_MODES,5000,100000}, {24890000,24990000,FT847_AM_TX_MODES,1000,25000}, {28000000,29700000,FT847_OTHER_TX_MODES,5000,100000}, {28000000,29700000,FT847_AM_TX_MODES,1000,25000}, {50000000,54000000,FT847_OTHER_TX_MODES,5000,100000}, {50000000,54000000,FT847_AM_TX_MODES,1000,25000}, {144000000,148000000,FT847_OTHER_TX_MODES,1000,50000}, {144000000,148000000,FT847_AM_TX_MODES,1000,12500}, {430000000,44000000,FT847_OTHER_TX_MODES,1000,50000}, /* check range */ {430000000,440000000,FT847_AM_TX_MODES,1000,12500}, {0,0,0,0,0} }, { {FT847_SSB_CW_RX_MODES,1}, /* normal */ {FT847_SSB_CW_RX_MODES,10}, /* fast */ {FT847_SSB_CW_RX_MODES,100}, /* faster */ {FT847_AM_FM_RX_MODES,10}, /* normal */ {FT847_AM_FM_RX_MODES,100}, /* fast */ {0,0}, }, ft847_init, ft847_cleanup, ft847_open, ft847_close, NULL /* probe not supported yet */, ft847_set_freq, /* set freq */ ft847_get_freq, /* get freq */ ft847_set_mode, /* set mode */ ft847_get_mode, /* get mode */ ft847_set_vfo, /* set vfo */ ft847_get_vfo, /* get vfo */ ft847_set_ptt, /* set ptt */ ft847_get_ptt, /* get ptt */ NULL, NULL, }; /* * Function definitions below */ /* * setup *priv * serial port is already open (rig->state->fd) */ int ft847_init(RIG *rig) { struct ft847_priv_data *p; if (!rig) return -RIG_EINVAL; p = (struct ft847_priv_data*)malloc(sizeof(struct ft847_priv_data)); if (!p) { /* whoops! memory shortage! */ return -RIG_ENOMEM; } rig_debug(RIG_DEBUG_VERBOSE,"ft847:ft847_init called \n"); /* * Copy complete native cmd set to private cmd storage area */ memcpy(p->pcs,ncmd,sizeof(ncmd)); p->current_vfo = RIG_VFO_MAIN; /* default to VFO_MAIN */ rig->state.priv = (void*)p; return RIG_OK; } /* * ft847_cleanup routine * the serial port is closed by the frontend */ int ft847_cleanup(RIG *rig) { if (!rig) return -RIG_EINVAL; if (rig->state.priv) free(rig->state.priv); rig->state.priv = NULL; rig_debug(RIG_DEBUG_VERBOSE,"ft847:ft847_cleanup called \n"); return RIG_OK; } /* * ft847_open routine * */ int ft847_open(RIG *rig) { /* Good time to set CAT ON */ rig_debug(RIG_DEBUG_VERBOSE,"ft847:ft847_open called \n"); ft847_send_priv_cmd(rig,FT_847_NATIVE_CAT_ON); return RIG_OK; } /* * ft847_close routine * */ int ft847_close(RIG *rig) { /* Good time to set CAT OFF */ rig_debug(RIG_DEBUG_VERBOSE,"ft847:ft847_close called \n"); ft847_send_priv_cmd(rig,FT_847_NATIVE_CAT_OFF); return RIG_OK; } /* * private helper function to send a private command * sequence . Must only be complete sequences. * */ static int ft847_send_priv_cmd(RIG *rig, unsigned char ci) { struct rig_state *rig_s; struct ft847_priv_data *p; unsigned char *cmd; /* points to sequence to send */ unsigned char cmd_index; /* index of sequence to send */ if (!rig) return -RIG_EINVAL; p = (struct ft847_priv_data*)rig->state.priv; rig_s = &rig->state; cmd_index = ci; /* get command */ if (! p->pcs[cmd_index].ncomp) { rig_debug(RIG_DEBUG_VERBOSE,"ft847: Attempt to send incomplete sequence \n"); return -RIG_EINVAL; } cmd = (unsigned char *) p->pcs[cmd_index].nseq; /* get native sequence */ write_block(rig_s->fd, cmd, FT847_CMD_LENGTH, rig_s->write_delay, rig_s->post_write_delay); return RIG_OK; } /* * Set frequency to freq Hz. Note 10 Hz resolution -- YUK -- FS * */ int ft847_set_freq(RIG *rig, vfo_t vfo, freq_t freq) { struct rig_state *rig_s; struct ft847_priv_data *p; unsigned char *cmd; /* points to sequence to send */ unsigned char cmd_index; /* index of sequence to send */ if (!rig) return -RIG_EINVAL; p = (struct ft847_priv_data*)rig->state.priv; rig_s = &rig->state; rig_debug(RIG_DEBUG_VERBOSE,"ft847: requested freq = %Li Hz \n", freq); /* * Copy native cmd freq_set to private cmd storage area */ rig_debug(RIG_DEBUG_VERBOSE,"ft847: vfo =%i \n", vfo); switch(vfo) { case RIG_VFO_MAIN: cmd_index = FT_847_NATIVE_CAT_SET_FREQ_MAIN; break; case RIG_VFO_CURR: switch(p->current_vfo) { /* what is my active VFO ? */ case RIG_VFO_MAIN: cmd_index = FT_847_NATIVE_CAT_SET_FREQ_MAIN; break; default: rig_debug(RIG_DEBUG_VERBOSE,"ft847: Unknown default VFO \n"); return -RIG_EINVAL; /* sorry, wrong current VFO */ } break; default: rig_debug(RIG_DEBUG_VERBOSE,"ft847: Unknown VFO \n"); return -RIG_EINVAL; /* sorry, wrong VFO */ } memcpy(&p->p_cmd,&ncmd[cmd_index].nseq,FT847_CMD_LENGTH); to_bcd_be(p->p_cmd,freq/10,8); /* store bcd format in in p_cmd */ /* TODO -- fix 10Hz resolution -- FS */ rig_debug(RIG_DEBUG_VERBOSE,"ft847: requested freq after conversion = %Li Hz \n", from_bcd_be(p->p_cmd,8)* 10 ); cmd = p->p_cmd; /* get native sequence */ write_block(rig_s->fd, cmd, FT847_CMD_LENGTH, rig_s->write_delay, rig_s->post_write_delay); return RIG_OK; } int ft847_get_freq(RIG *rig, vfo_t vfo, freq_t *freq) { return -RIG_ENIMPL; } int ft847_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width) { unsigned char cmd_index; /* index of sequence to send */ /* * translate mode from generic to ft847 specific */ rig_debug(RIG_DEBUG_VERBOSE,"ft847: generic mode = %x \n", mode); switch(mode) { case RIG_MODE_AM: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_AM; break; case RIG_MODE_CW: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_CW; break; case RIG_MODE_USB: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_USB; break; case RIG_MODE_LSB: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_LSB; break; case RIG_MODE_FM: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_FM; break; default: return -RIG_EINVAL; /* sorry, wrong MODE */ } /* * Now set width */ switch(width) { case RIG_PASSBAND_NORMAL: /* easy case , no change to native sequence */ ft847_send_priv_cmd(rig,cmd_index); /* TODO -- check return codes */ return RIG_OK; /* I am out of here .. */ case RIG_PASSBAND_WIDE: return -RIG_EINVAL; /* sorry, WIDE WIDTH is not supported */ case RIG_PASSBAND_NARROW: /* must set narrow */ switch(mode) { case RIG_MODE_AM: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_AMN; break; case RIG_MODE_FM: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_FMN; break; case RIG_MODE_CW: cmd_index = FT_847_NATIVE_CAT_SET_MODE_MAIN_CWN; break; default: return -RIG_EINVAL; /* sorry, wrong MODE/WIDTH combo */ } break; default: return -RIG_EINVAL; /* sorry, wrong WIDTH requested */ } /* * Now send the command */ ft847_send_priv_cmd(rig,cmd_index); return RIG_OK; } int ft847_get_mode(RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width) { return -RIG_ENIMPL; } /* * TODO -- FT847 has NO set_vfo cmd. VFO is specified * in other cmd's like set freq, set mode etc.. * * For the time being, simply cache the requested * VFO in private active VFO * Must fix this later. MAybe store active VFO in * frontend instead ? * * Perhaps I can try a dummy cmd that includes the VFO.. * eg: set_dcs etc.. * Try later -- FS * * * Also, RIG can handle only VFO_MAIN . Add SAT VFO's later. * */ int ft847_set_vfo(RIG *rig, vfo_t vfo) { struct rig_state *rig_s; struct ft847_priv_data *p; if (!rig) return -RIG_EINVAL; p = (struct ft847_priv_data*)rig->state.priv; rig_s = &rig->state; /* * TODO : check for errors -- FS */ switch(vfo) { case RIG_VFO_MAIN: p->current_vfo = vfo; /* update active VFO */ break; default: return -RIG_EINVAL; /* sorry, wrong VFO */ } return RIG_OK; } int ft847_get_vfo(RIG *rig, vfo_t *vfo) { return -RIG_ENIMPL; } /* * _set_ptt * */ int ft847_set_ptt(RIG *rig, vfo_t vfo, ptt_t ptt) { unsigned char cmd_index; /* index of sequence to send */ rig_debug(RIG_DEBUG_VERBOSE,"ft847:ft847_set_ptt called \n"); switch(ptt) { case RIG_PTT_ON: cmd_index = FT_847_NATIVE_CAT_PTT_ON; break; case RIG_PTT_OFF: cmd_index = FT_847_NATIVE_CAT_PTT_OFF; break; default: return -RIG_EINVAL; /* sorry, wrong ptt range */ } /* * phew! now send cmd to rig */ ft847_send_priv_cmd(rig,cmd_index); return RIG_OK; /* good */ } int ft847_get_ptt(RIG *rig, vfo_t vfo, ptt_t *ptt) { return -RIG_ENIMPL; } /* * init_ft847 is called by rig_backend_load */ int init_ft847(void *be_handle) { rig_debug(RIG_DEBUG_VERBOSE, "ft847: _init called\n"); rig_register(&ft847_caps); return RIG_OK; }