[net-next-2.6.git] / drivers / media / dvb / frontends / stb6100.c

/*
	STB6100 Silicon Tuner
	Copyright (C) Manu Abraham (abraham.manu@gmail.com)

	Copyright (C) ST Microelectronics

	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 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 General Public License for more details.

	You should have received a copy of the GNU General Public License
	along with this program; if not, write to the Free Software
	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/slab.h>
#include <linux/string.h>

#include "dvb_frontend.h"
#include "stb6100.h"

static unsigned int verbose;
module_param(verbose, int, 0644);


#define FE_ERROR		0
#define FE_NOTICE		1
#define FE_INFO			2
#define FE_DEBUG		3

#define dprintk(x, y, z, format, arg...) do {						\
	if (z) {									\
		if	((x > FE_ERROR) && (x > y))					\
			printk(KERN_ERR "%s: " format "\n", __func__ , ##arg);		\
		else if	((x > FE_NOTICE) && (x > y))					\
			printk(KERN_NOTICE "%s: " format "\n", __func__ , ##arg);	\
		else if ((x > FE_INFO) && (x > y))					\
			printk(KERN_INFO "%s: " format "\n", __func__ , ##arg);		\
		else if ((x > FE_DEBUG) && (x > y))					\
			printk(KERN_DEBUG "%s: " format "\n", __func__ , ##arg);	\
	} else {									\
		if (x > y)								\
			printk(format, ##arg);						\
	}										\
} while(0)

struct stb6100_lkup {
	u32 val_low;
	u32 val_high;
	u8   reg;
};

static int stb6100_release(struct dvb_frontend *fe);

static const struct stb6100_lkup lkup[] = {
	{       0,  950000, 0x0a },
	{  950000, 1000000, 0x0a },
	{ 1000000, 1075000, 0x0c },
	{ 1075000, 1200000, 0x00 },
	{ 1200000, 1300000, 0x01 },
	{ 1300000, 1370000, 0x02 },
	{ 1370000, 1470000, 0x04 },
	{ 1470000, 1530000, 0x05 },
	{ 1530000, 1650000, 0x06 },
	{ 1650000, 1800000, 0x08 },
	{ 1800000, 1950000, 0x0a },
	{ 1950000, 2150000, 0x0c },
	{ 2150000, 9999999, 0x0c },
	{       0,       0, 0x00 }
};

/* Register names for easy debugging.	*/
static const char *stb6100_regnames[] = {
	[STB6100_LD]		= "LD",
	[STB6100_VCO]		= "VCO",
	[STB6100_NI]		= "NI",
	[STB6100_NF_LSB]	= "NF",
	[STB6100_K]		= "K",
	[STB6100_G]		= "G",
	[STB6100_F]		= "F",
	[STB6100_DLB]		= "DLB",
	[STB6100_TEST1]		= "TEST1",
	[STB6100_FCCK]		= "FCCK",
	[STB6100_LPEN]		= "LPEN",
	[STB6100_TEST3]		= "TEST3",
};

/* Template for normalisation, i.e. setting unused or undocumented
 * bits as required according to the documentation.
 */
struct stb6100_regmask {
	u8 mask;
	u8 set;
};

static const struct stb6100_regmask stb6100_template[] = {
	[STB6100_LD]		= { 0xff, 0x00 },
	[STB6100_VCO]		= { 0xff, 0x00 },
	[STB6100_NI]		= { 0xff, 0x00 },
	[STB6100_NF_LSB]	= { 0xff, 0x00 },
	[STB6100_K]		= { 0xc7, 0x38 },
	[STB6100_G]		= { 0xef, 0x10 },
	[STB6100_F]		= { 0x1f, 0xc0 },
	[STB6100_DLB]		= { 0x38, 0xc4 },
	[STB6100_TEST1]		= { 0x00, 0x8f },
	[STB6100_FCCK]		= { 0x40, 0x0d },
	[STB6100_LPEN]		= { 0xf0, 0x0b },
	[STB6100_TEST3]		= { 0x00, 0xde },
};

static void stb6100_normalise_regs(u8 regs[])
{
	int i;

	for (i = 0; i < STB6100_NUMREGS; i++)
		regs[i] = (regs[i] & stb6100_template[i].mask) | stb6100_template[i].set;
}

static int stb6100_read_regs(struct stb6100_state *state, u8 regs[])
{
	int rc;
	struct i2c_msg msg = {
		.addr	= state->config->tuner_address,
		.flags	= I2C_M_RD,
		.buf	= regs,
		.len	= STB6100_NUMREGS
	};

	rc = i2c_transfer(state->i2c, &msg, 1);
	if (unlikely(rc != 1)) {
		dprintk(verbose, FE_ERROR, 1, "Read (0x%x) err, rc=[%d]",
			state->config->tuner_address, rc);

		return -EREMOTEIO;
	}
	if (unlikely(verbose > FE_DEBUG)) {
		int i;

		dprintk(verbose, FE_DEBUG, 1, "    Read from 0x%02x", state->config->tuner_address);
		for (i = 0; i < STB6100_NUMREGS; i++)
			dprintk(verbose, FE_DEBUG, 1, "        %s: 0x%02x", stb6100_regnames[i], regs[i]);
	}
	return 0;
}

static int stb6100_read_reg(struct stb6100_state *state, u8 reg)
{
	u8 regs[STB6100_NUMREGS];
	int rc;

	if (unlikely(reg >= STB6100_NUMREGS)) {
		dprintk(verbose, FE_ERROR, 1, "Invalid register offset 0x%x", reg);
		return -EINVAL;
	}
	if ((rc = stb6100_read_regs(state, regs)) < 0)
		return rc;
	return (unsigned int)regs[reg];
}

static int stb6100_write_reg_range(struct stb6100_state *state, u8 buf[], int start, int len)
{
	int rc;
	u8 cmdbuf[len + 1];
	struct i2c_msg msg = {
		.addr	= state->config->tuner_address,
		.flags	= 0,
		.buf	= cmdbuf,
		.len	= len + 1
	};

	if (unlikely(start < 1 || start + len > STB6100_NUMREGS)) {
		dprintk(verbose, FE_ERROR, 1, "Invalid register range %d:%d",
			start, len);
		return -EINVAL;
	}
	memcpy(&cmdbuf[1], buf, len);
	cmdbuf[0] = start;

	if (unlikely(verbose > FE_DEBUG)) {
		int i;

		dprintk(verbose, FE_DEBUG, 1, "    Write @ 0x%02x: [%d:%d]", state->config->tuner_address, start, len);
		for (i = 0; i < len; i++)
			dprintk(verbose, FE_DEBUG, 1, "        %s: 0x%02x", stb6100_regnames[start + i], buf[i]);
	}
	rc = i2c_transfer(state->i2c, &msg, 1);
	if (unlikely(rc != 1)) {
		dprintk(verbose, FE_ERROR, 1, "(0x%x) write err [%d:%d], rc=[%d]",
			(unsigned int)state->config->tuner_address, start, len,	rc);
		return -EREMOTEIO;
	}
	return 0;
}

static int stb6100_write_reg(struct stb6100_state *state, u8 reg, u8 data)
{
	if (unlikely(reg >= STB6100_NUMREGS)) {
		dprintk(verbose, FE_ERROR, 1, "Invalid register offset 0x%x", reg);
		return -EREMOTEIO;
	}
	data = (data & stb6100_template[reg].mask) | stb6100_template[reg].set;
	return stb6100_write_reg_range(state, &data, reg, 1);
}

static int stb6100_write_regs(struct stb6100_state *state, u8 regs[])
{
	stb6100_normalise_regs(regs);
	return stb6100_write_reg_range(state, &regs[1], 1, STB6100_NUMREGS - 1);
}

static int stb6100_get_status(struct dvb_frontend *fe, u32 *status)
{
	int rc;
	struct stb6100_state *state = fe->tuner_priv;

	if ((rc = stb6100_read_reg(state, STB6100_LD)) < 0)
		return rc;

	return (rc & STB6100_LD_LOCK) ? TUNER_STATUS_LOCKED : 0;
}

static int stb6100_get_bandwidth(struct dvb_frontend *fe, u32 *bandwidth)
{
	int rc;
	u8 f;
	struct stb6100_state *state = fe->tuner_priv;

	if ((rc = stb6100_read_reg(state, STB6100_F)) < 0)
		return rc;
	f = rc & STB6100_F_F;

	state->status.bandwidth = (f + 5) * 2000;	/* x2 for ZIF	*/

	*bandwidth = state->bandwidth = state->status.bandwidth * 1000;
	dprintk(verbose, FE_DEBUG, 1, "bandwidth = %u Hz", state->bandwidth);
	return 0;
}

static int stb6100_set_bandwidth(struct dvb_frontend *fe, u32 bandwidth)
{
	u32 tmp;
	int rc;
	struct stb6100_state *state = fe->tuner_priv;

	dprintk(verbose, FE_DEBUG, 1, "set bandwidth to %u Hz", bandwidth);

	bandwidth /= 2; /* ZIF */

	if (bandwidth >= 36000000)	/* F[4:0] BW/2 max =31+5=36 mhz for F=31	*/
		tmp = 31;
	else if (bandwidth <= 5000000)	/* bw/2 min = 5Mhz for F=0			*/
		tmp = 0;
	else				/* if 5 < bw/2 < 36				*/
		tmp = (bandwidth + 500000) / 1000000 - 5;

	/* Turn on LPF bandwidth setting clock control,
	 * set bandwidth, wait 10ms, turn off.
	 */
	if ((rc = stb6100_write_reg(state, STB6100_FCCK, 0x0d | STB6100_FCCK_FCCK)) < 0)
		return rc;
	if ((rc = stb6100_write_reg(state, STB6100_F, 0xc0 | tmp)) < 0)
		return rc;
	msleep(1);
	if ((rc = stb6100_write_reg(state, STB6100_FCCK, 0x0d)) < 0)
		return rc;

	return 0;
}

static int stb6100_get_frequency(struct dvb_frontend *fe, u32 *frequency)
{
	int rc;
	u32 nint, nfrac, fvco;
	int psd2, odiv;
	struct stb6100_state *state = fe->tuner_priv;
	u8 regs[STB6100_NUMREGS];

	if ((rc = stb6100_read_regs(state, regs)) < 0)
		return rc;

	odiv = (regs[STB6100_VCO] & STB6100_VCO_ODIV) >> STB6100_VCO_ODIV_SHIFT;
	psd2 = (regs[STB6100_K] & STB6100_K_PSD2) >> STB6100_K_PSD2_SHIFT;
	nint = regs[STB6100_NI];
	nfrac = ((regs[STB6100_K] & STB6100_K_NF_MSB) << 8) | regs[STB6100_NF_LSB];
	fvco = (nfrac * state->reference >> (9 - psd2)) + (nint * state->reference << psd2);
	*frequency = state->frequency = fvco >> (odiv + 1);

	dprintk(verbose, FE_DEBUG, 1,
		"frequency = %u kHz, odiv = %u, psd2 = %u, fxtal = %u kHz, fvco = %u kHz, N(I) = %u, N(F) = %u",
		state->frequency, odiv, psd2, state->reference,	fvco, nint, nfrac);
	return 0;
}


static int stb6100_set_frequency(struct dvb_frontend *fe, u32 frequency)
{
	int rc;
	const struct stb6100_lkup *ptr;
	struct stb6100_state *state = fe->tuner_priv;
	struct dvb_frontend_parameters p;

	u32 srate = 0, fvco, nint, nfrac;
	u8 regs[STB6100_NUMREGS];
	u8 g, psd2, odiv;

	if ((rc = stb6100_read_regs(state, regs)) < 0)
		return rc;

	if (fe->ops.get_frontend) {
		dprintk(verbose, FE_DEBUG, 1, "Get frontend parameters");
		fe->ops.get_frontend(fe, &p);
	}
	srate = p.u.qpsk.symbol_rate;

	regs[STB6100_DLB] = 0xdc;
	/* Disable LPEN */
	regs[STB6100_LPEN] &= ~STB6100_LPEN_LPEN; /* PLL Loop disabled */

	if ((rc = stb6100_write_regs(state, regs)) < 0)
		return rc;

	/* Baseband gain.	*/
	if (srate >= 15000000)
		g = 9;  //  +4 dB
	else if (srate >= 5000000)
		g = 11; //  +8 dB
	else
		g = 14; // +14 dB

	regs[STB6100_G] = (regs[STB6100_G] & ~STB6100_G_G) | g;
	regs[STB6100_G] &= ~STB6100_G_GCT; /* mask GCT */
	regs[STB6100_G] |= (1 << 5); /* 2Vp-p Mode */

	/* VCO divide ratio (LO divide ratio, VCO prescaler enable).	*/
	if (frequency <= 1075000)
		odiv = 1;
	else
		odiv = 0;
	regs[STB6100_VCO] = (regs[STB6100_VCO] & ~STB6100_VCO_ODIV) | (odiv << STB6100_VCO_ODIV_SHIFT);

	if ((frequency > 1075000) && (frequency <= 1325000))
		psd2 = 0;
	else
		psd2 = 1;
	regs[STB6100_K] = (regs[STB6100_K] & ~STB6100_K_PSD2) | (psd2 << STB6100_K_PSD2_SHIFT);

	/* OSM	*/
	for (ptr = lkup;
	     (ptr->val_high != 0) && !CHKRANGE(frequency, ptr->val_low, ptr->val_high);
	     ptr++);
	if (ptr->val_high == 0) {
		printk(KERN_ERR "%s: frequency out of range: %u kHz\n", __func__, frequency);
		return -EINVAL;
	}
	regs[STB6100_VCO] = (regs[STB6100_VCO] & ~STB6100_VCO_OSM) | ptr->reg;

	/* F(VCO) = F(LO) * (ODIV == 0 ? 2 : 4)			*/
	fvco = frequency << (1 + odiv);
	/* N(I) = floor(f(VCO) / (f(XTAL) * (PSD2 ? 2 : 1)))	*/
	nint = fvco / (state->reference << psd2);
	/* N(F) = round(f(VCO) / f(XTAL) * (PSD2 ? 2 : 1) - N(I)) * 2 ^ 9	*/
	nfrac = DIV_ROUND_CLOSEST((fvco - (nint * state->reference << psd2))
					 << (9 - psd2),
				  state->reference);
	dprintk(verbose, FE_DEBUG, 1,
		"frequency = %u, srate = %u, g = %u, odiv = %u, psd2 = %u, fxtal = %u, osm = %u, fvco = %u, N(I) = %u, N(F) = %u",
		frequency, srate, (unsigned int)g, (unsigned int)odiv,
		(unsigned int)psd2, state->reference,
		ptr->reg, fvco, nint, nfrac);
	regs[STB6100_NI] = nint;
	regs[STB6100_NF_LSB] = nfrac;
	regs[STB6100_K] = (regs[STB6100_K] & ~STB6100_K_NF_MSB) | ((nfrac >> 8) & STB6100_K_NF_MSB);
	regs[STB6100_VCO] |= STB6100_VCO_OSCH;		/* VCO search enabled		*/
	regs[STB6100_VCO] |= STB6100_VCO_OCK;		/* VCO search clock off		*/
	regs[STB6100_FCCK] |= STB6100_FCCK_FCCK;	/* LPF BW setting clock enabled	*/
	regs[STB6100_LPEN] &= ~STB6100_LPEN_LPEN;	/* PLL loop disabled		*/
	/* Power up. */
	regs[STB6100_LPEN] |= STB6100_LPEN_SYNP	| STB6100_LPEN_OSCP | STB6100_LPEN_BEN;

	msleep(2);
	if ((rc = stb6100_write_regs(state, regs)) < 0)
		return rc;

	msleep(2);
	regs[STB6100_LPEN] |= STB6100_LPEN_LPEN;	/* PLL loop enabled		*/
	if ((rc = stb6100_write_reg(state, STB6100_LPEN, regs[STB6100_LPEN])) < 0)
		return rc;

	regs[STB6100_VCO] &= ~STB6100_VCO_OCK;		/* VCO fast search		*/
	if ((rc = stb6100_write_reg(state, STB6100_VCO, regs[STB6100_VCO])) < 0)
		return rc;

	msleep(10);					/* wait for LO to lock		*/
	regs[STB6100_VCO] &= ~STB6100_VCO_OSCH;		/* vco search disabled		*/
	regs[STB6100_VCO] |= STB6100_VCO_OCK;		/* search clock off		*/
	if ((rc = stb6100_write_reg(state, STB6100_VCO, regs[STB6100_VCO])) < 0)
		return rc;
	regs[STB6100_FCCK] &= ~STB6100_FCCK_FCCK;       /* LPF BW clock disabled	*/
	stb6100_normalise_regs(regs);
	if ((rc = stb6100_write_reg_range(state, &regs[1], 1, STB6100_NUMREGS - 3)) < 0)
		return rc;

	msleep(100);

	return 0;
}

static int stb6100_sleep(struct dvb_frontend *fe)
{
	/* TODO: power down	*/
	return 0;
}

static int stb6100_init(struct dvb_frontend *fe)
{
	struct stb6100_state *state = fe->tuner_priv;
	struct tuner_state *status = &state->status;

	status->tunerstep	= 125000;
	status->ifreq		= 0;
	status->refclock	= 27000000;	/* Hz	*/
	status->iqsense		= 1;
	status->bandwidth	= 36000;	/* kHz	*/
	state->bandwidth	= status->bandwidth * 1000;	/* Hz	*/
	state->reference	= status->refclock / 1000;	/* kHz	*/

	/* Set default bandwidth.	*/
	return stb6100_set_bandwidth(fe, state->bandwidth);
}

static int stb6100_get_state(struct dvb_frontend *fe,
			     enum tuner_param param,
			     struct tuner_state *state)
{
	switch (param) {
	case DVBFE_TUNER_FREQUENCY:
		stb6100_get_frequency(fe, &state->frequency);
		break;
	case DVBFE_TUNER_TUNERSTEP:
		break;
	case DVBFE_TUNER_IFFREQ:
		break;
	case DVBFE_TUNER_BANDWIDTH:
		stb6100_get_bandwidth(fe, &state->bandwidth);
		break;
	case DVBFE_TUNER_REFCLOCK:
		break;
	default:
		break;
	}

	return 0;
}

static int stb6100_set_state(struct dvb_frontend *fe,
			     enum tuner_param param,
			     struct tuner_state *state)
{
	struct stb6100_state *tstate = fe->tuner_priv;

	switch (param) {
	case DVBFE_TUNER_FREQUENCY:
		stb6100_set_frequency(fe, state->frequency);
		tstate->frequency = state->frequency;
		break;
	case DVBFE_TUNER_TUNERSTEP:
		break;
	case DVBFE_TUNER_IFFREQ:
		break;
	case DVBFE_TUNER_BANDWIDTH:
		stb6100_set_bandwidth(fe, state->bandwidth);
		tstate->bandwidth = state->bandwidth;
		break;
	case DVBFE_TUNER_REFCLOCK:
		break;
	default:
		break;
	}

	return 0;
}

static struct dvb_tuner_ops stb6100_ops = {
	.info = {
		.name			= "STB6100 Silicon Tuner",
		.frequency_min		= 950000,
		.frequency_max		= 2150000,
		.frequency_step		= 0,
	},

	.init		= stb6100_init,
	.sleep          = stb6100_sleep,
	.get_status	= stb6100_get_status,
	.get_state	= stb6100_get_state,
	.set_state	= stb6100_set_state,
	.release	= stb6100_release
};

struct dvb_frontend *stb6100_attach(struct dvb_frontend *fe,
				    const struct stb6100_config *config,
				    struct i2c_adapter *i2c)
{
	struct stb6100_state *state = NULL;

	state = kzalloc(sizeof (struct stb6100_state), GFP_KERNEL);
	if (state == NULL)
		goto error;

	state->config		= config;
	state->i2c		= i2c;
	state->frontend		= fe;
	state->reference	= config->refclock / 1000; /* kHz */
	fe->tuner_priv		= state;
	fe->ops.tuner_ops	= stb6100_ops;

	printk("%s: Attaching STB6100 \n", __func__);
	return fe;

error:
	kfree(state);
	return NULL;
}

static int stb6100_release(struct dvb_frontend *fe)
{
	struct stb6100_state *state = fe->tuner_priv;

	fe->tuner_priv = NULL;
	kfree(state);

	return 0;
}

EXPORT_SYMBOL(stb6100_attach);
MODULE_PARM_DESC(verbose, "Set Verbosity level");

MODULE_AUTHOR("Manu Abraham");
MODULE_DESCRIPTION("STB6100 Silicon tuner");
MODULE_LICENSE("GPL");
Commit	Line	Data
c46b6562 MA	1	/*
	2	STB6100 Silicon Tuner
	3	Copyright (C) Manu Abraham (abraham.manu@gmail.com)
	4
	5	Copyright (C) ST Microelectronics
	6
	7	This program is free software; you can redistribute it and/or modify
	8	it under the terms of the GNU General Public License as published by
	9	the Free Software Foundation; either version 2 of the License, or
	10	(at your option) any later version.
	11
	12	This program is distributed in the hope that it will be useful,
	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public License
	18	along with this program; if not, write to the Free Software
	19	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	20	*/
	21
	22	#include <linux/init.h>
	23	#include <linux/kernel.h>
	24	#include <linux/module.h>
5a0e3ad6	25	#include <linux/slab.h>
c46b6562 MA	26	#include <linux/string.h>
	27
	28	#include "dvb_frontend.h"
	29	#include "stb6100.h"
	30
	31	static unsigned int verbose;
	32	module_param(verbose, int, 0644);
	33
	34
	35	#define FE_ERROR 0
	36	#define FE_NOTICE 1
	37	#define FE_INFO 2
	38	#define FE_DEBUG 3
	39
	40	#define dprintk(x, y, z, format, arg...) do { \
	41	if (z) { \
	42	if ((x > FE_ERROR) && (x > y)) \
	43	printk(KERN_ERR "%s: " format "\n", __func__ , ##arg); \
	44	else if ((x > FE_NOTICE) && (x > y)) \
	45	printk(KERN_NOTICE "%s: " format "\n", __func__ , ##arg); \
	46	else if ((x > FE_INFO) && (x > y)) \
	47	printk(KERN_INFO "%s: " format "\n", __func__ , ##arg); \
	48	else if ((x > FE_DEBUG) && (x > y)) \
	49	printk(KERN_DEBUG "%s: " format "\n", __func__ , ##arg); \
	50	} else { \
	51	if (x > y) \
	52	printk(format, ##arg); \
	53	} \
	54	} while(0)
	55
	56	struct stb6100_lkup {
	57	u32 val_low;
	58	u32 val_high;
	59	u8 reg;
	60	};
	61
	62	static int stb6100_release(struct dvb_frontend *fe);
	63
	64	static const struct stb6100_lkup lkup[] = {
	65	{ 0, 950000, 0x0a },
	66	{ 950000, 1000000, 0x0a },
	67	{ 1000000, 1075000, 0x0c },
	68	{ 1075000, 1200000, 0x00 },
	69	{ 1200000, 1300000, 0x01 },
	70	{ 1300000, 1370000, 0x02 },
	71	{ 1370000, 1470000, 0x04 },
	72	{ 1470000, 1530000, 0x05 },
	73	{ 1530000, 1650000, 0x06 },
	74	{ 1650000, 1800000, 0x08 },
	75	{ 1800000, 1950000, 0x0a },
	76	{ 1950000, 2150000, 0x0c },
	77	{ 2150000, 9999999, 0x0c },
	78	{ 0, 0, 0x00 }
	79	};
	80
	81	/* Register names for easy debugging. */
	82	static const char *stb6100_regnames[] = {
	83	[STB6100_LD] = "LD",
	84	[STB6100_VCO] = "VCO",
	85	[STB6100_NI] = "NI",
	86	[STB6100_NF_LSB] = "NF",
	87	[STB6100_K] = "K",
	88	[STB6100_G] = "G",
	89	[STB6100_F] = "F",
90	[STB6100_DLB] = "DLB",
91	[STB6100_TEST1] = "TEST1",
92	[STB6100_FCCK] = "FCCK",
93	[STB6100_LPEN] = "LPEN",
94	[STB6100_TEST3] = "TEST3",
95	};
96
97	/* Template for normalisation, i.e. setting unused or undocumented
98	* bits as required according to the documentation.
99	*/
100	struct stb6100_regmask {
101	u8 mask;
102	u8 set;
103	};
104
105	static const struct stb6100_regmask stb6100_template[] = {
106	[STB6100_LD] = { 0xff, 0x00 },
107	[STB6100_VCO] = { 0xff, 0x00 },
108	[STB6100_NI] = { 0xff, 0x00 },
109	[STB6100_NF_LSB] = { 0xff, 0x00 },
110	[STB6100_K] = { 0xc7, 0x38 },
111	[STB6100_G] = { 0xef, 0x10 },
112	[STB6100_F] = { 0x1f, 0xc0 },
113	[STB6100_DLB] = { 0x38, 0xc4 },
114	[STB6100_TEST1] = { 0x00, 0x8f },
115	[STB6100_FCCK] = { 0x40, 0x0d },
116	[STB6100_LPEN] = { 0xf0, 0x0b },
117	[STB6100_TEST3] = { 0x00, 0xde },
118	};
119
120	static void stb6100_normalise_regs(u8 regs[])
121	{
122	int i;
123
124	for (i = 0; i < STB6100_NUMREGS; i++)
125	regs[i] = (regs[i] & stb6100_template[i].mask) \| stb6100_template[i].set;
126	}
127
128	static int stb6100_read_regs(struct stb6100_state *state, u8 regs[])
129	{
130	int rc;
131	struct i2c_msg msg = {
132	.addr = state->config->tuner_address,
133	.flags = I2C_M_RD,
134	.buf = regs,
135	.len = STB6100_NUMREGS
136	};
137
c46b6562	138	rc = i2c_transfer(state->i2c, &msg, 1);
c46b6562 MA	139	if (unlikely(rc != 1)) {
	140	dprintk(verbose, FE_ERROR, 1, "Read (0x%x) err, rc=[%d]",
	141	state->config->tuner_address, rc);
	142
	143	return -EREMOTEIO;
	144	}
	145	if (unlikely(verbose > FE_DEBUG)) {
	146	int i;
	147
	148	dprintk(verbose, FE_DEBUG, 1, " Read from 0x%02x", state->config->tuner_address);
	149	for (i = 0; i < STB6100_NUMREGS; i++)
	150	dprintk(verbose, FE_DEBUG, 1, " %s: 0x%02x", stb6100_regnames[i], regs[i]);
	151	}
	152	return 0;
	153	}
	154
	155	static int stb6100_read_reg(struct stb6100_state *state, u8 reg)
	156	{
	157	u8 regs[STB6100_NUMREGS];
	158	int rc;
	159
	160	if (unlikely(reg >= STB6100_NUMREGS)) {
	161	dprintk(verbose, FE_ERROR, 1, "Invalid register offset 0x%x", reg);
	162	return -EINVAL;
	163	}
	164	if ((rc = stb6100_read_regs(state, regs)) < 0)
	165	return rc;
	166	return (unsigned int)regs[reg];
	167	}
	168
	169	static int stb6100_write_reg_range(struct stb6100_state *state, u8 buf[], int start, int len)
	170	{
	171	int rc;
	172	u8 cmdbuf[len + 1];
	173	struct i2c_msg msg = {
	174	.addr = state->config->tuner_address,
	175	.flags = 0,
	176	.buf = cmdbuf,
	177	.len = len + 1
	178	};
	179
	180	if (unlikely(start < 1 \|\| start + len > STB6100_NUMREGS)) {
	181	dprintk(verbose, FE_ERROR, 1, "Invalid register range %d:%d",
	182	start, len);
	183	return -EINVAL;
	184	}
	185	memcpy(&cmdbuf[1], buf, len);
	186	cmdbuf[0] = start;
	187
	188	if (unlikely(verbose > FE_DEBUG)) {
	189	int i;
	190
	191	dprintk(verbose, FE_DEBUG, 1, " Write @ 0x%02x: [%d:%d]", state->config->tuner_address, start, len);
	192	for (i = 0; i < len; i++)
	193	dprintk(verbose, FE_DEBUG, 1, " %s: 0x%02x", stb6100_regnames[start + i], buf[i]);
	194	}
c46b6562	195	rc = i2c_transfer(state->i2c, &msg, 1);
c46b6562 MA	196	if (unlikely(rc != 1)) {
	197	dprintk(verbose, FE_ERROR, 1, "(0x%x) write err [%d:%d], rc=[%d]",
	198	(unsigned int)state->config->tuner_address, start, len, rc);
	199	return -EREMOTEIO;
	200	}
	201	return 0;
	202	}
	203
	204	static int stb6100_write_reg(struct stb6100_state *state, u8 reg, u8 data)
	205	{
	206	if (unlikely(reg >= STB6100_NUMREGS)) {
	207	dprintk(verbose, FE_ERROR, 1, "Invalid register offset 0x%x", reg);
	208	return -EREMOTEIO;
	209	}
	210	data = (data & stb6100_template[reg].mask) \| stb6100_template[reg].set;
	211	return stb6100_write_reg_range(state, &data, reg, 1);
	212	}
	213
	214	static int stb6100_write_regs(struct stb6100_state *state, u8 regs[])
	215	{
	216	stb6100_normalise_regs(regs);
	217	return stb6100_write_reg_range(state, &regs[1], 1, STB6100_NUMREGS - 1);
	218	}
	219
	220	static int stb6100_get_status(struct dvb_frontend fe, u32 status)
	221	{
	222	int rc;
	223	struct stb6100_state *state = fe->tuner_priv;
	224
	225	if ((rc = stb6100_read_reg(state, STB6100_LD)) < 0)
	226	return rc;
	227
	228	return (rc & STB6100_LD_LOCK) ? TUNER_STATUS_LOCKED : 0;
	229	}
	230
	231	static int stb6100_get_bandwidth(struct dvb_frontend fe, u32 bandwidth)
	232	{
	233	int rc;
	234	u8 f;
	235	struct stb6100_state *state = fe->tuner_priv;
	236
	237	if ((rc = stb6100_read_reg(state, STB6100_F)) < 0)
	238	return rc;
	239	f = rc & STB6100_F_F;
	240
	241	state->status.bandwidth = (f + 5) * 2000; /* x2 for ZIF */
	242
	243	bandwidth = state->bandwidth = state->status.bandwidth 1000;
	244	dprintk(verbose, FE_DEBUG, 1, "bandwidth = %u Hz", state->bandwidth);
	245	return 0;
	246	}
	247
	248	static int stb6100_set_bandwidth(struct dvb_frontend *fe, u32 bandwidth)
	249	{
	250	u32 tmp;
	251	int rc;
	252	struct stb6100_state *state = fe->tuner_priv;
	253
89693b7d	254	dprintk(verbose, FE_DEBUG, 1, "set bandwidth to %u Hz", bandwidth);
c46b6562	255
763fbaf6	256	bandwidth /= 2; /* ZIF */
c46b6562	257
89693b7d	258	if (bandwidth >= 36000000) /* F[4:0] BW/2 max =31+5=36 mhz for F=31 */
c46b6562	259	tmp = 31;
89693b7d	260	else if (bandwidth <= 5000000) /* bw/2 min = 5Mhz for F=0 */
c46b6562 MA	261	tmp = 0;
c46b6562 MA	262	else /* if 5 < bw/2 < 36 */
6f6c268b	263	tmp = (bandwidth + 500000) / 1000000 - 5;
c46b6562 MA	264
	265	/* Turn on LPF bandwidth setting clock control,
	266	* set bandwidth, wait 10ms, turn off.
	267	*/
	268	if ((rc = stb6100_write_reg(state, STB6100_FCCK, 0x0d \| STB6100_FCCK_FCCK)) < 0)
	269	return rc;
	270	if ((rc = stb6100_write_reg(state, STB6100_F, 0xc0 \| tmp)) < 0)
	271	return rc;
	272	msleep(1);
	273	if ((rc = stb6100_write_reg(state, STB6100_FCCK, 0x0d)) < 0)
	274	return rc;
	275
	276	return 0;
	277	}
	278
	279	static int stb6100_get_frequency(struct dvb_frontend fe, u32 frequency)
	280	{
	281	int rc;
	282	u32 nint, nfrac, fvco;
	283	int psd2, odiv;
	284	struct stb6100_state *state = fe->tuner_priv;
	285	u8 regs[STB6100_NUMREGS];
	286
	287	if ((rc = stb6100_read_regs(state, regs)) < 0)
	288	return rc;
	289
	290	odiv = (regs[STB6100_VCO] & STB6100_VCO_ODIV) >> STB6100_VCO_ODIV_SHIFT;
	291	psd2 = (regs[STB6100_K] & STB6100_K_PSD2) >> STB6100_K_PSD2_SHIFT;
	292	nint = regs[STB6100_NI];
	293	nfrac = ((regs[STB6100_K] & STB6100_K_NF_MSB) << 8) \| regs[STB6100_NF_LSB];
	294	fvco = (nfrac * state->reference >> (9 - psd2)) + (nint * state->reference << psd2);
	295	*frequency = state->frequency = fvco >> (odiv + 1);
	296
	297	dprintk(verbose, FE_DEBUG, 1,
	298	"frequency = %u kHz, odiv = %u, psd2 = %u, fxtal = %u kHz, fvco = %u kHz, N(I) = %u, N(F) = %u",
	299	state->frequency, odiv, psd2, state->reference, fvco, nint, nfrac);
	300	return 0;
	301	}
	302
	303
	304	static int stb6100_set_frequency(struct dvb_frontend *fe, u32 frequency)
	305	{
	306	int rc;
	307	const struct stb6100_lkup *ptr;
	308	struct stb6100_state *state = fe->tuner_priv;
3f400925	309	struct dvb_frontend_parameters p;
c46b6562 MA	310
	311	u32 srate = 0, fvco, nint, nfrac;
	312	u8 regs[STB6100_NUMREGS];
	313	u8 g, psd2, odiv;
	314
	315	if ((rc = stb6100_read_regs(state, regs)) < 0)
	316	return rc;
3f400925 MA	317
	318	if (fe->ops.get_frontend) {
	319	dprintk(verbose, FE_DEBUG, 1, "Get frontend parameters");
	320	fe->ops.get_frontend(fe, &p);
c46b6562	321	}
3f400925	322	srate = p.u.qpsk.symbol_rate;
c46b6562	323
20dafb3b AJ	324	regs[STB6100_DLB] = 0xdc;
	325	/* Disable LPEN */
	326	regs[STB6100_LPEN] &= ~STB6100_LPEN_LPEN; /* PLL Loop disabled */
	327
	328	if ((rc = stb6100_write_regs(state, regs)) < 0)
	329	return rc;
	330
c46b6562 MA	331	/* Baseband gain. */
c46b6562 MA	332	if (srate >= 15000000)
9bb17eee RN	333	g = 9; // +4 dB
	334	else if (srate >= 5000000)
	335	g = 11; // +8 dB
c46b6562	336	else
9bb17eee	337	g = 14; // +14 dB
d6812086	338
c46b6562	339	regs[STB6100_G] = (regs[STB6100_G] & ~STB6100_G_G) \| g;
d6812086 MA	340	regs[STB6100_G] &= ~STB6100_G_GCT; /* mask GCT */
d6812086 MA	341	regs[STB6100_G] \|= (1 << 5); /* 2Vp-p Mode */
c46b6562 MA	342
	343	/* VCO divide ratio (LO divide ratio, VCO prescaler enable). */
	344	if (frequency <= 1075000)
	345	odiv = 1;
	346	else
	347	odiv = 0;
	348	regs[STB6100_VCO] = (regs[STB6100_VCO] & ~STB6100_VCO_ODIV) \| (odiv << STB6100_VCO_ODIV_SHIFT);
	349
	350	if ((frequency > 1075000) && (frequency <= 1325000))
	351	psd2 = 0;
	352	else
	353	psd2 = 1;
	354	regs[STB6100_K] = (regs[STB6100_K] & ~STB6100_K_PSD2) \| (psd2 << STB6100_K_PSD2_SHIFT);
	355
	356	/* OSM */
	357	for (ptr = lkup;
	358	(ptr->val_high != 0) && !CHKRANGE(frequency, ptr->val_low, ptr->val_high);
	359	ptr++);
	360	if (ptr->val_high == 0) {
	361	printk(KERN_ERR "%s: frequency out of range: %u kHz\n", __func__, frequency);
	362	return -EINVAL;
	363	}
	364	regs[STB6100_VCO] = (regs[STB6100_VCO] & ~STB6100_VCO_OSM) \| ptr->reg;
	365
	366	/* F(VCO) = F(LO) * (ODIV == 0 ? 2 : 4) */
	367	fvco = frequency << (1 + odiv);
	368	/* N(I) = floor(f(VCO) / (f(XTAL) * (PSD2 ? 2 : 1))) */
	369	nint = fvco / (state->reference << psd2);
	370	/* N(F) = round(f(VCO) / f(XTAL) * (PSD2 ? 2 : 1) - N(I)) * 2 ^ 9 */
75b697f7 JL	371	nfrac = DIV_ROUND_CLOSEST((fvco - (nint * state->reference << psd2))
	372	<< (9 - psd2),
	373	state->reference);
c46b6562 MA	374	dprintk(verbose, FE_DEBUG, 1,
	375	"frequency = %u, srate = %u, g = %u, odiv = %u, psd2 = %u, fxtal = %u, osm = %u, fvco = %u, N(I) = %u, N(F) = %u",
	376	frequency, srate, (unsigned int)g, (unsigned int)odiv,
	377	(unsigned int)psd2, state->reference,
	378	ptr->reg, fvco, nint, nfrac);
	379	regs[STB6100_NI] = nint;
	380	regs[STB6100_NF_LSB] = nfrac;
	381	regs[STB6100_K] = (regs[STB6100_K] & ~STB6100_K_NF_MSB) \| ((nfrac >> 8) & STB6100_K_NF_MSB);
	382	regs[STB6100_VCO] \|= STB6100_VCO_OSCH; /* VCO search enabled */
	383	regs[STB6100_VCO] \|= STB6100_VCO_OCK; /* VCO search clock off */
	384	regs[STB6100_FCCK] \|= STB6100_FCCK_FCCK; /* LPF BW setting clock enabled */
	385	regs[STB6100_LPEN] &= ~STB6100_LPEN_LPEN; /* PLL loop disabled */
	386	/* Power up. */
	387	regs[STB6100_LPEN] \|= STB6100_LPEN_SYNP \| STB6100_LPEN_OSCP \| STB6100_LPEN_BEN;
	388
20dafb3b	389	msleep(2);
c46b6562 MA	390	if ((rc = stb6100_write_regs(state, regs)) < 0)
	391	return rc;
	392
20dafb3b	393	msleep(2);
c46b6562 MA	394	regs[STB6100_LPEN] \|= STB6100_LPEN_LPEN; /* PLL loop enabled */
	395	if ((rc = stb6100_write_reg(state, STB6100_LPEN, regs[STB6100_LPEN])) < 0)
	396	return rc;
	397
	398	regs[STB6100_VCO] &= ~STB6100_VCO_OCK; /* VCO fast search */
	399	if ((rc = stb6100_write_reg(state, STB6100_VCO, regs[STB6100_VCO])) < 0)
	400	return rc;
	401
9bb17eee	402	msleep(10); /* wait for LO to lock */
c46b6562 MA	403	regs[STB6100_VCO] &= ~STB6100_VCO_OSCH; /* vco search disabled */
	404	regs[STB6100_VCO] \|= STB6100_VCO_OCK; /* search clock off */
	405	if ((rc = stb6100_write_reg(state, STB6100_VCO, regs[STB6100_VCO])) < 0)
	406	return rc;
	407	regs[STB6100_FCCK] &= ~STB6100_FCCK_FCCK; /* LPF BW clock disabled */
20dafb3b AJ	408	stb6100_normalise_regs(regs);
20dafb3b AJ	409	if ((rc = stb6100_write_reg_range(state, &regs[1], 1, STB6100_NUMREGS - 3)) < 0)
c46b6562 MA	410	return rc;
c46b6562 MA	411
da40b593	412	msleep(100);
7e4e8c52	413
c46b6562 MA	414	return 0;
	415	}
	416
	417	static int stb6100_sleep(struct dvb_frontend *fe)
	418	{
	419	/* TODO: power down */
	420	return 0;
	421	}
	422
	423	static int stb6100_init(struct dvb_frontend *fe)
	424	{
	425	struct stb6100_state *state = fe->tuner_priv;
	426	struct tuner_state *status = &state->status;
	427
	428	status->tunerstep = 125000;
	429	status->ifreq = 0;
	430	status->refclock = 27000000; /* Hz */
	431	status->iqsense = 1;
	432	status->bandwidth = 36000; /* kHz */
26f26fa8	433	state->bandwidth = status->bandwidth * 1000; /* Hz */
c46b6562 MA	434	state->reference = status->refclock / 1000; /* kHz */
	435
	436	/* Set default bandwidth. */
26f26fa8	437	return stb6100_set_bandwidth(fe, state->bandwidth);
c46b6562 MA	438	}
	439
	440	static int stb6100_get_state(struct dvb_frontend *fe,
	441	enum tuner_param param,
	442	struct tuner_state *state)
	443	{
	444	switch (param) {
	445	case DVBFE_TUNER_FREQUENCY:
	446	stb6100_get_frequency(fe, &state->frequency);
	447	break;
	448	case DVBFE_TUNER_TUNERSTEP:
	449	break;
	450	case DVBFE_TUNER_IFFREQ:
	451	break;
	452	case DVBFE_TUNER_BANDWIDTH:
	453	stb6100_get_bandwidth(fe, &state->bandwidth);
	454	break;
	455	case DVBFE_TUNER_REFCLOCK:
	456	break;
	457	default:
	458	break;
	459	}
	460
	461	return 0;
	462	}
	463
	464	static int stb6100_set_state(struct dvb_frontend *fe,
	465	enum tuner_param param,
	466	struct tuner_state *state)
	467	{
	468	struct stb6100_state *tstate = fe->tuner_priv;
	469
	470	switch (param) {
	471	case DVBFE_TUNER_FREQUENCY:
	472	stb6100_set_frequency(fe, state->frequency);
7d8f1e57	473	tstate->frequency = state->frequency;
c46b6562 MA	474	break;
	475	case DVBFE_TUNER_TUNERSTEP:
	476	break;
	477	case DVBFE_TUNER_IFFREQ:
	478	break;
	479	case DVBFE_TUNER_BANDWIDTH:
	480	stb6100_set_bandwidth(fe, state->bandwidth);
7d8f1e57	481	tstate->bandwidth = state->bandwidth;
c46b6562 MA	482	break;
	483	case DVBFE_TUNER_REFCLOCK:
	484	break;
	485	default:
	486	break;
	487	}
	488
	489	return 0;
	490	}
	491
	492	static struct dvb_tuner_ops stb6100_ops = {
	493	.info = {
	494	.name = "STB6100 Silicon Tuner",
	495	.frequency_min = 950000,
	496	.frequency_max = 2150000,
	497	.frequency_step = 0,
	498	},
	499
	500	.init = stb6100_init,
	501	.sleep = stb6100_sleep,
	502	.get_status = stb6100_get_status,
	503	.get_state = stb6100_get_state,
	504	.set_state = stb6100_set_state,
c46b6562 MA	505	.release = stb6100_release
	506	};
	507
	508	struct dvb_frontend stb6100_attach(struct dvb_frontend fe,
2e4e98e7	509	const struct stb6100_config *config,
c46b6562 MA	510	struct i2c_adapter *i2c)
	511	{
	512	struct stb6100_state *state = NULL;
	513
a18d4315	514	state = kzalloc(sizeof (struct stb6100_state), GFP_KERNEL);
c46b6562 MA	515	if (state == NULL)
	516	goto error;
	517
	518	state->config = config;
	519	state->i2c = i2c;
	520	state->frontend = fe;
3e3263e6	521	state->reference = config->refclock / 1000; /* kHz */
c46b6562 MA	522	fe->tuner_priv = state;
	523	fe->ops.tuner_ops = stb6100_ops;
	524
3e3263e6	525	printk("%s: Attaching STB6100 \n", __func__);
c46b6562 MA	526	return fe;
	527
	528	error:
	529	kfree(state);
c46b6562 MA	530	return NULL;
	531	}
	532
	533	static int stb6100_release(struct dvb_frontend *fe)
	534	{
	535	struct stb6100_state *state = fe->tuner_priv;
	536
	537	fe->tuner_priv = NULL;
c46b6562 MA	538	kfree(state);
	539
	540	return 0;
	541	}
	542
	543	EXPORT_SYMBOL(stb6100_attach);
	544	MODULE_PARM_DESC(verbose, "Set Verbosity level");
	545
	546	MODULE_AUTHOR("Manu Abraham");
	547	MODULE_DESCRIPTION("STB6100 Silicon tuner");
	548	MODULE_LICENSE("GPL");