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

tapr.c

/*
 *  Hamlib TAPR backend - main file
 *  Copyright (c) 2003 by Stephane Fillod
 *
 *    $Id: tapr.c,v 1.2 2006/10/07 18:52:09 csete 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 <stdlib.h>
#include <string.h>  /* String function definitions */
#include <unistd.h>  /* UNIX standard function definitions */

#include "hamlib/rig.h"
#include "register.h"
#include "serial.h"

#include "tapr.h"

#define ESC '$'
#define CMD_LEN 6

#define CMD7 7

#define NU1 1
#define NU2 2
#define NU3 3
#define NU4 4

/*
 * tapr_cmd
 * We assume that rig!=NULL, rig->state!= NULL, data!=NULL
 * Otherwise, you'll get a nice seg fault. You've been warned!
 * TODO: error case handling
 */
static int tapr_cmd(RIG *rig, unsigned char cmd, unsigned char c1, unsigned char c2, unsigned char c3, unsigned char c4)
{
      int retval;
      struct rig_state *rs;
      unsigned char cmdbuf[CMD_LEN];

      rs = &rig->state;

      serial_flush(&rs->rigport);

      cmdbuf[0] = ESC;
      cmdbuf[1] = cmd;
      cmdbuf[2] = c1;
      cmdbuf[3] = c2;
      cmdbuf[4] = c3;
      cmdbuf[5] = c4;

      retval = write_block(&rs->rigport, (char *) cmdbuf, 6);
      if (retval != RIG_OK)
            return retval;

      return RIG_OK;
}



/*
 * tapr_set_freq
 * Assumes rig!=NULL
 */
int tapr_set_freq(RIG *rig, vfo_t vfo, freq_t freq)
{
      unsigned int dsp_dph, dsp_deltap_lo, dsp_deltap_hi;
      int retval;

      return -RIG_ENIMPL;     /* FIXME! */

      dsp_dph=(unsigned int) (1.365333333*(double)(freq-MHz(144)+15000UL));
      dsp_deltap_lo = 0xff & dsp_dph;
      dsp_deltap_hi = 0xff & (dsp_dph >> 8);
      retval =  tapr_cmd (rig, CMD7, 0, NU1, dsp_deltap_lo, dsp_deltap_hi);

      return retval;
}


/*
 * tapr_set_mode
 * Assumes rig!=NULL
 */
int tapr_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width)
{
      return -RIG_ENIMPL;
}


/*
 * initrigs_tapr is called by rig_backend_load
 */
DECLARE_INITRIG_BACKEND(tapr)
{
      rig_debug(RIG_DEBUG_VERBOSE, "tapr: _init called\n");

      rig_register(&dsp10_caps);

      return RIG_OK;
}



Generated by  Doxygen 1.6.0   Back to index