Logo Search packages:      
Sourcecode: hamlib version File versions  Download package

ar5000.c

/*
 *  Hamlib AOR backend - AR5000 description
 *  
 *  Copyright (c) 2000-2004 by Stephane Fillod
 *
 *    $Id: ar5000.c,v 1.11 2006/11/02 15:19:58 aa6e 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 <stdio.h>
#include <string.h>
#include <hamlib/rig.h>
#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_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, 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,
    .copyright =  "LGPL",
    .status =  RIG_STATUS_BETA,
    .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,
    .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,
    .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,
    .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,
    .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,
    .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, rmode_t mode, pbwidth_t width)
{
    int aormode, aorwidth;

    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_SSB:
      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 %d\n",
                  __FUNCTION__, mode);
          return -RIG_EINVAL;
    }

    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",
                  __FUNCTION__, width);
          return -RIG_EINVAL;
    }

    return sprintf(buf, "MD%c BW%c", aormode, aorwidth);
}



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",
                  __FUNCTION__, 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",
                  __FUNCTION__, aorwidth);
          return -RIG_EPROTO;
    }

    return RIG_OK;
}


Generated by  Doxygen 1.6.0   Back to index