kopia lustrzana https://github.com/Hamlib/Hamlib
135 wiersze
3.2 KiB
C++
135 wiersze
3.2 KiB
C++
/* -*- c++-*- */
|
|
/*
|
|
* Copyright 2001,2003 Free Software Foundation, Inc.
|
|
*
|
|
* This file is part of GNU Radio
|
|
*
|
|
* GNU Radio 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, or (at your option)
|
|
* any later version.
|
|
*
|
|
* GNU Radio 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 GNU Radio; see the file COPYING. If not, write to
|
|
* the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
* Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
#include "microtune_4937.h"
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
static const double first_IF = 43.75e6;
|
|
|
|
// The tuner internally has 3 bands: VHF Low, VHF High & UHF.
|
|
// These are the recommened boundaries
|
|
static const double VHF_High_takeover = 158e6;
|
|
static const double UHF_takeover = 464e6;
|
|
|
|
static int PLL_I2C_ADDR = 0x61;
|
|
|
|
static unsigned char
|
|
control_byte_1 (bool fast_tuning_p, int reference_divisor)
|
|
{
|
|
int c = 0x88;
|
|
|
|
if (fast_tuning_p)
|
|
c |= 0x40;
|
|
|
|
switch (reference_divisor){
|
|
case 512:
|
|
c |= 0x3 << 1; break;
|
|
case 640:
|
|
c |= 0x0 << 1; break;
|
|
case 1024:
|
|
c |= 0x1 << 1; break;
|
|
default:
|
|
abort ();
|
|
}
|
|
return c;
|
|
}
|
|
|
|
static unsigned char
|
|
control_byte_2 (double target_freq, bool shutdown_tx_PGA)
|
|
{
|
|
int c;
|
|
|
|
if (target_freq < VHF_High_takeover) // VHF low
|
|
c = 0xa0;
|
|
else if (target_freq < UHF_takeover) // VHF high
|
|
c = 0x90;
|
|
else // UHF
|
|
c = 0x30;
|
|
|
|
if (shutdown_tx_PGA)
|
|
c |= 0x08;
|
|
|
|
return c;
|
|
}
|
|
|
|
/*!
|
|
* \brief select RF frequency to be tuned to output frequency.
|
|
* \p target_freq is the requested frequency in Hz, \p actual_freq
|
|
* is set to the actual frequency tuned. It takes about 100 ms
|
|
* for the PLL to settle.
|
|
*
|
|
* \returns true iff sucessful.
|
|
*/
|
|
bool
|
|
microtune_4937::set_RF_freq (double target_freq, double *p_actual_freq)
|
|
{
|
|
unsigned char buf[4];
|
|
|
|
double target_f_osc = target_freq + first_IF;
|
|
|
|
double f_ref = 4e6 / d_reference_divider;
|
|
|
|
// f_osc = f_ref * 8 * divisor
|
|
// divisor = f_osc / (f_ref * 8)
|
|
|
|
int divisor = (int) ((target_f_osc + (f_ref * 4)) / (f_ref * 8));
|
|
double actual_freq = (f_ref * 8 * divisor) - first_IF;
|
|
if (p_actual_freq != 0)
|
|
*p_actual_freq = actual_freq;
|
|
|
|
if ((divisor & ~0x7fff) != 0) // 15 bit divisor
|
|
return false;
|
|
|
|
buf[0] = (divisor >> 8) & 0xff; // DB1
|
|
buf[1] = divisor & 0xff; // DB2
|
|
buf[2] = control_byte_1 (d_fast_tuning_p, d_reference_divider);
|
|
buf[3] = control_byte_2 (target_freq, true);
|
|
|
|
#if 0
|
|
printf ("set_RF_freq: target: %g MHz actual: %g MHz %02x %02x %02x %02x\n",
|
|
target_freq/1e6, actual_freq/1e6, buf[0], buf[1], buf[2], buf[3]);
|
|
#endif
|
|
|
|
return i2c_write (PLL_I2C_ADDR, buf, 4);
|
|
}
|
|
|
|
|
|
/*!
|
|
* \returns true iff PLL is locked
|
|
*/
|
|
bool
|
|
microtune_4937::pll_locked_p ()
|
|
{
|
|
// FIXME
|
|
return true;
|
|
}
|
|
|
|
/*!
|
|
* \returns the output frequency of the tuner in Hz.
|
|
*/
|
|
double
|
|
microtune_4937::get_output_freq ()
|
|
{
|
|
return 5.75e6; // 3x7702
|
|
}
|