445 lines
10 KiB
C
445 lines
10 KiB
C
|
/***************************************************************************
|
||
|
|
* __________ __ ___.
|
||
|
|
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
|
||
|
|
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
|
||
|
|
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
|
||
|
|
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
|
||
|
|
* \/ \/ \/ \/ \/
|
||
|
|
* $Id$
|
||
|
|
* tuner for the ipod fm remote and other ipod remote tuners
|
||
|
|
*
|
||
|
|
* Copyright (C) 2009 Laurent Gautier
|
||
|
|
*
|
||
|
|
* 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 software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
||
|
|
* KIND, either express or implied.
|
||
|
|
*
|
||
|
|
****************************************************************************/
|
||
|
|
#include "config.h"
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdbool.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include "kernel.h"
|
||
|
|
#include "iap.h"
|
||
|
|
#include "tuner.h" /* tuner abstraction interface */
|
||
|
|
#include "adc.h"
|
||
|
|
#include "settings.h"
|
||
|
|
|
||
|
|
static bool powered = false;
|
||
|
|
|
||
|
|
static unsigned char tuner_param = 0x00, old_tuner_param = 0xFF;
|
||
|
|
/* temp var for tests to avoid looping execution in submenus settings*/
|
||
|
|
int mono_mode = -1, old_region = -1;
|
||
|
|
|
||
|
|
int radio_present = 0;
|
||
|
|
int tuner_frequency = 0;
|
||
|
|
int tuner_signal_power = 0;
|
||
|
|
int radio_tuned = 0;
|
||
|
|
int rds_event = 0;
|
||
|
|
|
||
|
|
char rds_radioname[9];
|
||
|
|
char rds_radioinfo[70]; /* do we need more? */
|
||
|
|
|
||
|
|
union FRQ {
|
||
|
|
unsigned long int frequency_radio;
|
||
|
|
char data_frequency[4];
|
||
|
|
}Frequency;
|
||
|
|
|
||
|
|
void rmt_tuner_freq(void)
|
||
|
|
{
|
||
|
|
char tempdata[4];
|
||
|
|
tempdata[0] = serbuf[6];
|
||
|
|
tempdata[1] = serbuf[5];
|
||
|
|
tempdata[2] = serbuf[4];
|
||
|
|
tempdata[3] = serbuf[3];
|
||
|
|
|
||
|
|
memcpy(Frequency.data_frequency,tempdata,4);
|
||
|
|
tuner_frequency = (Frequency.frequency_radio*1000);
|
||
|
|
radio_tuned = 1;
|
||
|
|
rmt_tuner_signal_power(serbuf[7]);
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_set_freq(int curr_freq)
|
||
|
|
{
|
||
|
|
if (curr_freq != tuner_frequency)
|
||
|
|
{
|
||
|
|
radio_tuned = 0;
|
||
|
|
tuner_signal_power = 0;
|
||
|
|
/* clear rds name and info */
|
||
|
|
memset(rds_radioname,' ',sizeof(rds_radioname));
|
||
|
|
memset(rds_radioinfo,' ',sizeof(rds_radioinfo));
|
||
|
|
/* ex: 00 01 63 14 = 90.9MHz */
|
||
|
|
unsigned char data[] = {0x07, 0x0B, 0x00, 0x01, 0x63, 0x14};
|
||
|
|
|
||
|
|
if (curr_freq != 0)
|
||
|
|
{
|
||
|
|
curr_freq = curr_freq / 1000;
|
||
|
|
char tempdata[4];
|
||
|
|
|
||
|
|
Frequency.frequency_radio = curr_freq;
|
||
|
|
tempdata[0] = Frequency.data_frequency[3];
|
||
|
|
tempdata[1] = Frequency.data_frequency[2];
|
||
|
|
tempdata[2] = Frequency.data_frequency[1];
|
||
|
|
tempdata[3] = Frequency.data_frequency[0];
|
||
|
|
|
||
|
|
memcpy(data+2,tempdata,4);
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_signal_power(unsigned char value)
|
||
|
|
{
|
||
|
|
tuner_signal_power = (int)(value);
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_sleep(int state)
|
||
|
|
{
|
||
|
|
if (state == 0)
|
||
|
|
{
|
||
|
|
/* tuner HW on */
|
||
|
|
unsigned char data[] = {0x07, 0x05, 0x01};
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
/* boost gain */
|
||
|
|
unsigned char data1[] = {0x07, 0x24, 0x06 };
|
||
|
|
iap_send_pkt(data1, sizeof(data1));
|
||
|
|
/* set volume */
|
||
|
|
unsigned char data2[] = {0x03, 0x09, 0x04, 0x00, 0x77 };
|
||
|
|
iap_send_pkt(data2, sizeof(data2));
|
||
|
|
/* set rds on */
|
||
|
|
unsigned char data3[] = {0x07, 0x20, 0x40, 0x00, 0x00, 0x10 };
|
||
|
|
iap_send_pkt(data3, sizeof(data3));
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
/* unbooste gain */
|
||
|
|
unsigned char data[] = {0x07, 0x24, 0x00};
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
/* set rds off */
|
||
|
|
unsigned char data1[] = {0x07, 0x20, 0x00, 0x00, 0x00, 0x00 };
|
||
|
|
iap_send_pkt(data1, sizeof(data1));
|
||
|
|
/* stop tuner HW */
|
||
|
|
unsigned char data2[] = {0x07, 0x05, 0x00};
|
||
|
|
iap_send_pkt(data2, sizeof(data2));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_scan(int param)
|
||
|
|
{
|
||
|
|
unsigned char data[] = {0x07, 0x11, 0x08}; /* RSSI level */
|
||
|
|
unsigned char updown = 0x00;
|
||
|
|
radio_tuned = 0;
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
|
||
|
|
if (param == 1)
|
||
|
|
{
|
||
|
|
updown = 0x07; /* scan up */
|
||
|
|
}
|
||
|
|
else if (param == -1)
|
||
|
|
{
|
||
|
|
updown = 0x08; /* scan down */
|
||
|
|
}
|
||
|
|
else if (param == 10)
|
||
|
|
{
|
||
|
|
updown = 0x01; /* scan up starting from beginning of the band */
|
||
|
|
}
|
||
|
|
unsigned char data1[] = {0x07, 0x12, updown};
|
||
|
|
iap_send_pkt(data1, sizeof(data1));
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_mute(int value)
|
||
|
|
{
|
||
|
|
/* mute flag off (play) */
|
||
|
|
unsigned char data[] = {0x03, 0x09, 0x03, 0x01};
|
||
|
|
if (value)
|
||
|
|
{
|
||
|
|
/* mute flag on (pause) */
|
||
|
|
data[3] = 0x02;
|
||
|
|
}
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_region(int region)
|
||
|
|
{
|
||
|
|
if (region != old_region)
|
||
|
|
{
|
||
|
|
unsigned char data[] = {0x07, 0x08, 0x00};
|
||
|
|
if (region == 2)
|
||
|
|
{
|
||
|
|
data[2] = 0x02; /* japan band */
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
data[2] = 0x01; /* us eur band */
|
||
|
|
}
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
sleep(HZ/100);
|
||
|
|
old_region = region;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/* set stereo/mono, deemphasis, delta freq... */
|
||
|
|
void rmt_tuner_set_param(unsigned char tuner_param)
|
||
|
|
{
|
||
|
|
if(tuner_param != old_tuner_param)
|
||
|
|
{
|
||
|
|
unsigned char data[] = {0x07, 0x0E, 0x00};
|
||
|
|
|
||
|
|
data[2] = tuner_param;
|
||
|
|
iap_send_pkt(data, sizeof(data));
|
||
|
|
old_tuner_param = tuner_param;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void set_deltafreq(int delta)
|
||
|
|
{
|
||
|
|
tuner_param &= 0xFC;
|
||
|
|
switch (delta)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
{
|
||
|
|
/* 100KHz */
|
||
|
|
tuner_param |= 0x01;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
case 2:
|
||
|
|
{
|
||
|
|
/* 50KHz */
|
||
|
|
tuner_param |= 0x02;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
default:
|
||
|
|
{
|
||
|
|
/* 200KHz */
|
||
|
|
tuner_param |= 0x00;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void set_deemphasis(int deemphasis)
|
||
|
|
{
|
||
|
|
tuner_param &= 0xBF;
|
||
|
|
switch (deemphasis)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
{
|
||
|
|
tuner_param |= 0x40;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
default:
|
||
|
|
{
|
||
|
|
tuner_param |= 0x00;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void set_mono(int value)
|
||
|
|
{
|
||
|
|
tuner_param &= 0xEF;
|
||
|
|
|
||
|
|
if (value != mono_mode)
|
||
|
|
{
|
||
|
|
tuner_param |= 0x10;
|
||
|
|
rmt_tuner_set_param(tuner_param);
|
||
|
|
sleep(HZ/100);
|
||
|
|
mono_mode = value;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
bool reply_timeout(void)
|
||
|
|
{
|
||
|
|
int timeout = 0;
|
||
|
|
|
||
|
|
sleep(HZ/50);
|
||
|
|
do
|
||
|
|
{
|
||
|
|
iap_handlepkt();
|
||
|
|
sleep(HZ/50);
|
||
|
|
timeout++;
|
||
|
|
}
|
||
|
|
while((ipod_rmt_tuner_get(RADIO_TUNED) == 0) && (timeout < TIMEOUT_VALUE));
|
||
|
|
|
||
|
|
if (timeout >= TIMEOUT_VALUE)
|
||
|
|
return true;
|
||
|
|
else return false;
|
||
|
|
}
|
||
|
|
|
||
|
|
void rmt_tuner_rds_data(void)
|
||
|
|
{
|
||
|
|
if (serbuf[3] == 0x1E)
|
||
|
|
{
|
||
|
|
strlcpy(rds_radioname,serbuf+5,8);
|
||
|
|
}
|
||
|
|
else if(serbuf[3] == 0x04)
|
||
|
|
{
|
||
|
|
strlcpy(rds_radioinfo,serbuf+5,(serbuf[0]-4));
|
||
|
|
}
|
||
|
|
rds_event = 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* tuner abstraction layer: set something to the tuner */
|
||
|
|
int ipod_rmt_tuner_set(int setting, int value)
|
||
|
|
{
|
||
|
|
switch(setting)
|
||
|
|
{
|
||
|
|
case RADIO_SLEEP:
|
||
|
|
{
|
||
|
|
rmt_tuner_sleep(value);
|
||
|
|
sleep(HZ/2);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
case RADIO_FREQUENCY:
|
||
|
|
{
|
||
|
|
rmt_tuner_set_freq(value);
|
||
|
|
if (reply_timeout() == true)
|
||
|
|
return 0;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
case RADIO_SCAN_FREQUENCY:
|
||
|
|
{
|
||
|
|
const struct fm_region_data * const fmr =
|
||
|
|
&fm_region_data[global_settings.fm_region];
|
||
|
|
|
||
|
|
/* case: scan for presets, back to beginning of the band */
|
||
|
|
if ((radio_tuned == 1) && (value == fmr->freq_min))
|
||
|
|
{
|
||
|
|
tuner_set(RADIO_FREQUENCY,value);
|
||
|
|
}
|
||
|
|
|
||
|
|
/* scan through frequencies */
|
||
|
|
if (radio_tuned == 1)
|
||
|
|
{
|
||
|
|
/* scan down */
|
||
|
|
if(value < tuner_frequency)
|
||
|
|
rmt_tuner_scan(-1);
|
||
|
|
/* scan up */
|
||
|
|
else
|
||
|
|
rmt_tuner_scan(1);
|
||
|
|
|
||
|
|
if (reply_timeout() == true)
|
||
|
|
return 0;
|
||
|
|
radio_tuned = 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (tuner_frequency == value)
|
||
|
|
{
|
||
|
|
radio_tuned = 1;
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
radio_tuned = 0;
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
case RADIO_MUTE:
|
||
|
|
{
|
||
|
|
/* mute flag sent to accessory */
|
||
|
|
/* rmt_tuner_mute(value); */
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
case RADIO_REGION:
|
||
|
|
{
|
||
|
|
const struct rmt_tuner_region_data *rd =
|
||
|
|
&rmt_tuner_region_data[value];
|
||
|
|
|
||
|
|
rmt_tuner_region(rd->band);
|
||
|
|
set_deltafreq(rd->spacing);
|
||
|
|
set_deemphasis(rd->deemphasis);
|
||
|
|
rmt_tuner_set_param(tuner_param);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
case RADIO_FORCE_MONO:
|
||
|
|
{
|
||
|
|
set_mono(value);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
default:
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* tuner abstraction layer: read something from the tuner */
|
||
|
|
int ipod_rmt_tuner_get(int setting)
|
||
|
|
{
|
||
|
|
int val = -1; /* default for unsupported query */
|
||
|
|
|
||
|
|
switch(setting)
|
||
|
|
{
|
||
|
|
case RADIO_PRESENT:
|
||
|
|
val = radio_present;
|
||
|
|
if (val)
|
||
|
|
{
|
||
|
|
/* if accessory disconnected */
|
||
|
|
if(adc_read(ADC_ACCESSORY) >= 10)
|
||
|
|
{
|
||
|
|
radio_present = 0;
|
||
|
|
val = 0;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
/* radio tuned: yes no */
|
||
|
|
case RADIO_TUNED:
|
||
|
|
val = 0;
|
||
|
|
if (radio_tuned == 1)
|
||
|
|
val = 1;
|
||
|
|
break;
|
||
|
|
|
||
|
|
/* radio is always stereo */
|
||
|
|
/* we can't know when it's in mono mode, depending of signal quality */
|
||
|
|
/* except if it is forced in mono mode */
|
||
|
|
case RADIO_STEREO:
|
||
|
|
val = true;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case RADIO_EVENT:
|
||
|
|
if (rds_event)
|
||
|
|
{
|
||
|
|
val = 1;
|
||
|
|
rds_event = 0;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return val;
|
||
|
|
}
|
||
|
|
|
||
|
|
char* ipod_get_rds_info(int setting)
|
||
|
|
{
|
||
|
|
char *text = NULL;
|
||
|
|
|
||
|
|
switch(setting)
|
||
|
|
{
|
||
|
|
case RADIO_RDS_NAME:
|
||
|
|
text = rds_radioname;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case RADIO_RDS_TEXT:
|
||
|
|
text = rds_radioinfo;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return text;
|
||
|
|
}
|
||
|
|
|
||
|
|
bool tuner_power(bool status)
|
||
|
|
{
|
||
|
|
bool oldstatus = powered;
|
||
|
|
powered = status;
|
||
|
|
return oldstatus;
|
||
|
|
}
|