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

// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * 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
 */

#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 void tua6100_release(struct dvb_frontend *fe)
{
	kfree(fe->tuner_priv);
	fe->tuner_priv = NULL;
}

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_VAL 4
#define _P_VAL 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_VAL == 64)
		reg1[1] |= 0x40;
	if (c->frequency >= 1525000)
		reg1[1] |= 0x80;

	// register 2
	reg2[1] = (_R_VAL >> 8) & 0x03;
	reg2[2] = _R_VAL;
	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_VAL) / (_ri / 1000);
	div = prediv / _P_VAL;
	reg1[1] |= (div >> 9) & 0x03;
	reg1[2] = div >> 1;
	reg1[3] = (div << 7);
	priv->frequency = ((div * _P_VAL) * (_ri / 1000)) / _R_VAL;

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

#undef _R_VAL
#undef _P_VAL
#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 const struct dvb_tuner_ops tua6100_tuner_ops = {
	.info = {
		.name = "Infineon TUA6100",
		.frequency_min_hz  =  950 * MHz,
		.frequency_max_hz  = 2150 * MHz,
		.frequency_step_hz =    1 * MHz,
	},
	.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
c942fddf	1	// SPDX-License-Identifier: GPL-2.0-or-later
cba862dc	2	/*
00be2e7c AQ	3	* Driver for Infineon tua6100 pll.
	4	*
	5	* (c) 2006 Andrew de Quincey
	6	*
	7	* Based on code found in budget-av.c, which has the following:
	8	* Compiled from various sources by Michael Hunold <michael@mihu.de>
	9	*
	10	* CI interface support (c) 2004 Olivier Gournet <ogournet@anevia.com> &
	11	* Andrew de Quincey <adq_dvb@lidskialf.net>
	12	*
	13	* Copyright (C) 2002 Ralph Metzler <rjkm@metzlerbros.de>
	14	*
	15	* Copyright (C) 1999-2002 Ralph Metzler
	16	* & Marcus Metzler for convergence integrated media GmbH
00be2e7c AQ	17	*/
00be2e7c AQ	18
5a0e3ad6	19	#include <linux/slab.h>
00be2e7c AQ	20	#include <linux/module.h>
	21	#include <linux/dvb/frontend.h>
	22	#include <asm/types.h>
	23
	24	#include "tua6100.h"
	25
	26	struct tua6100_priv {
	27	/* i2c details */
	28	int i2c_address;
	29	struct i2c_adapter *i2c;
	30	u32 frequency;
	31	};
	32
f2709c20 MCC	33	static void tua6100_release(struct dvb_frontend *fe)
	34	{
	35	kfree(fe->tuner_priv);
	36	fe->tuner_priv = NULL;
	37	}
	38
00be2e7c AQ	39	static int tua6100_sleep(struct dvb_frontend *fe)
	40	{
	41	struct tua6100_priv *priv = fe->tuner_priv;
	42	int ret;
	43	u8 reg0[] = { 0x00, 0x00 };
	44	struct i2c_msg msg = { .addr = priv->i2c_address, .flags = 0, .buf = reg0, .len = 2 };
	45
	46	if (fe->ops.i2c_gate_ctrl)
	47	fe->ops.i2c_gate_ctrl(fe, 1);
	48	if ((ret = i2c_transfer (priv->i2c, &msg, 1)) != 1) {
271ddbf7	49	printk("%s: i2c error\n", __func__);
00be2e7c AQ	50	}
	51	if (fe->ops.i2c_gate_ctrl)
	52	fe->ops.i2c_gate_ctrl(fe, 0);
	53
	54	return (ret == 1) ? 0 : ret;
	55	}
	56
14d24d14	57	static int tua6100_set_params(struct dvb_frontend *fe)
00be2e7c	58	{
5918288a	59	struct dtv_frontend_properties *c = &fe->dtv_property_cache;
00be2e7c AQ	60	struct tua6100_priv *priv = fe->tuner_priv;
	61	u32 div;
	62	u32 prediv;
	63	u8 reg0[] = { 0x00, 0x00 };
	64	u8 reg1[] = { 0x01, 0x00, 0x00, 0x00 };
	65	u8 reg2[] = { 0x02, 0x00, 0x00 };
	66	struct i2c_msg msg0 = { .addr = priv->i2c_address, .flags = 0, .buf = reg0, .len = 2 };
	67	struct i2c_msg msg1 = { .addr = priv->i2c_address, .flags = 0, .buf = reg1, .len = 4 };
	68	struct i2c_msg msg2 = { .addr = priv->i2c_address, .flags = 0, .buf = reg2, .len = 3 };
	69
621ccc6c DM	70	#define _R_VAL 4
621ccc6c DM	71	#define _P_VAL 32
00be2e7c AQ	72	#define _ri 4000000
	73
	74	// setup register 0
5918288a	75	if (c->frequency < 2000000)
00be2e7c	76	reg0[1] = 0x03;
5918288a	77	else
00be2e7c	78	reg0[1] = 0x07;
00be2e7c AQ	79
00be2e7c AQ	80	// setup register 1
5918288a	81	if (c->frequency < 1630000)
00be2e7c	82	reg1[1] = 0x2c;
5918288a	83	else
00be2e7c	84	reg1[1] = 0x0c;
5918288a	85
621ccc6c	86	if (_P_VAL == 64)
00be2e7c	87	reg1[1] \|= 0x40;
5918288a	88	if (c->frequency >= 1525000)
00be2e7c AQ	89	reg1[1] \|= 0x80;
	90
	91	// register 2
621ccc6c DM	92	reg2[1] = (_R_VAL >> 8) & 0x03;
621ccc6c DM	93	reg2[2] = _R_VAL;
5918288a	94	if (c->frequency < 1455000)
00be2e7c	95	reg2[1] \|= 0x1c;
5918288a	96	else if (c->frequency < 1630000)
00be2e7c	97	reg2[1] \|= 0x0c;
5918288a	98	else
00be2e7c	99	reg2[1] \|= 0x1c;
00be2e7c	100
5918288a MCC	101	/*
	102	* The N divisor ratio (note: c->frequency is in kHz, but we
	103	* need it in Hz)
	104	*/
621ccc6c DM	105	prediv = (c->frequency * _R_VAL) / (_ri / 1000);
621ccc6c DM	106	div = prediv / _P_VAL;
00be2e7c AQ	107	reg1[1] \|= (div >> 9) & 0x03;
	108	reg1[2] = div >> 1;
	109	reg1[3] = (div << 7);
621ccc6c	110	priv->frequency = ((div * _P_VAL) * (_ri / 1000)) / _R_VAL;
00be2e7c AQ	111
00be2e7c AQ	112	// Finally, calculate and store the value for A
621ccc6c	113	reg1[3] \|= (prediv - (div*_P_VAL)) & 0x7f;
00be2e7c	114
621ccc6c DM	115	#undef _R_VAL
621ccc6c DM	116	#undef _P_VAL
00be2e7c AQ	117	#undef _ri
	118
	119	if (fe->ops.i2c_gate_ctrl)
	120	fe->ops.i2c_gate_ctrl(fe, 1);
	121	if (i2c_transfer(priv->i2c, &msg0, 1) != 1)
	122	return -EIO;
	123
	124	if (fe->ops.i2c_gate_ctrl)
	125	fe->ops.i2c_gate_ctrl(fe, 1);
	126	if (i2c_transfer(priv->i2c, &msg2, 1) != 1)
	127	return -EIO;
	128
	129	if (fe->ops.i2c_gate_ctrl)
	130	fe->ops.i2c_gate_ctrl(fe, 1);
	131	if (i2c_transfer(priv->i2c, &msg1, 1) != 1)
	132	return -EIO;
	133
	134	if (fe->ops.i2c_gate_ctrl)
	135	fe->ops.i2c_gate_ctrl(fe, 0);
	136
	137	return 0;
	138	}
	139
	140	static int tua6100_get_frequency(struct dvb_frontend fe, u32 frequency)
	141	{
	142	struct tua6100_priv *priv = fe->tuner_priv;
	143	*frequency = priv->frequency;
	144	return 0;
	145	}
	146
14c4bf3c	147	static const struct dvb_tuner_ops tua6100_tuner_ops = {
00be2e7c AQ	148	.info = {
00be2e7c AQ	149	.name = "Infineon TUA6100",
a3f90c75 MCC	150	.frequency_min_hz = 950 * MHz,
	151	.frequency_max_hz = 2150 * MHz,
	152	.frequency_step_hz = 1 * MHz,
00be2e7c	153	},
f2709c20	154	.release = tua6100_release,
00be2e7c AQ	155	.sleep = tua6100_sleep,
	156	.set_params = tua6100_set_params,
	157	.get_frequency = tua6100_get_frequency,
	158	};
	159
	160	struct dvb_frontend tua6100_attach(struct dvb_frontend fe, int addr, struct i2c_adapter *i2c)
	161	{
	162	struct tua6100_priv *priv = NULL;
	163	u8 b1 [] = { 0x80 };
	164	u8 b2 [] = { 0x00 };
	165	struct i2c_msg msg [] = { { .addr = addr, .flags = 0, .buf = b1, .len = 1 },
	166	{ .addr = addr, .flags = I2C_M_RD, .buf = b2, .len = 1 } };
	167	int ret;
	168
	169	if (fe->ops.i2c_gate_ctrl)
	170	fe->ops.i2c_gate_ctrl(fe, 1);
	171	ret = i2c_transfer (i2c, msg, 2);
	172	if (fe->ops.i2c_gate_ctrl)
	173	fe->ops.i2c_gate_ctrl(fe, 0);
	174
	175	if (ret != 2)
	176	return NULL;
	177
	178	priv = kzalloc(sizeof(struct tua6100_priv), GFP_KERNEL);
	179	if (priv == NULL)
	180	return NULL;
	181
	182	priv->i2c_address = addr;
	183	priv->i2c = i2c;
	184
	185	memcpy(&fe->ops.tuner_ops, &tua6100_tuner_ops, sizeof(struct dvb_tuner_ops));
	186	fe->tuner_priv = priv;
	187	return fe;
	188	}
	189	EXPORT_SYMBOL(tua6100_attach);
	190
	191	MODULE_DESCRIPTION("DVB tua6100 driver");
	192	MODULE_AUTHOR("Andrew de Quincey");
	193	MODULE_LICENSE("GPL");