24d167206f
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@13663 a1c6a512-1295-4272-9138-f99709370657
908 lines
23 KiB
C
908 lines
23 KiB
C
/***************************************************************************
|
|
* __________ __ ___.
|
|
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
|
|
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
|
|
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
|
|
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
|
|
* \/ \/ \/ \/ \/
|
|
* $Id$
|
|
* Tuner driver for the Sanyo LV24020LP
|
|
*
|
|
* Copyright (C) 2007 Ivan Zupan
|
|
*
|
|
* All files in this archive are subject to the GNU General Public License.
|
|
* See the file COPYING in the source tree root for full license agreement.
|
|
*
|
|
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
|
* KIND, either express or implied.
|
|
*
|
|
****************************************************************************/
|
|
|
|
#include <stdbool.h>
|
|
#include <stdlib.h>
|
|
#include "config.h"
|
|
#include "thread.h"
|
|
#include "kernel.h"
|
|
#include "tuner.h" /* tuner abstraction interface */
|
|
#include "fmradio.h" /* physical interface driver */
|
|
#include "mpeg.h"
|
|
#include "sound.h"
|
|
#include "pp5024.h"
|
|
#include "system.h"
|
|
#include "as3514.h"
|
|
|
|
#ifndef BOOTLOADER
|
|
|
|
#if 0
|
|
/* define to enable tuner logging */
|
|
#define SANYO_TUNER_LOG
|
|
#endif
|
|
|
|
#ifdef SANYO_TUNER_LOG
|
|
#include "sprintf.h"
|
|
#include "file.h"
|
|
|
|
static int fd_log = -1;
|
|
|
|
#define TUNER_LOG_OPEN() if (fd_log < 0) \
|
|
fd_log = creat("/tuner_dump.txt")
|
|
/* syncing required because close() is never called */
|
|
#define TUNER_LOG_SYNC() fsync(fd_log)
|
|
#define TUNER_LOG(s...) fdprintf(fd_log, s)
|
|
#else
|
|
#define TUNER_LOG_OPEN()
|
|
#define TUNER_LOG_SYNC()
|
|
#define TUNER_LOG(s...)
|
|
#endif /* SANYO_TUNER_LOG */
|
|
|
|
/** tuner register defines **/
|
|
|
|
/* pins on GPIOH port */
|
|
#define FM_NRW_PIN 3
|
|
#define FM_CLOCK_PIN 4
|
|
#define FM_DATA_PIN 5
|
|
#define FM_CLK_DELAY 1
|
|
|
|
/* block 1 registers */
|
|
|
|
/* R */
|
|
#define CHIP_ID 0x00
|
|
|
|
/* W */
|
|
#define BLK_SEL 0x01
|
|
#define BLK1 0x01
|
|
#define BLK2 0x02
|
|
|
|
/* W */
|
|
#define MSRC_SEL 0x02
|
|
#define MSR_O (1 << 7)
|
|
#define AFC_LVL (1 << 6)
|
|
#define AFC_SPD (1 << 5)
|
|
#define MSS_SD (1 << 2)
|
|
#define MSS_FM (1 << 1)
|
|
#define MSS_IF (1 << 0)
|
|
|
|
/* W */
|
|
#define FM_OSC 0x03
|
|
|
|
/* W */
|
|
#define SD_OSC 0x04
|
|
|
|
/* W */
|
|
#define IF_OSC 0x05
|
|
|
|
/* W */
|
|
#define CNT_CTRL 0x06
|
|
#define CNT1_CLR (1 << 7)
|
|
#define CTAB(x) ((x) & (0x7 << 4))
|
|
#define CTAB_STOP_2 (0x0 << 4)
|
|
#define CTAB_STOP_8 (0x1 << 4)
|
|
#define CTAB_STOP_32 (0x2 << 4)
|
|
#define CTAB_STOP_128 (0x3 << 4)
|
|
#define CTAB_STOP_512 (0x4 << 4)
|
|
#define CTAB_STOP_2048 (0x5 << 4)
|
|
#define CTAB_STOP_8192 (0x6 << 4)
|
|
#define CTAB_STOP_32768 (0x7 << 4)
|
|
#define SWP_CNT_L (1 << 3)
|
|
#define CNT_EN (1 << 2)
|
|
#define CNT_SEL (1 << 1)
|
|
#define CNT_SET (1 << 0)
|
|
|
|
/* W */
|
|
#define IRQ_MSK 0x08
|
|
#define IM_MS (1 << 6)
|
|
#define IRQ_LVL (1 << 3)
|
|
#define IM_AFC (1 << 2)
|
|
#define IM_FS (1 << 1)
|
|
#define IM_CNT2 (1 << 0)
|
|
|
|
/* W */
|
|
#define FM_CAP 0x09
|
|
|
|
/* R */
|
|
#define CNT_L 0x0a /* Counter register low value */
|
|
|
|
/* R */
|
|
#define CNT_H 0x0b /* Counter register high value */
|
|
|
|
/* R */
|
|
#define CTRL_STAT 0x0c
|
|
#define AFC_FLG (1 << 0)
|
|
|
|
/* R */
|
|
#define RADIO_STAT 0x0d
|
|
#define RSS_MS (1 << 7)
|
|
#define RSS_FS(x) ((x) & 0x7f)
|
|
#define RSS_FS_GET(x) ((x) & 0x7f)
|
|
#define RSS_FS_SET(x) (x)
|
|
/* Note: Reading this register will clear field strength and mono/stereo interrupt. */
|
|
|
|
/* R */
|
|
#define IRQ_ID 0x0e
|
|
#define II_CNT2 (1 << 5)
|
|
#define II_AFC (1 << 3)
|
|
#define II_FS_MS (1 << 0)
|
|
|
|
/* W */
|
|
#define IRQ_OUT 0x0f
|
|
|
|
/* block 2 registers - offset added in order to id and avoid manual
|
|
switching */
|
|
#define BLK2_START 0x10
|
|
|
|
/* W */
|
|
#define RADIO_CTRL1 (0x02 + BLK2_START)
|
|
#define EN_MEAS (1 << 7)
|
|
#define EN_AFC (1 << 6)
|
|
#define DIR_AFC (1 << 3)
|
|
#define RST_AFC (1 << 2)
|
|
|
|
/* W */
|
|
#define IF_CENTER (0x03 + BLK2_START)
|
|
|
|
/* W */
|
|
#define IF_BW (0x05 + BLK2_START)
|
|
|
|
/* W */
|
|
#define RADIO_CTRL2 (0x06 + BLK2_START)
|
|
#define VREF2 (1 << 7)
|
|
#define VREF (1 << 6)
|
|
#define STABI_BP (1 << 5)
|
|
#define IF_PM_L (1 << 4)
|
|
#define AGCSP (1 << 1)
|
|
#define AM_ANT_BSW (1 << 0) /* ?? */
|
|
|
|
/* W */
|
|
#define RADIO_CTRL3 (0x07 + BLK2_START)
|
|
#define AGC_SLVL (1 << 7)
|
|
#define VOLSH (1 << 6)
|
|
#define TB_ON (1 << 5)
|
|
#define AMUTE_L (1 << 4)
|
|
#define SE_FM (1 << 3)
|
|
#define SE_BE (1 << 1)
|
|
#define SE_EXT (1 << 0) /* For LV24000=0, LV24001/24002=Ext source enab. */
|
|
|
|
/* W */
|
|
#define STEREO_CTRL (0x08 + BLK2_START)
|
|
#define FRCST (1 << 7)
|
|
#define FMCS(x) ((x) & (0x7 << 4))
|
|
#define FMCS_GET(x) (((x) & (0x7 << 4)) >> 4)
|
|
#define FMCS_SET(x) ((x) << 4)
|
|
#define AUTOSSR (1 << 3)
|
|
#define PILTCA (1 << 2)
|
|
#define SD_PM (1 << 1)
|
|
#define ST_M (1 << 0)
|
|
|
|
/* W */
|
|
#define AUDIO_CTRL1 (0x09 + BLK2_START)
|
|
#define TONE_LVL(x) ((x) & (0xf << 4))
|
|
#define TONE_LVL_GET(x) (((x) & (0xf << 4)) >> 4)
|
|
#define TONE_LVL_SET(x) ((x) << 4)
|
|
#define VOL_LVL(x) ((x) & 0xf)
|
|
#define VOL_LVL_GET(x) ((x) & 0xf)
|
|
#define VOL_LVL_SET(x) ((x) << 4)
|
|
|
|
/* W */
|
|
#define AUDIO_CTRL2 (0x0a + BLK2_START)
|
|
#define BASS_PP (1 << 0)
|
|
#define BASS_P (1 << 1) /* BASS_P, BASS_N are mutually-exclusive */
|
|
#define BASS_N (1 << 2)
|
|
#define TREB_P (1 << 3) /* TREB_P, TREB_N are mutually-exclusive */
|
|
#define TREB_N (1 << 4)
|
|
#define DEEMP (1 << 5)
|
|
#define BPFREQ(x) ((x) & (0x3 << 6))
|
|
#define BPFREQ_2_0K (0x0 << 6)
|
|
#define BPFREQ_1_0K (0x1 << 6)
|
|
#define BPFREQ_0_5K (0x2 << 6)
|
|
#define BPFREQ_HIGH (0x3 << 6)
|
|
|
|
/* W */
|
|
#define PW_SCTRL (0x0b + BLK2_START)
|
|
#define SS_CTRL(x) ((x) & (0x7 << 5))
|
|
#define SS_CTRL_GET(x) (((x) & (0x7 << 5)) >> 5)
|
|
#define SS_CTRL_SET(x) ((x) << 5)
|
|
#define SM_CTRL(x) ((x) & (0x7 << 2))
|
|
#define SM_CTRL_GET(x) (((x) & (0x7 << 2)) >> 2)
|
|
#define SM_CTRL_SET(x) ((x) << 2)
|
|
#define PW_HPA (1 << 1) /* LV24002 only */
|
|
#define PW_RAD (1 << 0)
|
|
|
|
/* shadow for writeable registers */
|
|
#define TUNER_POWERED (1 << 0)
|
|
#define TUNER_PRESENT (1 << 1)
|
|
#define TUNER_AWAKE (1 << 2)
|
|
#define TUNER_PRESENCE_CHECKED (1 << 3)
|
|
static unsigned tuner_status = 0;
|
|
|
|
static unsigned char sanyo_regs[0x1c];
|
|
|
|
static const int sw_osc_low = 10; /* 30; */
|
|
static const int sw_osc_high = 240; /* 200; */
|
|
static const int sw_cap_low = 0;
|
|
static const int sw_cap_high = 191;
|
|
|
|
/* linear coefficients used for tuning */
|
|
static int coef_00, coef_01, coef_10, coef_11;
|
|
|
|
/* DAC control register set values */
|
|
int if_set, sd_set;
|
|
|
|
static inline bool tuner_awake(void)
|
|
{
|
|
return (tuner_status & TUNER_AWAKE) != 0;
|
|
}
|
|
|
|
/* send a byte to the tuner - expects write mode to be current */
|
|
static void tuner_sanyo_send_byte(unsigned int byte)
|
|
{
|
|
int i;
|
|
|
|
byte <<= FM_DATA_PIN;
|
|
|
|
for (i = 0; i < 8; i++)
|
|
{
|
|
GPIOH_OUTPUT_VAL &= ~(1 << FM_CLOCK_PIN);
|
|
|
|
GPIOH_OUTPUT_VAL = (GPIOH_OUTPUT_VAL & ~(1 << FM_DATA_PIN)) |
|
|
(byte & (1 << FM_DATA_PIN));
|
|
|
|
GPIOH_OUTPUT_VAL |= (1 << FM_CLOCK_PIN);
|
|
udelay(FM_CLK_DELAY);
|
|
|
|
byte >>= 1;
|
|
}
|
|
}
|
|
|
|
/* end a write cycle on the tuner */
|
|
static void tuner_sanyo_end_write(void)
|
|
{
|
|
/* switch back to read mode */
|
|
GPIOH_OUTPUT_EN &= ~(1 << FM_DATA_PIN);
|
|
GPIOH_OUTPUT_VAL &= ~(1 << FM_NRW_PIN);
|
|
}
|
|
|
|
/* prepare a write cycle on the tuner */
|
|
static unsigned int tuner_sanyo_begin_write(unsigned int address)
|
|
{
|
|
/* Get register's block, translate address */
|
|
unsigned int blk = (address >= BLK2_START) ?
|
|
(address -= BLK2_START, BLK2) : BLK1;
|
|
|
|
for (;;)
|
|
{
|
|
/* Prepare 3-wire bus pins for write cycle */
|
|
GPIOH_OUTPUT_VAL |= (1 << FM_NRW_PIN);
|
|
GPIOH_OUTPUT_EN |= (1 << FM_DATA_PIN);
|
|
|
|
udelay(FM_CLK_DELAY);
|
|
|
|
/* current block == register block? */
|
|
if (blk == sanyo_regs[BLK_SEL])
|
|
return address;
|
|
|
|
/* switch block */
|
|
sanyo_regs[BLK_SEL] = blk;
|
|
|
|
/* data first */
|
|
tuner_sanyo_send_byte(blk);
|
|
/* then address */
|
|
tuner_sanyo_send_byte(BLK_SEL);
|
|
|
|
tuner_sanyo_end_write();
|
|
|
|
udelay(FM_CLK_DELAY);
|
|
}
|
|
}
|
|
|
|
/* write a byte to a tuner register */
|
|
static void tuner_sanyo_write(unsigned int address, unsigned int data)
|
|
{
|
|
/* shadow logical values but do logical=>physical remappings on some
|
|
registers' data. */
|
|
sanyo_regs[address] = data;
|
|
|
|
switch (address)
|
|
{
|
|
case FM_OSC:
|
|
/* L: 000..255
|
|
* P: 255..000 */
|
|
data = 255 - data;
|
|
break;
|
|
case FM_CAP:
|
|
/* L: 000..063, 064..191
|
|
* P: 255..192, 127..000 */
|
|
data = ((data < 64) ? 255 : (255 - 64)) - data;
|
|
break;
|
|
case RADIO_CTRL1:
|
|
/* L: data
|
|
* P: data | always "1" bits */
|
|
data |= (1 << 4) | (1 << 1) | (1 << 0);
|
|
break;
|
|
}
|
|
|
|
address = tuner_sanyo_begin_write(address);
|
|
|
|
/* data first */
|
|
tuner_sanyo_send_byte(data);
|
|
/* then address */
|
|
tuner_sanyo_send_byte(address);
|
|
|
|
tuner_sanyo_end_write();
|
|
}
|
|
|
|
/* helpers to set/clear register bits */
|
|
static void tuner_sanyo_write_or(unsigned int address, unsigned int bits)
|
|
{
|
|
tuner_sanyo_write(address, sanyo_regs[address] | bits);
|
|
}
|
|
|
|
static void tuner_sanyo_write_and(unsigned int address, unsigned int bits)
|
|
{
|
|
tuner_sanyo_write(address, sanyo_regs[address] & bits);
|
|
}
|
|
|
|
/* read a byte from a tuner register */
|
|
static unsigned int tuner_sanyo_read(unsigned int address)
|
|
{
|
|
int i;
|
|
unsigned int toread;
|
|
|
|
address = tuner_sanyo_begin_write(address);
|
|
|
|
/* address */
|
|
tuner_sanyo_send_byte(address);
|
|
|
|
tuner_sanyo_end_write();
|
|
|
|
/* data */
|
|
toread = 0;
|
|
for (i = 0; i < 8; i++)
|
|
{
|
|
GPIOH_OUTPUT_VAL &= ~(1 << FM_CLOCK_PIN);
|
|
udelay(FM_CLK_DELAY);
|
|
|
|
toread |= (GPIOH_INPUT_VAL & (1 << FM_DATA_PIN)) << i;
|
|
|
|
GPIOH_OUTPUT_VAL |= (1 << FM_CLOCK_PIN);
|
|
}
|
|
|
|
return toread >> FM_DATA_PIN;
|
|
}
|
|
|
|
/* enables auto frequency centering */
|
|
static void enable_afc(bool enabled)
|
|
{
|
|
unsigned int radio_ctrl1 = sanyo_regs[RADIO_CTRL1];
|
|
|
|
if (enabled)
|
|
{
|
|
radio_ctrl1 &= ~RST_AFC;
|
|
radio_ctrl1 |= EN_AFC;
|
|
}
|
|
else
|
|
{
|
|
radio_ctrl1 |= RST_AFC;
|
|
radio_ctrl1 &= ~EN_AFC;
|
|
}
|
|
|
|
tuner_sanyo_write(RADIO_CTRL1, radio_ctrl1);
|
|
}
|
|
|
|
static int calculate_coef(unsigned fkhz)
|
|
{
|
|
/* Overflow below 66000kHz --
|
|
My tuner tunes down to a min of ~72600kHz but datasheet mentions
|
|
66000kHz as the minimum. ?? Perhaps 76000kHz was intended? */
|
|
return fkhz < 66000 ?
|
|
0x7fffffff : 0x81d1a47efc5cb700ull / ((uint64_t)fkhz*fkhz);
|
|
}
|
|
|
|
static int interpolate_x(int expected_y, int x1, int x2, int y1, int y2)
|
|
{
|
|
return y1 == y2 ?
|
|
0 : (int64_t)(expected_y - y1)*(x2 - x1) / (y2 - y1) + x1;
|
|
}
|
|
|
|
static int interpolate_y(int expected_x, int x1, int x2, int y1, int y2)
|
|
{
|
|
return x1 == x2 ?
|
|
0 : (int64_t)(expected_x - x1)*(y2 - y1) / (x2 - x1) + y1;
|
|
}
|
|
|
|
/* this performs measurements of IF, FM and Stereo frequencies
|
|
* Input can be: MSS_FM, MSS_IF, MSS_SD */
|
|
static int tuner_measure(unsigned char type, int scale, int duration)
|
|
{
|
|
int64_t finval;
|
|
|
|
if (!tuner_awake())
|
|
return 0;
|
|
|
|
/* enable measuring */
|
|
tuner_sanyo_write_or(MSRC_SEL, type);
|
|
tuner_sanyo_write_and(CNT_CTRL, ~CNT_SEL);
|
|
tuner_sanyo_write_or(RADIO_CTRL1, EN_MEAS);
|
|
|
|
/* reset counter */
|
|
tuner_sanyo_write_or(CNT_CTRL, CNT1_CLR);
|
|
tuner_sanyo_write_and(CNT_CTRL, ~CNT1_CLR);
|
|
|
|
/* start counter, delay for specified time and stop it */
|
|
tuner_sanyo_write_or(CNT_CTRL, CNT_EN);
|
|
udelay(duration*1000 - 16);
|
|
tuner_sanyo_write_and(CNT_CTRL, ~CNT_EN);
|
|
|
|
/* read tick count */
|
|
finval = (tuner_sanyo_read(CNT_H) << 8) | tuner_sanyo_read(CNT_L);
|
|
|
|
/* restore measure mode */
|
|
tuner_sanyo_write_and(RADIO_CTRL1, ~EN_MEAS);
|
|
tuner_sanyo_write_and(MSRC_SEL, ~type);
|
|
|
|
/* convert value */
|
|
if (type == MSS_FM)
|
|
finval = scale*finval*256 / duration;
|
|
else
|
|
finval = scale*finval / duration;
|
|
|
|
return (int)finval;
|
|
}
|
|
|
|
/* set the FM oscillator frequency */
|
|
static void sanyo_set_frequency(int freq)
|
|
{
|
|
int coef, cap_value, osc_value;
|
|
int f1, f2, x1, x2;
|
|
int count;
|
|
|
|
if (!tuner_awake())
|
|
return;
|
|
|
|
TUNER_LOG_OPEN();
|
|
|
|
TUNER_LOG("set_frequency(%d)\n", freq);
|
|
|
|
enable_afc(false);
|
|
|
|
/* MHz -> kHz */
|
|
freq /= 1000;
|
|
|
|
TUNER_LOG("Select cap:\n");
|
|
|
|
coef = calculate_coef(freq);
|
|
cap_value = interpolate_x(coef, sw_cap_low, sw_cap_high,
|
|
coef_00, coef_01);
|
|
|
|
osc_value = sw_osc_low;
|
|
tuner_sanyo_write(FM_OSC, osc_value);
|
|
|
|
/* Just in case - don't go into infinite loop */
|
|
for (count = 0; count < 30; count++)
|
|
{
|
|
int y0 = interpolate_y(cap_value, sw_cap_low, sw_cap_high,
|
|
coef_00, coef_01);
|
|
int y1 = interpolate_y(cap_value, sw_cap_low, sw_cap_high,
|
|
coef_10, coef_11);
|
|
int coef_fcur, cap_new, coef_cor, range;
|
|
|
|
tuner_sanyo_write(FM_CAP, cap_value);
|
|
|
|
range = y1 - y0;
|
|
f1 = tuner_measure(MSS_FM, 1, 16);
|
|
coef_fcur = calculate_coef(f1);
|
|
coef_cor = calculate_coef((f1*1000 + 32*256) / 1000);
|
|
y0 = coef_cor;
|
|
y1 = y0 + range;
|
|
|
|
TUNER_LOG("%d %d %d %d %d %d %d %d\n",
|
|
f1, cap_value, coef, coef_fcur, coef_cor, y0, y1, range);
|
|
|
|
if (coef >= y0 && coef <= y1)
|
|
{
|
|
osc_value = interpolate_x(coef, sw_osc_low, sw_osc_high,
|
|
y0, y1);
|
|
|
|
if (osc_value >= sw_osc_low && osc_value <= sw_osc_high)
|
|
break;
|
|
}
|
|
|
|
cap_new = interpolate_x(coef, cap_value, sw_cap_high,
|
|
coef_fcur, coef_01);
|
|
|
|
if (cap_new == cap_value)
|
|
{
|
|
if (coef < coef_fcur)
|
|
cap_value++;
|
|
else
|
|
cap_value--;
|
|
}
|
|
else
|
|
{
|
|
cap_value = cap_new;
|
|
}
|
|
}
|
|
|
|
TUNER_LOG("osc_value: %d\n", osc_value);
|
|
|
|
TUNER_LOG("Tune:\n");
|
|
|
|
x1 = sw_osc_low, x2 = sw_osc_high;
|
|
/* FM_OSC already at SW_OSC low and f1 is already the measured
|
|
frequency */
|
|
|
|
do
|
|
{
|
|
int x2_new;
|
|
|
|
tuner_sanyo_write(FM_OSC, x2);
|
|
f2 = tuner_measure(MSS_FM, 1, 16);
|
|
|
|
if (abs(f2 - freq) <= 16)
|
|
{
|
|
TUNER_LOG("%d %d %d %d\n", f1, f2, x1, x2);
|
|
break;
|
|
}
|
|
|
|
x2_new = interpolate_x(freq, x1, x2, f1, f2);
|
|
|
|
x1 = x2, f1 = f2, x2 = x2_new;
|
|
TUNER_LOG("%d %d %d %d\n", f1, f2, x1, x2);
|
|
}
|
|
while (x2 != 0);
|
|
|
|
if (x2 == 0)
|
|
{
|
|
/* May still be close enough */
|
|
TUNER_LOG("tuning failed - diff: %d\n", f2 - freq);
|
|
}
|
|
|
|
enable_afc(true);
|
|
|
|
TUNER_LOG("\n");
|
|
|
|
TUNER_LOG_SYNC();
|
|
}
|
|
|
|
static void fine_step_tune(int (*setcmp)(int regval), int regval, int step)
|
|
{
|
|
/* Registers are not always stable, timeout if best fit not found soon
|
|
enough */
|
|
unsigned long abort = current_tick + HZ*2;
|
|
int flags = 0;
|
|
|
|
while (TIME_BEFORE(current_tick, abort))
|
|
{
|
|
int cmp;
|
|
|
|
regval = regval + step;
|
|
|
|
cmp = setcmp(regval);
|
|
|
|
if (cmp == 0)
|
|
break;
|
|
|
|
step = abs(step);
|
|
|
|
if (cmp < 0)
|
|
{
|
|
flags |= 1;
|
|
if (step == 1)
|
|
flags |= 4;
|
|
}
|
|
else
|
|
{
|
|
step = -step;
|
|
flags |= 2;
|
|
if (step == -1)
|
|
step |= 8;
|
|
}
|
|
|
|
if ((flags & 0xc) == 0xc)
|
|
break;
|
|
|
|
if ((flags & 0x3) == 0x3)
|
|
{
|
|
step /= 2;
|
|
if (step == 0)
|
|
step = 1;
|
|
flags &= ~3;
|
|
}
|
|
}
|
|
}
|
|
|
|
static int if_setcmp(int regval)
|
|
{
|
|
tuner_sanyo_write(IF_OSC, regval);
|
|
tuner_sanyo_write(IF_CENTER, regval);
|
|
tuner_sanyo_write(IF_BW, 65*regval/100);
|
|
|
|
if_set = tuner_measure(MSS_IF, 1000, 32);
|
|
|
|
/* This register is bounces around by a few hundred Hz and doesn't seem
|
|
to be precisely tuneable. Just do 110000 +/- 500 since it's not very
|
|
critical it seems. */
|
|
if (abs(if_set - 109500) <= 500)
|
|
return 0;
|
|
|
|
return if_set < 109500 ? -1 : 1;
|
|
}
|
|
|
|
static int sd_setcmp(int regval)
|
|
{
|
|
tuner_sanyo_write(SD_OSC, regval);
|
|
|
|
sd_set = tuner_measure(MSS_SD, 1000, 32);
|
|
|
|
if (abs(sd_set - 38300) <= 31)
|
|
return 0;
|
|
|
|
return sd_set < 38300 ? -1 : 1;
|
|
}
|
|
|
|
static void sanyo_sleep(bool sleep)
|
|
{
|
|
if (sleep || tuner_awake())
|
|
return;
|
|
|
|
if ((tuner_status & (TUNER_PRESENT | TUNER_POWERED)) !=
|
|
(TUNER_PRESENT | TUNER_POWERED))
|
|
return;
|
|
|
|
tuner_status |= TUNER_AWAKE;
|
|
|
|
enable_afc(false);
|
|
|
|
/* 2. Calibrate the IF frequency at 110 kHz: */
|
|
tuner_sanyo_write_and(RADIO_CTRL2, ~IF_PM_L);
|
|
fine_step_tune(if_setcmp, 0x80, 8);
|
|
tuner_sanyo_write_or(RADIO_CTRL2, IF_PM_L);
|
|
|
|
/* 3. Calibrate the stereo decoder clock at 38.3 kHz: */
|
|
tuner_sanyo_write_or(STEREO_CTRL, SD_PM);
|
|
fine_step_tune(sd_setcmp, 0x80, 8);
|
|
tuner_sanyo_write_and(STEREO_CTRL, ~SD_PM);
|
|
|
|
/* calculate FM tuning coefficients */
|
|
tuner_sanyo_write(FM_CAP, sw_cap_low);
|
|
tuner_sanyo_write(FM_OSC, sw_osc_low);
|
|
coef_00 = calculate_coef(tuner_measure(MSS_FM, 1, 64));
|
|
|
|
tuner_sanyo_write(FM_CAP, sw_cap_high);
|
|
coef_01 = calculate_coef(tuner_measure(MSS_FM, 1, 64));
|
|
|
|
tuner_sanyo_write(FM_CAP, sw_cap_low);
|
|
tuner_sanyo_write(FM_OSC, sw_osc_high);
|
|
coef_10 = calculate_coef(tuner_measure(MSS_FM, 1, 64));
|
|
|
|
tuner_sanyo_write(FM_CAP, sw_cap_high);
|
|
coef_11 = calculate_coef(tuner_measure(MSS_FM, 1, 64));
|
|
|
|
/* set various audio level settings */
|
|
tuner_sanyo_write(AUDIO_CTRL1, TONE_LVL_SET(0) | VOL_LVL_SET(0));
|
|
tuner_sanyo_write_or(RADIO_CTRL2, AGCSP);
|
|
tuner_sanyo_write_or(RADIO_CTRL3, VOLSH);
|
|
tuner_sanyo_write(STEREO_CTRL, FMCS_SET(7) | AUTOSSR);
|
|
tuner_sanyo_write(PW_SCTRL, SS_CTRL_SET(3) | SM_CTRL_SET(1) |
|
|
PW_RAD);
|
|
}
|
|
|
|
/** Public interfaces **/
|
|
bool radio_power(bool status)
|
|
{
|
|
static const unsigned char tuner_defaults[][2] =
|
|
{
|
|
/* Block 1 writeable registers */
|
|
{ MSRC_SEL, AFC_LVL },
|
|
{ FM_OSC, 0x80 },
|
|
{ SD_OSC, 0x80 },
|
|
{ IF_OSC, 0x80 },
|
|
{ CNT_CTRL, CNT1_CLR | SWP_CNT_L },
|
|
{ IRQ_MSK, 0x00 }, /* IRQ_LVL -> Low to High */
|
|
{ FM_CAP, 0x80 },
|
|
/* { IRQ_OUT, 0x00 }, No action on this register (skip) */
|
|
/* Block 2 writeable registers */
|
|
{ RADIO_CTRL1, EN_AFC },
|
|
{ IF_CENTER, 0x80 },
|
|
{ IF_BW, 65*0x80 / 100 }, /* 65% of IF_OSC */
|
|
{ RADIO_CTRL2, IF_PM_L },
|
|
{ RADIO_CTRL3, AGC_SLVL | SE_FM },
|
|
{ STEREO_CTRL, FMCS_SET(4) | AUTOSSR },
|
|
{ AUDIO_CTRL1, TONE_LVL_SET(7) | VOL_LVL_SET(7) },
|
|
{ AUDIO_CTRL2, BPFREQ_HIGH }, /* deemphasis 50us */
|
|
{ PW_SCTRL, SS_CTRL_SET(3) | SM_CTRL_SET(3) | PW_RAD },
|
|
};
|
|
|
|
unsigned i;
|
|
bool powered = tuner_status & TUNER_POWERED;
|
|
|
|
if (status == powered)
|
|
return powered;
|
|
|
|
if (status)
|
|
{
|
|
/* init mystery amplification device */
|
|
outl(inl(0x70000084) | 0x1, 0x70000084);
|
|
udelay(5);
|
|
|
|
/* When power up, host should initialize the 3-wire bus in host read
|
|
mode: */
|
|
|
|
/* 1. Set direction of the DATA-line to input-mode. */
|
|
GPIOH_OUTPUT_EN &= ~(1 << FM_DATA_PIN);
|
|
GPIOH_ENABLE |= (1 << FM_DATA_PIN);
|
|
|
|
/* 2. Drive NR_W low */
|
|
GPIOH_OUTPUT_VAL &= ~(1 << FM_NRW_PIN);
|
|
GPIOH_OUTPUT_EN |= (1 << FM_NRW_PIN);
|
|
GPIOH_ENABLE |= (1 << FM_NRW_PIN);
|
|
|
|
/* 3. Drive CLOCK high */
|
|
GPIOH_OUTPUT_VAL |= (1 << FM_CLOCK_PIN);
|
|
GPIOH_OUTPUT_EN |= (1 << FM_CLOCK_PIN);
|
|
GPIOH_ENABLE |= (1 << FM_CLOCK_PIN);
|
|
|
|
tuner_status |= TUNER_POWERED;
|
|
|
|
/* if tuner is present, CHIP ID is 0x09 */
|
|
if (tuner_sanyo_read(CHIP_ID) == 0x09)
|
|
{
|
|
tuner_status |= TUNER_PRESENT;
|
|
|
|
/* After power-up, the LV2400x needs to be initialized as
|
|
follows: */
|
|
|
|
/* 1. Write default values to the registers: */
|
|
sanyo_regs[BLK_SEL] = 0; /* Force a switch on the first */
|
|
for (i = 0; i < ARRAYLEN(tuner_defaults); i++)
|
|
tuner_sanyo_write(tuner_defaults[i][0], tuner_defaults[i][1]);
|
|
|
|
/* Complete the startup calibration if the tuner is woken */
|
|
udelay(100000);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* Power off and set all as inputs */
|
|
if (tuner_status & TUNER_PRESENT)
|
|
tuner_sanyo_write_and(PW_SCTRL, ~PW_RAD);
|
|
|
|
GPIOH_OUTPUT_EN &= ~((1 << FM_DATA_PIN) | (1 << FM_NRW_PIN) |
|
|
(1 << FM_CLOCK_PIN));
|
|
GPIOH_ENABLE &= ~((1 << FM_DATA_PIN) | (1 << FM_NRW_PIN) |
|
|
(1 << FM_CLOCK_PIN));
|
|
|
|
outl(inl(0x70000084) & ~0x1, 0x70000084);
|
|
|
|
tuner_status &= ~(TUNER_POWERED | TUNER_AWAKE);
|
|
}
|
|
|
|
return powered;
|
|
}
|
|
|
|
bool radio_powered(void)
|
|
{
|
|
return (tuner_status & TUNER_POWERED) != 0;
|
|
}
|
|
|
|
int sanyo_set(int setting, int value)
|
|
{
|
|
int val = 1;
|
|
|
|
switch(setting)
|
|
{
|
|
case RADIO_SLEEP:
|
|
sanyo_sleep(value);
|
|
break;
|
|
|
|
case RADIO_FREQUENCY:
|
|
sanyo_set_frequency(value);
|
|
break;
|
|
|
|
case RADIO_SCAN_FREQUENCY:
|
|
/* TODO: really implement this */
|
|
sanyo_set_frequency(value);
|
|
val = sanyo_get(RADIO_TUNED);
|
|
break;
|
|
|
|
case RADIO_MUTE:
|
|
if (value)
|
|
tuner_sanyo_write_and(RADIO_CTRL3, ~AMUTE_L);
|
|
else
|
|
tuner_sanyo_write_or(RADIO_CTRL3, AMUTE_L);
|
|
break;
|
|
|
|
case RADIO_REGION:
|
|
switch (value)
|
|
{
|
|
case REGION_EUROPE:
|
|
case REGION_JAPAN:
|
|
case REGION_KOREA:
|
|
tuner_sanyo_write_and(AUDIO_CTRL2, ~DEEMP);
|
|
break;
|
|
case REGION_US_CANADA:
|
|
tuner_sanyo_write_or(AUDIO_CTRL2, DEEMP);
|
|
break;
|
|
default:
|
|
val = -1;
|
|
}
|
|
break;
|
|
|
|
case RADIO_FORCE_MONO:
|
|
if (value)
|
|
tuner_sanyo_write_or(STEREO_CTRL, ST_M);
|
|
else
|
|
tuner_sanyo_write_and(STEREO_CTRL, ~ST_M);
|
|
break;
|
|
|
|
default:
|
|
val = -1;
|
|
}
|
|
|
|
return val;
|
|
}
|
|
|
|
int sanyo_get(int setting)
|
|
{
|
|
int val = -1;
|
|
|
|
switch(setting)
|
|
{
|
|
case RADIO_ALL:
|
|
return tuner_sanyo_read(CTRL_STAT);
|
|
|
|
case RADIO_TUNED:
|
|
/* TODO: really implement this */
|
|
val = RSS_FS(tuner_sanyo_read(RADIO_STAT)) < 0x1f;
|
|
break;
|
|
|
|
case RADIO_STEREO:
|
|
val = (tuner_sanyo_read(RADIO_STAT) & RSS_MS) != 0;
|
|
break;
|
|
|
|
case RADIO_PRESENT:
|
|
val = (tuner_status & TUNER_PRESENT) != 0;
|
|
break;
|
|
|
|
/* tuner-specific debug info */
|
|
case RADIO_REG_STAT:
|
|
return tuner_sanyo_read(RADIO_STAT);
|
|
|
|
case RADIO_MSS_FM:
|
|
return tuner_measure(MSS_FM, 1, 16);
|
|
|
|
case RADIO_MSS_IF:
|
|
return tuner_measure(MSS_IF, 1000, 16);
|
|
|
|
case RADIO_MSS_SD:
|
|
return tuner_measure(MSS_SD, 1000, 16);
|
|
|
|
case RADIO_IF_SET:
|
|
return if_set;
|
|
|
|
case RADIO_SD_SET:
|
|
return sd_set;
|
|
}
|
|
|
|
return val;
|
|
}
|
|
#endif /* BOOTLOADER */
|