[mirror_ubuntu-zesty-kernel.git] / drivers / media / video / em28xx / em28xx-i2c.c

/*
   em28xx-i2c.c - driver for Empia EM2800/EM2820/2840 USB video capture devices

   Copyright (C) 2005 Ludovico Cavedon <cavedon@sssup.it>
		      Markus Rechberger <mrechberger@gmail.com>
		      Mauro Carvalho Chehab <mchehab@infradead.org>
		      Sascha Sommer <saschasommer@freenet.de>

   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/module.h>
#include <linux/kernel.h>
#include <linux/usb.h>
#include <linux/i2c.h>

#include "em28xx.h"
#include "tuner-xc2028.h"
#include <media/v4l2-common.h>
#include <media/tuner.h>

/* ----------------------------------------------------------- */

static unsigned int i2c_scan;
module_param(i2c_scan, int, 0444);
MODULE_PARM_DESC(i2c_scan, "scan i2c bus at insmod time");

static unsigned int i2c_debug;
module_param(i2c_debug, int, 0644);
MODULE_PARM_DESC(i2c_debug, "enable debug messages [i2c]");


#define dprintk1(lvl, fmt, args...)			\
do {							\
	if (i2c_debug >= lvl) {				\
	printk(fmt, ##args);				\
      }							\
} while (0)

#define dprintk2(lvl, fmt, args...)			\
do {							\
	if (i2c_debug >= lvl) {				\
		printk(KERN_DEBUG "%s at %s: " fmt,	\
		       dev->name, __func__ , ##args);	\
      } 						\
} while (0)

/*
 * em2800_i2c_send_max4()
 * send up to 4 bytes to the i2c device
 */
static int em2800_i2c_send_max4(struct em28xx *dev, unsigned char addr,
				char *buf, int len)
{
	int ret;
	int write_timeout;
	unsigned char b2[6];
	BUG_ON(len < 1 || len > 4);
	b2[5] = 0x80 + len - 1;
	b2[4] = addr;
	b2[3] = buf[0];
	if (len > 1)
		b2[2] = buf[1];
	if (len > 2)
		b2[1] = buf[2];
	if (len > 3)
		b2[0] = buf[3];

	ret = dev->em28xx_write_regs(dev, 4 - len, &b2[4 - len], 2 + len);
	if (ret != 2 + len) {
		em28xx_warn("writing to i2c device failed (error=%i)\n", ret);
		return -EIO;
	}
	for (write_timeout = EM2800_I2C_WRITE_TIMEOUT; write_timeout > 0;
	     write_timeout -= 5) {
		ret = dev->em28xx_read_reg(dev, 0x05);
		if (ret == 0x80 + len - 1)
			return len;
		msleep(5);
	}
	em28xx_warn("i2c write timed out\n");
	return -EIO;
}

/*
 * em2800_i2c_send_bytes()
 */
static int em2800_i2c_send_bytes(void *data, unsigned char addr, char *buf,
				 short len)
{
	char *bufPtr = buf;
	int ret;
	int wrcount = 0;
	int count;
	int maxLen = 4;
	struct em28xx *dev = (struct em28xx *)data;
	while (len > 0) {
		count = (len > maxLen) ? maxLen : len;
		ret = em2800_i2c_send_max4(dev, addr, bufPtr, count);
		if (ret > 0) {
			len -= count;
			bufPtr += count;
			wrcount += count;
		} else
			return (ret < 0) ? ret : -EFAULT;
	}
	return wrcount;
}

/*
 * em2800_i2c_check_for_device()
 * check if there is a i2c_device at the supplied address
 */
static int em2800_i2c_check_for_device(struct em28xx *dev, unsigned char addr)
{
	char msg;
	int ret;
	int write_timeout;
	msg = addr;
	ret = dev->em28xx_write_regs(dev, 0x04, &msg, 1);
	if (ret < 0) {
		em28xx_warn("setting i2c device address failed (error=%i)\n",
			    ret);
		return ret;
	}
	msg = 0x84;
	ret = dev->em28xx_write_regs(dev, 0x05, &msg, 1);
	if (ret < 0) {
		em28xx_warn("preparing i2c read failed (error=%i)\n", ret);
		return ret;
	}
	for (write_timeout = EM2800_I2C_WRITE_TIMEOUT; write_timeout > 0;
	     write_timeout -= 5) {
		unsigned msg = dev->em28xx_read_reg(dev, 0x5);
		if (msg == 0x94)
			return -ENODEV;
		else if (msg == 0x84)
			return 0;
		msleep(5);
	}
	return -ENODEV;
}

/*
 * em2800_i2c_recv_bytes()
 * read from the i2c device
 */
static int em2800_i2c_recv_bytes(struct em28xx *dev, unsigned char addr,
				 char *buf, int len)
{
	int ret;
	/* check for the device and set i2c read address */
	ret = em2800_i2c_check_for_device(dev, addr);
	if (ret) {
		em28xx_warn
		    ("preparing read at i2c address 0x%x failed (error=%i)\n",
		     addr, ret);
		return ret;
	}
	ret = dev->em28xx_read_reg_req_len(dev, 0x0, 0x3, buf, len);
	if (ret < 0) {
		em28xx_warn("reading from i2c device at 0x%x failed (error=%i)",
			    addr, ret);
		return ret;
	}
	return ret;
}

/*
 * em28xx_i2c_send_bytes()
 * untested for more than 4 bytes
 */
static int em28xx_i2c_send_bytes(void *data, unsigned char addr, char *buf,
				 short len, int stop)
{
	int wrcount = 0;
	struct em28xx *dev = (struct em28xx *)data;

	wrcount = dev->em28xx_write_regs_req(dev, stop ? 2 : 3, addr, buf, len);

	return wrcount;
}

/*
 * em28xx_i2c_recv_bytes()
 * read a byte from the i2c device
 */
static int em28xx_i2c_recv_bytes(struct em28xx *dev, unsigned char addr,
				 char *buf, int len)
{
	int ret;
	ret = dev->em28xx_read_reg_req_len(dev, 2, addr, buf, len);
	if (ret < 0) {
		em28xx_warn("reading i2c device failed (error=%i)\n", ret);
		return ret;
	}
	if (dev->em28xx_read_reg(dev, 0x5) != 0)
		return -ENODEV;
	return ret;
}

/*
 * em28xx_i2c_check_for_device()
 * check if there is a i2c_device at the supplied address
 */
static int em28xx_i2c_check_for_device(struct em28xx *dev, unsigned char addr)
{
	char msg;
	int ret;
	msg = addr;

	ret = dev->em28xx_read_reg_req(dev, 2, addr);
	if (ret < 0) {
		em28xx_warn("reading from i2c device failed (error=%i)\n", ret);
		return ret;
	}
	if (dev->em28xx_read_reg(dev, 0x5) != 0)
		return -ENODEV;
	return 0;
}

/*
 * em28xx_i2c_xfer()
 * the main i2c transfer function
 */
static int em28xx_i2c_xfer(struct i2c_adapter *i2c_adap,
			   struct i2c_msg msgs[], int num)
{
	struct em28xx *dev = i2c_adap->algo_data;
	int addr, rc, i, byte;

	if (num <= 0)
		return 0;
	for (i = 0; i < num; i++) {
		addr = msgs[i].addr << 1;
		dprintk2(2, "%s %s addr=%x len=%d:",
			 (msgs[i].flags & I2C_M_RD) ? "read" : "write",
			 i == num - 1 ? "stop" : "nonstop", addr, msgs[i].len);
		if (!msgs[i].len) { /* no len: check only for device presence */
			if (dev->is_em2800)
				rc = em2800_i2c_check_for_device(dev, addr);
			else
				rc = em28xx_i2c_check_for_device(dev, addr);
			if (rc < 0) {
				dprintk2(2, " no device\n");
				return rc;
			}

		} else if (msgs[i].flags & I2C_M_RD) {
			/* read bytes */
			if (dev->is_em2800)
				rc = em2800_i2c_recv_bytes(dev, addr,
							   msgs[i].buf,
							   msgs[i].len);
			else
				rc = em28xx_i2c_recv_bytes(dev, addr,
							   msgs[i].buf,
							   msgs[i].len);
			if (i2c_debug >= 2) {
				for (byte = 0; byte < msgs[i].len; byte++)
					printk(" %02x", msgs[i].buf[byte]);
			}
		} else {
			/* write bytes */
			if (i2c_debug >= 2) {
				for (byte = 0; byte < msgs[i].len; byte++)
					printk(" %02x", msgs[i].buf[byte]);
			}
			if (dev->is_em2800)
				rc = em2800_i2c_send_bytes(dev, addr,
							   msgs[i].buf,
							   msgs[i].len);
			else
				rc = em28xx_i2c_send_bytes(dev, addr,
							   msgs[i].buf,
							   msgs[i].len,
							   i == num - 1);
		}
		if (rc < 0)
			goto err;
		if (i2c_debug >= 2)
			printk("\n");
	}

	return num;
err:
	dprintk2(2, " ERROR: %i\n", rc);
	return rc;
}

/* based on linux/sunrpc/svcauth.h and linux/hash.h
 * The original hash function returns a different value, if arch is x86_64
 *  or i386.
 */
static inline unsigned long em28xx_hash_mem(char *buf, int length, int bits)
{
	unsigned long hash = 0;
	unsigned long l = 0;
	int len = 0;
	unsigned char c;
	do {
		if (len == length) {
			c = (char)len;
			len = -1;
		} else
			c = *buf++;
		l = (l << 8) | c;
		len++;
		if ((len & (32 / 8 - 1)) == 0)
			hash = ((hash^l) * 0x9e370001UL);
	} while (len);

	return (hash >> (32 - bits)) & 0xffffffffUL;
}

static int em28xx_i2c_eeprom(struct em28xx *dev, unsigned char *eedata, int len)
{
	unsigned char buf, *p = eedata;
	struct em28xx_eeprom *em_eeprom = (void *)eedata;
	int i, err, size = len, block;

	dev->i2c_client.addr = 0xa0 >> 1;

	/* Check if board has eeprom */
	err = i2c_master_recv(&dev->i2c_client, &buf, 0);
	if (err < 0)
		return -1;

	buf = 0;

	err = i2c_master_send(&dev->i2c_client, &buf, 1);
	if (err != 1) {
		printk(KERN_INFO "%s: Huh, no eeprom present (err=%d)?\n",
		       dev->name, err);
		return -1;
	}
	while (size > 0) {
		if (size > 16)
			block = 16;
		else
			block = size;

		if (block !=
		    (err = i2c_master_recv(&dev->i2c_client, p, block))) {
			printk(KERN_WARNING
			       "%s: i2c eeprom read error (err=%d)\n",
			       dev->name, err);
			return -1;
		}
		size -= block;
		p += block;
	}
	for (i = 0; i < len; i++) {
		if (0 == (i % 16))
			printk(KERN_INFO "%s: i2c eeprom %02x:", dev->name, i);
		printk(" %02x", eedata[i]);
		if (15 == (i % 16))
			printk("\n");
	}

	if (em_eeprom->id == 0x9567eb1a)
		dev->hash = em28xx_hash_mem(eedata, len, 32);

	printk(KERN_INFO "EEPROM ID= 0x%08x, hash = 0x%08lx\n",
	       em_eeprom->id, dev->hash);
	printk(KERN_INFO "Vendor/Product ID= %04x:%04x\n", em_eeprom->vendor_ID,
	       em_eeprom->product_ID);

	switch (em_eeprom->chip_conf >> 4 & 0x3) {
	case 0:
		printk(KERN_INFO "No audio on board.\n");
		break;
	case 1:
		printk(KERN_INFO "AC97 audio (5 sample rates)\n");
		break;
	case 2:
		printk(KERN_INFO "I2S audio, sample rate=32k\n");
		break;
	case 3:
		printk(KERN_INFO "I2S audio, 3 sample rates\n");
		break;
	}

	if (em_eeprom->chip_conf & 1 << 3)
		printk(KERN_INFO "USB Remote wakeup capable\n");

	if (em_eeprom->chip_conf & 1 << 2)
		printk(KERN_INFO "USB Self power capable\n");

	switch (em_eeprom->chip_conf & 0x3) {
	case 0:
		printk(KERN_INFO "500mA max power\n");
		break;
	case 1:
		printk(KERN_INFO "400mA max power\n");
		break;
	case 2:
		printk(KERN_INFO "300mA max power\n");
		break;
	case 3:
		printk(KERN_INFO "200mA max power\n");
		break;
	}
	printk(KERN_INFO "Table at 0x%02x, strings=0x%04x, 0x%04x, 0x%04x\n",
				em_eeprom->string_idx_table,
				em_eeprom->string1,
				em_eeprom->string2,
				em_eeprom->string3);

	return 0;
}

/* ----------------------------------------------------------- */

/*
 * functionality()
 */
static u32 functionality(struct i2c_adapter *adap)
{
	return I2C_FUNC_SMBUS_EMUL;
}

/*
 * attach_inform()
 * gets called when a device attaches to the i2c bus
 * does some basic configuration
 */
static int attach_inform(struct i2c_client *client)
{
	struct em28xx *dev = client->adapter->algo_data;

	switch (client->addr << 1) {
	case 0x86:
	case 0x84:
	case 0x96:
	case 0x94:
	{
		struct v4l2_priv_tun_config tda9887_cfg;

		struct tuner_setup tun_setup;

		tun_setup.mode_mask = T_ANALOG_TV | T_RADIO;
		tun_setup.type = TUNER_TDA9887;
		tun_setup.addr = client->addr;

		em28xx_i2c_call_clients(dev, TUNER_SET_TYPE_ADDR,
			&tun_setup);

		tda9887_cfg.tuner = TUNER_TDA9887;
		tda9887_cfg.priv = &dev->tda9887_conf;
		em28xx_i2c_call_clients(dev, TUNER_SET_CONFIG,
					&tda9887_cfg);
		break;
	}
	case 0x42:
		dprintk1(1, "attach_inform: saa7114 detected.\n");
		break;
	case 0x4a:
		dprintk1(1, "attach_inform: saa7113 detected.\n");
		break;
	case 0xa0:
		dprintk1(1, "attach_inform: eeprom detected.\n");
		break;
	case 0x60:
	case 0x8e:
	{
		struct IR_i2c *ir = i2c_get_clientdata(client);
		dprintk1(1, "attach_inform: IR detected (%s).\n",
			ir->phys);
		em28xx_set_ir(dev, ir);
		break;
	}
	case 0x80:
	case 0x88:
		dprintk1(1, "attach_inform: msp34xx detected.\n");
		break;
	case 0xb8:
	case 0xba:
		dprintk1(1, "attach_inform: tvp5150 detected.\n");
		break;

	default:
		if (!dev->tuner_addr)
			dev->tuner_addr = client->addr;

		dprintk1(1, "attach inform: detected I2C address %x\n",
				client->addr << 1);

	}

	return 0;
}

static struct i2c_algorithm em28xx_algo = {
	.master_xfer   = em28xx_i2c_xfer,
	.functionality = functionality,
};

static struct i2c_adapter em28xx_adap_template = {
	.owner = THIS_MODULE,
	.class = I2C_CLASS_TV_ANALOG,
	.name = "em28xx",
	.id = I2C_HW_B_EM28XX,
	.algo = &em28xx_algo,
	.client_register = attach_inform,
};

static struct i2c_client em28xx_client_template = {
	.name = "em28xx internal",
};

/* ----------------------------------------------------------- */

/*
 * i2c_devs
 * incomplete list of known devices
 */
static char *i2c_devs[128] = {
	[0x4a >> 1] = "saa7113h",
	[0x60 >> 1] = "remote IR sensor",
	[0x8e >> 1] = "remote IR sensor",
	[0x86 >> 1] = "tda9887",
	[0x80 >> 1] = "msp34xx",
	[0x88 >> 1] = "msp34xx",
	[0xa0 >> 1] = "eeprom",
	[0xb8 >> 1] = "tvp5150a",
	[0xba >> 1] = "tvp5150a",
	[0xc0 >> 1] = "tuner (analog)",
	[0xc2 >> 1] = "tuner (analog)",
	[0xc4 >> 1] = "tuner (analog)",
	[0xc6 >> 1] = "tuner (analog)",
};

/*
 * do_i2c_scan()
 * check i2c address range for devices
 */
void em28xx_do_i2c_scan(struct em28xx *dev)
{
	u8 i2c_devicelist[128];
	unsigned char buf;
	int i, rc;

	memset(i2c_devicelist, 0, ARRAY_SIZE(i2c_devicelist));

	for (i = 0; i < ARRAY_SIZE(i2c_devs); i++) {
		dev->i2c_client.addr = i;
		rc = i2c_master_recv(&dev->i2c_client, &buf, 0);
		if (rc < 0)
			continue;
		i2c_devicelist[i] = i;
		printk(KERN_INFO "%s: found i2c device @ 0x%x [%s]\n",
		       dev->name, i << 1, i2c_devs[i] ? i2c_devs[i] : "???");
	}

	dev->i2c_hash = em28xx_hash_mem(i2c_devicelist,
					ARRAY_SIZE(i2c_devicelist), 32);
}

/*
 * em28xx_i2c_call_clients()
 * send commands to all attached i2c devices
 */
void em28xx_i2c_call_clients(struct em28xx *dev, unsigned int cmd, void *arg)
{
	BUG_ON(NULL == dev->i2c_adap.algo_data);
	i2c_clients_command(&dev->i2c_adap, cmd, arg);
}

/*
 * em28xx_i2c_register()
 * register i2c bus
 */
int em28xx_i2c_register(struct em28xx *dev)
{
	BUG_ON(!dev->em28xx_write_regs || !dev->em28xx_read_reg);
	BUG_ON(!dev->em28xx_write_regs_req || !dev->em28xx_read_reg_req);
	dev->i2c_adap = em28xx_adap_template;
	dev->i2c_adap.dev.parent = &dev->udev->dev;
	strcpy(dev->i2c_adap.name, dev->name);
	dev->i2c_adap.algo_data = dev;
	i2c_add_adapter(&dev->i2c_adap);

	dev->i2c_client = em28xx_client_template;
	dev->i2c_client.adapter = &dev->i2c_adap;

	em28xx_i2c_eeprom(dev, dev->eedata, sizeof(dev->eedata));

	if (i2c_scan)
		em28xx_do_i2c_scan(dev);
	return 0;
}

/*
 * em28xx_i2c_unregister()
 * unregister i2c_bus
 */
int em28xx_i2c_unregister(struct em28xx *dev)
{
	i2c_del_adapter(&dev->i2c_adap);
	return 0;
}
Commit	Line	Data
a6c2ba28	1	/*
f7abcd38	2	em28xx-i2c.c - driver for Empia EM2800/EM2820/2840 USB video capture devices
a6c2ba28	3
f7abcd38 MCC	4	Copyright (C) 2005 Ludovico Cavedon <cavedon@sssup.it>
f7abcd38 MCC	5	Markus Rechberger <mrechberger@gmail.com>
2e7c6dc3	6	Mauro Carvalho Chehab <mchehab@infradead.org>
f7abcd38	7	Sascha Sommer <saschasommer@freenet.de>
a6c2ba28	8
	9	This program is free software; you can redistribute it and/or modify
	10	it under the terms of the GNU General Public License as published by
	11	the Free Software Foundation; either version 2 of the License, or
	12	(at your option) any later version.
	13
	14	This program is distributed in the hope that it will be useful,
	15	but WITHOUT ANY WARRANTY; without even the implied warranty of
	16	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	17	GNU General Public License for more details.
	18
	19	You should have received a copy of the GNU General Public License
	20	along with this program; if not, write to the Free Software
	21	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	22	*/
	23
	24	#include <linux/module.h>
	25	#include <linux/kernel.h>
	26	#include <linux/usb.h>
	27	#include <linux/i2c.h>
a6c2ba28	28
f7abcd38	29	#include "em28xx.h"
6c362c8e	30	#include "tuner-xc2028.h"
5e453dc7	31	#include <media/v4l2-common.h>
d5e52653	32	#include <media/tuner.h>
a6c2ba28	33
	34	/* ----------------------------------------------------------- */
	35
ff699e6b	36	static unsigned int i2c_scan;
a6c2ba28	37	module_param(i2c_scan, int, 0444);
	38	MODULE_PARM_DESC(i2c_scan, "scan i2c bus at insmod time");
	39
ff699e6b	40	static unsigned int i2c_debug;
a6c2ba28	41	module_param(i2c_debug, int, 0644);
	42	MODULE_PARM_DESC(i2c_debug, "enable debug messages [i2c]");
	43
6ea54d93 DSL	44
	45	#define dprintk1(lvl, fmt, args...) \
	46	do { \
	47	if (i2c_debug >= lvl) { \
	48	printk(fmt, ##args); \
	49	} \
	50	} while (0)
	51
	52	#define dprintk2(lvl, fmt, args...) \
	53	do { \
	54	if (i2c_debug >= lvl) { \
	55	printk(KERN_DEBUG "%s at %s: " fmt, \
	56	dev->name, __func__ , ##args); \
	57	} \
	58	} while (0)
a6c2ba28	59
a6c2ba28	60	/*
596d92d5 MCC	61	* em2800_i2c_send_max4()
	62	* send up to 4 bytes to the i2c device
	63	*/
3acf2809	64	static int em2800_i2c_send_max4(struct em28xx *dev, unsigned char addr,
596d92d5 MCC	65	char *buf, int len)
	66	{
	67	int ret;
	68	int write_timeout;
	69	unsigned char b2[6];
	70	BUG_ON(len < 1 \|\| len > 4);
	71	b2[5] = 0x80 + len - 1;
	72	b2[4] = addr;
	73	b2[3] = buf[0];
	74	if (len > 1)
	75	b2[2] = buf[1];
	76	if (len > 2)
	77	b2[1] = buf[2];
	78	if (len > 3)
	79	b2[0] = buf[3];
	80
3acf2809	81	ret = dev->em28xx_write_regs(dev, 4 - len, &b2[4 - len], 2 + len);
596d92d5	82	if (ret != 2 + len) {
beb7dd86	83	em28xx_warn("writing to i2c device failed (error=%i)\n", ret);
596d92d5 MCC	84	return -EIO;
	85	}
	86	for (write_timeout = EM2800_I2C_WRITE_TIMEOUT; write_timeout > 0;
	87	write_timeout -= 5) {
3acf2809	88	ret = dev->em28xx_read_reg(dev, 0x05);
596d92d5 MCC	89	if (ret == 0x80 + len - 1)
596d92d5 MCC	90	return len;
e8e41da4	91	msleep(5);
596d92d5	92	}
3acf2809	93	em28xx_warn("i2c write timed out\n");
596d92d5 MCC	94	return -EIO;
	95	}
	96
	97	/*
	98	* em2800_i2c_send_bytes()
	99	*/
	100	static int em2800_i2c_send_bytes(void data, unsigned char addr, char buf,
	101	short len)
	102	{
	103	char *bufPtr = buf;
	104	int ret;
	105	int wrcount = 0;
	106	int count;
	107	int maxLen = 4;
3acf2809	108	struct em28xx dev = (struct em28xx )data;
596d92d5 MCC	109	while (len > 0) {
	110	count = (len > maxLen) ? maxLen : len;
	111	ret = em2800_i2c_send_max4(dev, addr, bufPtr, count);
	112	if (ret > 0) {
	113	len -= count;
	114	bufPtr += count;
	115	wrcount += count;
	116	} else
	117	return (ret < 0) ? ret : -EFAULT;
	118	}
	119	return wrcount;
	120	}
	121
	122	/*
	123	* em2800_i2c_check_for_device()
	124	* check if there is a i2c_device at the supplied address
	125	*/
3acf2809	126	static int em2800_i2c_check_for_device(struct em28xx *dev, unsigned char addr)
596d92d5 MCC	127	{
	128	char msg;
	129	int ret;
	130	int write_timeout;
	131	msg = addr;
3acf2809	132	ret = dev->em28xx_write_regs(dev, 0x04, &msg, 1);
596d92d5	133	if (ret < 0) {
3acf2809	134	em28xx_warn("setting i2c device address failed (error=%i)\n",
596d92d5 MCC	135	ret);
	136	return ret;
	137	}
	138	msg = 0x84;
3acf2809	139	ret = dev->em28xx_write_regs(dev, 0x05, &msg, 1);
596d92d5	140	if (ret < 0) {
3acf2809	141	em28xx_warn("preparing i2c read failed (error=%i)\n", ret);
596d92d5 MCC	142	return ret;
	143	}
	144	for (write_timeout = EM2800_I2C_WRITE_TIMEOUT; write_timeout > 0;
	145	write_timeout -= 5) {
3acf2809	146	unsigned msg = dev->em28xx_read_reg(dev, 0x5);
596d92d5 MCC	147	if (msg == 0x94)
	148	return -ENODEV;
	149	else if (msg == 0x84)
	150	return 0;
e8e41da4	151	msleep(5);
596d92d5 MCC	152	}
	153	return -ENODEV;
	154	}
	155
	156	/*
	157	* em2800_i2c_recv_bytes()
	158	* read from the i2c device
	159	*/
3acf2809	160	static int em2800_i2c_recv_bytes(struct em28xx *dev, unsigned char addr,
596d92d5 MCC	161	char *buf, int len)
	162	{
	163	int ret;
	164	/* check for the device and set i2c read address */
	165	ret = em2800_i2c_check_for_device(dev, addr);
	166	if (ret) {
3acf2809	167	em28xx_warn
596d92d5 MCC	168	("preparing read at i2c address 0x%x failed (error=%i)\n",
	169	addr, ret);
	170	return ret;
	171	}
3acf2809	172	ret = dev->em28xx_read_reg_req_len(dev, 0x0, 0x3, buf, len);
596d92d5	173	if (ret < 0) {
3acf2809	174	em28xx_warn("reading from i2c device at 0x%x failed (error=%i)",
596d92d5 MCC	175	addr, ret);
	176	return ret;
	177	}
	178	return ret;
	179	}
	180
	181	/*
3acf2809	182	* em28xx_i2c_send_bytes()
a6c2ba28	183	* untested for more than 4 bytes
a6c2ba28	184	*/
3acf2809	185	static int em28xx_i2c_send_bytes(void data, unsigned char addr, char buf,
596d92d5	186	short len, int stop)
a6c2ba28	187	{
a6c2ba28	188	int wrcount = 0;
3acf2809	189	struct em28xx dev = (struct em28xx )data;
a6c2ba28	190
3acf2809	191	wrcount = dev->em28xx_write_regs_req(dev, stop ? 2 : 3, addr, buf, len);
a6c2ba28	192
	193	return wrcount;
	194	}
	195
	196	/*
3acf2809	197	* em28xx_i2c_recv_bytes()
a6c2ba28	198	* read a byte from the i2c device
a6c2ba28	199	*/
3acf2809	200	static int em28xx_i2c_recv_bytes(struct em28xx *dev, unsigned char addr,
596d92d5	201	char *buf, int len)
a6c2ba28	202	{
a6c2ba28	203	int ret;
3acf2809	204	ret = dev->em28xx_read_reg_req_len(dev, 2, addr, buf, len);
a6c2ba28	205	if (ret < 0) {
3acf2809	206	em28xx_warn("reading i2c device failed (error=%i)\n", ret);
a6c2ba28	207	return ret;
a6c2ba28	208	}
3acf2809	209	if (dev->em28xx_read_reg(dev, 0x5) != 0)
a6c2ba28	210	return -ENODEV;
	211	return ret;
	212	}
	213
	214	/*
3acf2809	215	* em28xx_i2c_check_for_device()
a6c2ba28	216	* check if there is a i2c_device at the supplied address
a6c2ba28	217	*/
3acf2809	218	static int em28xx_i2c_check_for_device(struct em28xx *dev, unsigned char addr)
a6c2ba28	219	{
	220	char msg;
	221	int ret;
	222	msg = addr;
	223
3acf2809	224	ret = dev->em28xx_read_reg_req(dev, 2, addr);
a6c2ba28	225	if (ret < 0) {
3acf2809	226	em28xx_warn("reading from i2c device failed (error=%i)\n", ret);
a6c2ba28	227	return ret;
a6c2ba28	228	}
3acf2809	229	if (dev->em28xx_read_reg(dev, 0x5) != 0)
a6c2ba28	230	return -ENODEV;
	231	return 0;
	232	}
	233
	234	/*
3acf2809	235	* em28xx_i2c_xfer()
a6c2ba28	236	* the main i2c transfer function
a6c2ba28	237	*/
3acf2809	238	static int em28xx_i2c_xfer(struct i2c_adapter *i2c_adap,
a6c2ba28	239	struct i2c_msg msgs[], int num)
a6c2ba28	240	{
3acf2809	241	struct em28xx *dev = i2c_adap->algo_data;
a6c2ba28	242	int addr, rc, i, byte;
	243
	244	if (num <= 0)
	245	return 0;
	246	for (i = 0; i < num; i++) {
	247	addr = msgs[i].addr << 1;
6ea54d93	248	dprintk2(2, "%s %s addr=%x len=%d:",
a6c2ba28	249	(msgs[i].flags & I2C_M_RD) ? "read" : "write",
a6c2ba28	250	i == num - 1 ? "stop" : "nonstop", addr, msgs[i].len);
6ea54d93	251	if (!msgs[i].len) { /* no len: check only for device presence */
596d92d5 MCC	252	if (dev->is_em2800)
	253	rc = em2800_i2c_check_for_device(dev, addr);
	254	else
3acf2809	255	rc = em28xx_i2c_check_for_device(dev, addr);
a6c2ba28	256	if (rc < 0) {
6ea54d93	257	dprintk2(2, " no device\n");
a6c2ba28	258	return rc;
	259	}
	260
596d92d5	261	} else if (msgs[i].flags & I2C_M_RD) {
a6c2ba28	262	/* read bytes */
596d92d5 MCC	263	if (dev->is_em2800)
	264	rc = em2800_i2c_recv_bytes(dev, addr,
	265	msgs[i].buf,
	266	msgs[i].len);
	267	else
3acf2809	268	rc = em28xx_i2c_recv_bytes(dev, addr,
596d92d5 MCC	269	msgs[i].buf,
596d92d5 MCC	270	msgs[i].len);
6ea54d93 DSL	271	if (i2c_debug >= 2) {
6ea54d93 DSL	272	for (byte = 0; byte < msgs[i].len; byte++)
a6c2ba28	273	printk(" %02x", msgs[i].buf[byte]);
a6c2ba28	274	}
	275	} else {
	276	/* write bytes */
6ea54d93	277	if (i2c_debug >= 2) {
a6c2ba28	278	for (byte = 0; byte < msgs[i].len; byte++)
	279	printk(" %02x", msgs[i].buf[byte]);
	280	}
596d92d5 MCC	281	if (dev->is_em2800)
	282	rc = em2800_i2c_send_bytes(dev, addr,
	283	msgs[i].buf,
	284	msgs[i].len);
	285	else
3acf2809	286	rc = em28xx_i2c_send_bytes(dev, addr,
596d92d5 MCC	287	msgs[i].buf,
	288	msgs[i].len,
	289	i == num - 1);
a6c2ba28	290	}
e8e41da4 MR	291	if (rc < 0)
e8e41da4 MR	292	goto err;
6ea54d93	293	if (i2c_debug >= 2)
a6c2ba28	294	printk("\n");
	295	}
	296
	297	return num;
6ea54d93 DSL	298	err:
6ea54d93 DSL	299	dprintk2(2, " ERROR: %i\n", rc);
a6c2ba28	300	return rc;
	301	}
	302
03910cc3 MCC	303	/* based on linux/sunrpc/svcauth.h and linux/hash.h
	304	* The original hash function returns a different value, if arch is x86_64
	305	* or i386.
	306	*/
	307	static inline unsigned long em28xx_hash_mem(char *buf, int length, int bits)
	308	{
	309	unsigned long hash = 0;
	310	unsigned long l = 0;
	311	int len = 0;
	312	unsigned char c;
	313	do {
	314	if (len == length) {
	315	c = (char)len;
	316	len = -1;
	317	} else
	318	c = *buf++;
	319	l = (l << 8) \| c;
	320	len++;
	321	if ((len & (32 / 8 - 1)) == 0)
	322	hash = ((hash^l) * 0x9e370001UL);
	323	} while (len);
	324
	325	return (hash >> (32 - bits)) & 0xffffffffUL;
	326	}
	327
3acf2809	328	static int em28xx_i2c_eeprom(struct em28xx dev, unsigned char eedata, int len)
a6c2ba28	329	{
a6c2ba28	330	unsigned char buf, *p = eedata;
3acf2809	331	struct em28xx_eeprom em_eeprom = (void )eedata;
a6c2ba28	332	int i, err, size = len, block;
	333
	334	dev->i2c_client.addr = 0xa0 >> 1;
596d92d5 MCC	335
	336	/* Check if board has eeprom */
	337	err = i2c_master_recv(&dev->i2c_client, &buf, 0);
	338	if (err < 0)
	339	return -1;
	340
a6c2ba28	341	buf = 0;
6ea54d93 DSL	342
	343	err = i2c_master_send(&dev->i2c_client, &buf, 1);
	344	if (err != 1) {
a6c2ba28	345	printk(KERN_INFO "%s: Huh, no eeprom present (err=%d)?\n",
	346	dev->name, err);
	347	return -1;
	348	}
	349	while (size > 0) {
	350	if (size > 16)
	351	block = 16;
	352	else
	353	block = size;
	354
	355	if (block !=
	356	(err = i2c_master_recv(&dev->i2c_client, p, block))) {
	357	printk(KERN_WARNING
	358	"%s: i2c eeprom read error (err=%d)\n",
	359	dev->name, err);
	360	return -1;
	361	}
	362	size -= block;
	363	p += block;
	364	}
	365	for (i = 0; i < len; i++) {
	366	if (0 == (i % 16))
	367	printk(KERN_INFO "%s: i2c eeprom %02x:", dev->name, i);
	368	printk(" %02x", eedata[i]);
	369	if (15 == (i % 16))
	370	printk("\n");
	371	}
	372
03910cc3 MCC	373	if (em_eeprom->id == 0x9567eb1a)
	374	dev->hash = em28xx_hash_mem(eedata, len, 32);
	375
	376	printk(KERN_INFO "EEPROM ID= 0x%08x, hash = 0x%08lx\n",
	377	em_eeprom->id, dev->hash);
a6c2ba28	378	printk(KERN_INFO "Vendor/Product ID= %04x:%04x\n", em_eeprom->vendor_ID,
	379	em_eeprom->product_ID);
	380
	381	switch (em_eeprom->chip_conf >> 4 & 0x3) {
	382	case 0:
	383	printk(KERN_INFO "No audio on board.\n");
	384	break;
	385	case 1:
	386	printk(KERN_INFO "AC97 audio (5 sample rates)\n");
	387	break;
	388	case 2:
	389	printk(KERN_INFO "I2S audio, sample rate=32k\n");
	390	break;
	391	case 3:
	392	printk(KERN_INFO "I2S audio, 3 sample rates\n");
	393	break;
	394	}
	395
	396	if (em_eeprom->chip_conf & 1 << 3)
	397	printk(KERN_INFO "USB Remote wakeup capable\n");
	398
	399	if (em_eeprom->chip_conf & 1 << 2)
	400	printk(KERN_INFO "USB Self power capable\n");
	401
	402	switch (em_eeprom->chip_conf & 0x3) {
	403	case 0:
	404	printk(KERN_INFO "500mA max power\n");
	405	break;
	406	case 1:
	407	printk(KERN_INFO "400mA max power\n");
	408	break;
	409	case 2:
	410	printk(KERN_INFO "300mA max power\n");
	411	break;
	412	case 3:
	413	printk(KERN_INFO "200mA max power\n");
	414	break;
	415	}
91cad0f2	416	printk(KERN_INFO "Table at 0x%02x, strings=0x%04x, 0x%04x, 0x%04x\n",
6ea54d93 DSL	417	em_eeprom->string_idx_table,
	418	em_eeprom->string1,
	419	em_eeprom->string2,
	420	em_eeprom->string3);
a6c2ba28	421
	422	return 0;
	423	}
	424
	425	/* ----------------------------------------------------------- */
	426
a6c2ba28	427	/*
	428	* functionality()
	429	*/
	430	static u32 functionality(struct i2c_adapter *adap)
	431	{
	432	return I2C_FUNC_SMBUS_EMUL;
	433	}
	434
a6c2ba28	435	/*
	436	* attach_inform()
	437	* gets called when a device attaches to the i2c bus
	438	* does some basic configuration
	439	*/
	440	static int attach_inform(struct i2c_client *client)
	441	{
3acf2809	442	struct em28xx *dev = client->adapter->algo_data;
a6c2ba28	443
a6c2ba28	444	switch (client->addr << 1) {
6ea54d93 DSL	445	case 0x86:
	446	case 0x84:
	447	case 0x96:
	448	case 0x94:
	449	{
	450	struct v4l2_priv_tun_config tda9887_cfg;
	451
	452	struct tuner_setup tun_setup;
	453
	454	tun_setup.mode_mask = T_ANALOG_TV \| T_RADIO;
	455	tun_setup.type = TUNER_TDA9887;
	456	tun_setup.addr = client->addr;
	457
	458	em28xx_i2c_call_clients(dev, TUNER_SET_TYPE_ADDR,
	459	&tun_setup);
	460
	461	tda9887_cfg.tuner = TUNER_TDA9887;
	462	tda9887_cfg.priv = &dev->tda9887_conf;
	463	em28xx_i2c_call_clients(dev, TUNER_SET_CONFIG,
	464	&tda9887_cfg);
	465	break;
	466	}
	467	case 0x42:
	468	dprintk1(1, "attach_inform: saa7114 detected.\n");
	469	break;
	470	case 0x4a:
	471	dprintk1(1, "attach_inform: saa7113 detected.\n");
	472	break;
	473	case 0xa0:
	474	dprintk1(1, "attach_inform: eeprom detected.\n");
	475	break;
	476	case 0x60:
	477	case 0x8e:
	478	{
	479	struct IR_i2c *ir = i2c_get_clientdata(client);
	480	dprintk1(1, "attach_inform: IR detected (%s).\n",
	481	ir->phys);
	482	em28xx_set_ir(dev, ir);
	483	break;
	484	}
	485	case 0x80:
	486	case 0x88:
	487	dprintk1(1, "attach_inform: msp34xx detected.\n");
	488	break;
	489	case 0xb8:
	490	case 0xba:
	491	dprintk1(1, "attach_inform: tvp5150 detected.\n");
	492	break;
	493
	494	default:
	495	if (!dev->tuner_addr)
	496	dev->tuner_addr = client->addr;
	497
	498	dprintk1(1, "attach inform: detected I2C address %x\n",
	499	client->addr << 1);
03910cc3	500
a6c2ba28	501	}
	502
	503	return 0;
	504	}
	505
3acf2809 MCC	506	static struct i2c_algorithm em28xx_algo = {
3acf2809 MCC	507	.master_xfer = em28xx_i2c_xfer,
a6c2ba28	508	.functionality = functionality,
	509	};
	510
3acf2809	511	static struct i2c_adapter em28xx_adap_template = {
a6c2ba28	512	.owner = THIS_MODULE,
a6c2ba28	513	.class = I2C_CLASS_TV_ANALOG,
3acf2809 MCC	514	.name = "em28xx",
	515	.id = I2C_HW_B_EM28XX,
	516	.algo = &em28xx_algo,
a6c2ba28	517	.client_register = attach_inform,
	518	};
	519
3acf2809 MCC	520	static struct i2c_client em28xx_client_template = {
3acf2809 MCC	521	.name = "em28xx internal",
a6c2ba28	522	};
	523
	524	/* ----------------------------------------------------------- */
	525
	526	/*
	527	* i2c_devs
	528	* incomplete list of known devices
	529	*/
	530	static char *i2c_devs[128] = {
	531	[0x4a >> 1] = "saa7113h",
	532	[0x60 >> 1] = "remote IR sensor",
da45a2a5	533	[0x8e >> 1] = "remote IR sensor",
a6c2ba28	534	[0x86 >> 1] = "tda9887",
	535	[0x80 >> 1] = "msp34xx",
	536	[0x88 >> 1] = "msp34xx",
	537	[0xa0 >> 1] = "eeprom",
	538	[0xb8 >> 1] = "tvp5150a",
	539	[0xba >> 1] = "tvp5150a",
	540	[0xc0 >> 1] = "tuner (analog)",
	541	[0xc2 >> 1] = "tuner (analog)",
	542	[0xc4 >> 1] = "tuner (analog)",
	543	[0xc6 >> 1] = "tuner (analog)",
	544	};
	545
	546	/*
	547	* do_i2c_scan()
	548	* check i2c address range for devices
	549	*/
fad7b958	550	void em28xx_do_i2c_scan(struct em28xx *dev)
a6c2ba28	551	{
fad7b958	552	u8 i2c_devicelist[128];
a6c2ba28	553	unsigned char buf;
	554	int i, rc;
	555
fad7b958 SS	556	memset(i2c_devicelist, 0, ARRAY_SIZE(i2c_devicelist));
fad7b958 SS	557
53c4e955	558	for (i = 0; i < ARRAY_SIZE(i2c_devs); i++) {
fad7b958 SS	559	dev->i2c_client.addr = i;
fad7b958 SS	560	rc = i2c_master_recv(&dev->i2c_client, &buf, 0);
a6c2ba28	561	if (rc < 0)
a6c2ba28	562	continue;
fad7b958 SS	563	i2c_devicelist[i] = i;
	564	printk(KERN_INFO "%s: found i2c device @ 0x%x [%s]\n",
	565	dev->name, i << 1, i2c_devs[i] ? i2c_devs[i] : "???");
a6c2ba28	566	}
fad7b958 SS	567
	568	dev->i2c_hash = em28xx_hash_mem(i2c_devicelist,
	569	ARRAY_SIZE(i2c_devicelist), 32);
a6c2ba28	570	}
	571
	572	/*
3acf2809	573	* em28xx_i2c_call_clients()
a6c2ba28	574	* send commands to all attached i2c devices
a6c2ba28	575	*/
3acf2809	576	void em28xx_i2c_call_clients(struct em28xx dev, unsigned int cmd, void arg)
a6c2ba28	577	{
	578	BUG_ON(NULL == dev->i2c_adap.algo_data);
	579	i2c_clients_command(&dev->i2c_adap, cmd, arg);
	580	}
	581
	582	/*
3acf2809	583	* em28xx_i2c_register()
a6c2ba28	584	* register i2c bus
a6c2ba28	585	*/
3acf2809	586	int em28xx_i2c_register(struct em28xx *dev)
a6c2ba28	587	{
3acf2809 MCC	588	BUG_ON(!dev->em28xx_write_regs \|\| !dev->em28xx_read_reg);
	589	BUG_ON(!dev->em28xx_write_regs_req \|\| !dev->em28xx_read_reg_req);
	590	dev->i2c_adap = em28xx_adap_template;
a6c2ba28	591	dev->i2c_adap.dev.parent = &dev->udev->dev;
	592	strcpy(dev->i2c_adap.name, dev->name);
	593	dev->i2c_adap.algo_data = dev;
	594	i2c_add_adapter(&dev->i2c_adap);
	595
3acf2809	596	dev->i2c_client = em28xx_client_template;
a6c2ba28	597	dev->i2c_client.adapter = &dev->i2c_adap;
a6c2ba28	598
3acf2809	599	em28xx_i2c_eeprom(dev, dev->eedata, sizeof(dev->eedata));
a6c2ba28	600
a6c2ba28	601	if (i2c_scan)
fad7b958	602	em28xx_do_i2c_scan(dev);
a6c2ba28	603	return 0;
	604	}
	605
	606	/*
3acf2809	607	* em28xx_i2c_unregister()
a6c2ba28	608	* unregister i2c_bus
a6c2ba28	609	*/
3acf2809	610	int em28xx_i2c_unregister(struct em28xx *dev)
a6c2ba28	611	{
	612	i2c_del_adapter(&dev->i2c_adap);
	613	return 0;
	614	}