[linux-2.6-block.git] / drivers / media / dvb / frontends / tua6100.c

/**
 * Driver for Infineon tua6100 pll.
 *
 * (c) 2006 Andrew de Quincey
 *
 * Based on code found in budget-av.c, which has the following:
 * Compiled from various sources by Michael Hunold <michael@mihu.de>
 *
 * CI interface support (c) 2004 Olivier Gournet <ogournet@anevia.com> &
 *                               Andrew de Quincey <adq_dvb@lidskialf.net>
 *
 * Copyright (C) 2002 Ralph Metzler <rjkm@metzlerbros.de>
 *
 * Copyright (C) 1999-2002 Ralph  Metzler
 *                       & Marcus Metzler for convergence integrated media GmbH
 * 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/slab.h>
#include <linux/module.h>
#include <linux/dvb/frontend.h>
#include <asm/types.h>

#include "tua6100.h"

struct tua6100_priv {
	/* i2c details */
	int i2c_address;
	struct i2c_adapter *i2c;
	u32 frequency;
};

static int tua6100_release(struct dvb_frontend *fe)
{
	kfree(fe->tuner_priv);
	fe->tuner_priv = NULL;
	return 0;
}

static int tua6100_sleep(struct dvb_frontend *fe)
{
	struct tua6100_priv *priv = fe->tuner_priv;
	int ret;
	u8 reg0[] = { 0x00, 0x00 };
	struct i2c_msg msg = { .addr = priv->i2c_address, .flags = 0, .buf = reg0, .len = 2 };

	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 1);
	if ((ret = i2c_transfer (priv->i2c, &msg, 1)) != 1) {
		printk("%s: i2c error\n", __func__);
	}
	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 0);

	return (ret == 1) ? 0 : ret;
}

static int tua6100_set_params(struct dvb_frontend *fe)
{
	struct dtv_frontend_properties *c = &fe->dtv_property_cache;
	struct tua6100_priv *priv = fe->tuner_priv;
	u32 div;
	u32 prediv;
	u8 reg0[] = { 0x00, 0x00 };
	u8 reg1[] = { 0x01, 0x00, 0x00, 0x00 };
	u8 reg2[] = { 0x02, 0x00, 0x00 };
	struct i2c_msg msg0 = { .addr = priv->i2c_address, .flags = 0, .buf = reg0, .len = 2 };
	struct i2c_msg msg1 = { .addr = priv->i2c_address, .flags = 0, .buf = reg1, .len = 4 };
	struct i2c_msg msg2 = { .addr = priv->i2c_address, .flags = 0, .buf = reg2, .len = 3 };

#define _R 4
#define _P 32
#define _ri 4000000

	// setup register 0
	if (c->frequency < 2000000)
		reg0[1] = 0x03;
	else
		reg0[1] = 0x07;

	// setup register 1
	if (c->frequency < 1630000)
		reg1[1] = 0x2c;
	else
		reg1[1] = 0x0c;

	if (_P == 64)
		reg1[1] |= 0x40;
	if (c->frequency >= 1525000)
		reg1[1] |= 0x80;

	// register 2
	reg2[1] = (_R >> 8) & 0x03;
	reg2[2] = _R;
	if (c->frequency < 1455000)
		reg2[1] |= 0x1c;
	else if (c->frequency < 1630000)
		reg2[1] |= 0x0c;
	else
		reg2[1] |= 0x1c;

	/*
	 * The N divisor ratio (note: c->frequency is in kHz, but we
	 * need it in Hz)
	 */
	prediv = (c->frequency * _R) / (_ri / 1000);
	div = prediv / _P;
	reg1[1] |= (div >> 9) & 0x03;
	reg1[2] = div >> 1;
	reg1[3] = (div << 7);
	priv->frequency = ((div * _P) * (_ri / 1000)) / _R;

	// Finally, calculate and store the value for A
	reg1[3] |= (prediv - (div*_P)) & 0x7f;

#undef _R
#undef _P
#undef _ri

	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 1);
	if (i2c_transfer(priv->i2c, &msg0, 1) != 1)
		return -EIO;

	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 1);
	if (i2c_transfer(priv->i2c, &msg2, 1) != 1)
		return -EIO;

	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 1);
	if (i2c_transfer(priv->i2c, &msg1, 1) != 1)
		return -EIO;

	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 0);

	return 0;
}

static int tua6100_get_frequency(struct dvb_frontend *fe, u32 *frequency)
{
	struct tua6100_priv *priv = fe->tuner_priv;
	*frequency = priv->frequency;
	return 0;
}

static struct dvb_tuner_ops tua6100_tuner_ops = {
	.info = {
		.name = "Infineon TUA6100",
		.frequency_min = 950000,
		.frequency_max = 2150000,
		.frequency_step = 1000,
	},
	.release = tua6100_release,
	.sleep = tua6100_sleep,
	.set_params = tua6100_set_params,
	.get_frequency = tua6100_get_frequency,
};

struct dvb_frontend *tua6100_attach(struct dvb_frontend *fe, int addr, struct i2c_adapter *i2c)
{
	struct tua6100_priv *priv = NULL;
	u8 b1 [] = { 0x80 };
	u8 b2 [] = { 0x00 };
	struct i2c_msg msg [] = { { .addr = addr, .flags = 0, .buf = b1, .len = 1 },
				  { .addr = addr, .flags = I2C_M_RD, .buf = b2, .len = 1 } };
	int ret;

	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 1);
	ret = i2c_transfer (i2c, msg, 2);
	if (fe->ops.i2c_gate_ctrl)
		fe->ops.i2c_gate_ctrl(fe, 0);

	if (ret != 2)
		return NULL;

	priv = kzalloc(sizeof(struct tua6100_priv), GFP_KERNEL);
	if (priv == NULL)
		return NULL;

	priv->i2c_address = addr;
	priv->i2c = i2c;

	memcpy(&fe->ops.tuner_ops, &tua6100_tuner_ops, sizeof(struct dvb_tuner_ops));
	fe->tuner_priv = priv;
	return fe;
}
EXPORT_SYMBOL(tua6100_attach);

MODULE_DESCRIPTION("DVB tua6100 driver");
MODULE_AUTHOR("Andrew de Quincey");
MODULE_LICENSE("GPL");
Commit	Line	Data
00be2e7c AQ	1	/**
	2	* Driver for Infineon tua6100 pll.
	3	*
	4	* (c) 2006 Andrew de Quincey
	5	*
	6	* Based on code found in budget-av.c, which has the following:
	7	* Compiled from various sources by Michael Hunold <michael@mihu.de>
	8	*
	9	* CI interface support (c) 2004 Olivier Gournet <ogournet@anevia.com> &
	10	* Andrew de Quincey <adq_dvb@lidskialf.net>
	11	*
	12	* Copyright (C) 2002 Ralph Metzler <rjkm@metzlerbros.de>
	13	*
	14	* Copyright (C) 1999-2002 Ralph Metzler
	15	* & Marcus Metzler for convergence integrated media GmbH
	16	* This program is free software; you can redistribute it and/or modify
	17	* it under the terms of the GNU General Public License as published by
	18	* the Free Software Foundation; either version 2 of the License, or
	19	* (at your option) any later version.
	20	*
	21	* This program is distributed in the hope that it will be useful,
	22	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	23	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	24	* GNU General Public License for more details.
	25	*
	26	* You should have received a copy of the GNU General Public License
	27	* along with this program; if not, write to the Free Software
	28	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	29	*/
	30
5a0e3ad6	31	#include <linux/slab.h>
00be2e7c AQ	32	#include <linux/module.h>
	33	#include <linux/dvb/frontend.h>
	34	#include <asm/types.h>
	35
	36	#include "tua6100.h"
	37
	38	struct tua6100_priv {
	39	/* i2c details */
	40	int i2c_address;
	41	struct i2c_adapter *i2c;
	42	u32 frequency;
	43	};
	44
	45	static int tua6100_release(struct dvb_frontend *fe)
	46	{
2213918a	47	kfree(fe->tuner_priv);
00be2e7c AQ	48	fe->tuner_priv = NULL;
	49	return 0;
	50	}
	51
	52	static int tua6100_sleep(struct dvb_frontend *fe)
	53	{
	54	struct tua6100_priv *priv = fe->tuner_priv;
	55	int ret;
	56	u8 reg0[] = { 0x00, 0x00 };
	57	struct i2c_msg msg = { .addr = priv->i2c_address, .flags = 0, .buf = reg0, .len = 2 };
	58
	59	if (fe->ops.i2c_gate_ctrl)
	60	fe->ops.i2c_gate_ctrl(fe, 1);
	61	if ((ret = i2c_transfer (priv->i2c, &msg, 1)) != 1) {
271ddbf7	62	printk("%s: i2c error\n", __func__);
00be2e7c AQ	63	}
	64	if (fe->ops.i2c_gate_ctrl)
	65	fe->ops.i2c_gate_ctrl(fe, 0);
	66
	67	return (ret == 1) ? 0 : ret;
	68	}
	69
14d24d14	70	static int tua6100_set_params(struct dvb_frontend *fe)
00be2e7c	71	{
5918288a	72	struct dtv_frontend_properties *c = &fe->dtv_property_cache;
00be2e7c AQ	73	struct tua6100_priv *priv = fe->tuner_priv;
	74	u32 div;
	75	u32 prediv;
	76	u8 reg0[] = { 0x00, 0x00 };
	77	u8 reg1[] = { 0x01, 0x00, 0x00, 0x00 };
	78	u8 reg2[] = { 0x02, 0x00, 0x00 };
	79	struct i2c_msg msg0 = { .addr = priv->i2c_address, .flags = 0, .buf = reg0, .len = 2 };
	80	struct i2c_msg msg1 = { .addr = priv->i2c_address, .flags = 0, .buf = reg1, .len = 4 };
	81	struct i2c_msg msg2 = { .addr = priv->i2c_address, .flags = 0, .buf = reg2, .len = 3 };
	82
	83	#define _R 4
	84	#define _P 32
	85	#define _ri 4000000
	86
	87	// setup register 0
5918288a	88	if (c->frequency < 2000000)
00be2e7c	89	reg0[1] = 0x03;
5918288a	90	else
00be2e7c	91	reg0[1] = 0x07;
00be2e7c AQ	92
00be2e7c AQ	93	// setup register 1
5918288a	94	if (c->frequency < 1630000)
00be2e7c	95	reg1[1] = 0x2c;
5918288a	96	else
00be2e7c	97	reg1[1] = 0x0c;
5918288a	98
00be2e7c AQ	99	if (_P == 64)
00be2e7c AQ	100	reg1[1] \|= 0x40;
5918288a	101	if (c->frequency >= 1525000)
00be2e7c AQ	102	reg1[1] \|= 0x80;
	103
	104	// register 2
	105	reg2[1] = (_R >> 8) & 0x03;
	106	reg2[2] = _R;
5918288a	107	if (c->frequency < 1455000)
00be2e7c	108	reg2[1] \|= 0x1c;
5918288a	109	else if (c->frequency < 1630000)
00be2e7c	110	reg2[1] \|= 0x0c;
5918288a	111	else
00be2e7c	112	reg2[1] \|= 0x1c;
00be2e7c	113
5918288a MCC	114	/*
	115	* The N divisor ratio (note: c->frequency is in kHz, but we
	116	* need it in Hz)
	117	*/
	118	prediv = (c->frequency * _R) / (_ri / 1000);
00be2e7c AQ	119	div = prediv / _P;
	120	reg1[1] \|= (div >> 9) & 0x03;
	121	reg1[2] = div >> 1;
	122	reg1[3] = (div << 7);
	123	priv->frequency = ((div * _P) * (_ri / 1000)) / _R;
	124
	125	// Finally, calculate and store the value for A
	126	reg1[3] \|= (prediv - (div*_P)) & 0x7f;
	127
	128	#undef _R
	129	#undef _P
	130	#undef _ri
	131
	132	if (fe->ops.i2c_gate_ctrl)
	133	fe->ops.i2c_gate_ctrl(fe, 1);
	134	if (i2c_transfer(priv->i2c, &msg0, 1) != 1)
	135	return -EIO;
	136
	137	if (fe->ops.i2c_gate_ctrl)
	138	fe->ops.i2c_gate_ctrl(fe, 1);
	139	if (i2c_transfer(priv->i2c, &msg2, 1) != 1)
	140	return -EIO;
	141
	142	if (fe->ops.i2c_gate_ctrl)
	143	fe->ops.i2c_gate_ctrl(fe, 1);
	144	if (i2c_transfer(priv->i2c, &msg1, 1) != 1)
	145	return -EIO;
	146
	147	if (fe->ops.i2c_gate_ctrl)
	148	fe->ops.i2c_gate_ctrl(fe, 0);
	149
	150	return 0;
	151	}
	152
	153	static int tua6100_get_frequency(struct dvb_frontend fe, u32 frequency)
	154	{
	155	struct tua6100_priv *priv = fe->tuner_priv;
	156	*frequency = priv->frequency;
	157	return 0;
	158	}
	159
	160	static struct dvb_tuner_ops tua6100_tuner_ops = {
	161	.info = {
	162	.name = "Infineon TUA6100",
	163	.frequency_min = 950000,
	164	.frequency_max = 2150000,
	165	.frequency_step = 1000,
	166	},
	167	.release = tua6100_release,
	168	.sleep = tua6100_sleep,
	169	.set_params = tua6100_set_params,
	170	.get_frequency = tua6100_get_frequency,
	171	};
	172
	173	struct dvb_frontend tua6100_attach(struct dvb_frontend fe, int addr, struct i2c_adapter *i2c)
	174	{
	175	struct tua6100_priv *priv = NULL;
	176	u8 b1 [] = { 0x80 };
	177	u8 b2 [] = { 0x00 };
	178	struct i2c_msg msg [] = { { .addr = addr, .flags = 0, .buf = b1, .len = 1 },
	179	{ .addr = addr, .flags = I2C_M_RD, .buf = b2, .len = 1 } };
	180	int ret;
	181
	182	if (fe->ops.i2c_gate_ctrl)
183	fe->ops.i2c_gate_ctrl(fe, 1);
184	ret = i2c_transfer (i2c, msg, 2);
185	if (fe->ops.i2c_gate_ctrl)
186	fe->ops.i2c_gate_ctrl(fe, 0);
187
188	if (ret != 2)
189	return NULL;
190
191	priv = kzalloc(sizeof(struct tua6100_priv), GFP_KERNEL);
192	if (priv == NULL)
193	return NULL;
194
195	priv->i2c_address = addr;
196	priv->i2c = i2c;
197
198	memcpy(&fe->ops.tuner_ops, &tua6100_tuner_ops, sizeof(struct dvb_tuner_ops));
199	fe->tuner_priv = priv;
200	return fe;
201	}
202	EXPORT_SYMBOL(tua6100_attach);
203
204	MODULE_DESCRIPTION("DVB tua6100 driver");
205	MODULE_AUTHOR("Andrew de Quincey");
206	MODULE_LICENSE("GPL");