bt819-new.c

这是一个Linux下的USB摄像头捕捉程序

/*
    bt819 - BT819A VideoStream Decoder (Rockwell Part)

    Copyright (C) 1999 Mike Bernson <[e-mail]>
    Copyright (C) 1998 Dave Perks <[e-mail]>

    Modifications for LML33/DC10plus unified driver
    Copyright (C) 2000 Serguei Miridonov <[e-mail]>
    
    This code was modify/ported from the saa7111 driver written
    by Dave Perks.

    Conversion to the new i2c driver by Joerg Heckenbach

    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/init.h>
#include <linux/delay.h>
#include <linux/errno.h>
#include <linux/fs.h>
#include <linux/kernel.h>
#include <linux/slab.h>
#include <linux/mm.h>
#include <linux/pci.h>
#include <linux/signal.h>
#include <linux/sched.h>
#include <linux/i2c.h>
#include <linux/types.h>
#include <linux/videodev.h>
#include <linux/video_decoder.h>

#define DEBUG(x)       x	/* Debug driver */

/* Addresses to scan */
#define I2C_BT819     	0x8A
#define I2C_DELAY   	10

static unsigned short normal_i2c[] = {
	I2C_BT819 >> 1,
	I2C_CLIENT_END
};

static unsigned short normal_i2c_range[] 	= { I2C_CLIENT_END };
static unsigned short probe[2] 			= { I2C_CLIENT_END, I2C_CLIENT_END };
static unsigned short probe_range[2] 		= { I2C_CLIENT_END, I2C_CLIENT_END };
static unsigned short ignore[2] 		= { I2C_CLIENT_END, I2C_CLIENT_END };
static unsigned short ignore_range[2] 		= { I2C_CLIENT_END, I2C_CLIENT_END };
static unsigned short force[2] 			= { I2C_CLIENT_END, I2C_CLIENT_END };
static struct i2c_client_address_data addr_data = {
	normal_i2c, normal_i2c_range,
	probe, probe_range,
	ignore, ignore_range,
	force
};

static struct i2c_driver bt819_driver;
static struct i2c_client client_template;


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

struct bt819 {
	unsigned char reg[32];

	int initialized;
	int norm;
	int input;
	int enable;
	int bright;
	int contrast;
	int hue;
	int sat;
};

struct timing {
	int hactive;
	int hdelay;
	int vactive;
	int vdelay;
	int hscale;
	int vscale;
};

struct timing timing_data[] = {
	{864 - 24, 2, 623, 1, 0x0504, 0x0000},
	{858 - 24, 2, 523, 1, 0x00f8, 0x0000},
};



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

static int bt819_write(struct i2c_client *client, unsigned char subaddr,
		       unsigned char data)
{
	unsigned char buffer[2];
	struct bt819 *decoder = client->data;

	buffer[0] = subaddr;
	buffer[1] = data;
	if (2 != i2c_master_send(client, buffer, 2)) {
		printk(KERN_WARNING
		       "bt819: I/O error, trying (write %d 0x%x)\n",
		       subaddr, data);
		return -1;
	}
	decoder->reg[subaddr] = data;
	return 0;
}

static int bt819_setbit(struct i2c_client *client, int subaddr, int bit, int data)
{
	struct bt819 *decoder = client->data;

	return bt819_write(client, subaddr, (decoder->reg[subaddr] & ~(1 << bit)) | (data ? (1 << bit) : 0));
}

static int bt819_write_block(struct i2c_client *client, unsigned const char *data,
			     unsigned int len)
{
	unsigned int idx;
	struct bt819 *decoder = client->data;

	if (len != (unsigned int)i2c_master_send(client, data, len)) {
		printk(KERN_WARNING "bt819: I/O error, trying write\n");
		return -1;
	}
	for (idx = 0; idx < len; idx += 2) {
		decoder->reg[data[idx]] = data[idx+1];
	}
	return 0;
}

static int bt819_read(struct i2c_client *client, unsigned char subaddr)
{
	unsigned char buffer;

	if (1 != i2c_master_send(client, &subaddr, 1)) {
		printk(KERN_WARNING
		       "bt819: I/O error, trying (write %d)\n", subaddr);
		return -1;
	}
	if (1 != i2c_master_recv(client, &buffer, 1)) {
		printk(KERN_WARNING "bt819: I/O error, trying (read)\n");
		return -1;
	}
	printk(KERN_WARNING "bt819_read 0x%02X\n", buffer);
	return buffer;
}

static int bt819_init(struct i2c_client *client)
{
	struct bt819 *decoder;

	static unsigned char init[] = {
		//0x1f, 0x00,     /* Reset */
		0x01, 0x59,	/* 0x01 input format */
		0x02, 0x00,	/* 0x02 temporal decimation */
		0x03, 0x12,	/* 0x03 Cropping msb */
		0x04, 0x16,	/* 0x04 Vertical Delay, lsb */
		0x05, 0xe0,	/* 0x05 Vertical Active lsb */
		0x06, 0x80,	/* 0x06 Horizontal Delay lsb */
		0x07, 0xd0,	/* 0x07 Horizontal Active lsb */
		0x08, 0x00,	/* 0x08 Horizontal Scaling msb */
		0x09, 0xf8,	/* 0x09 Horizontal Scaling lsb */
		0x0a, 0x00,	/* 0x0a Brightness control */
		0x0b, 0x30,	/* 0x0b Miscellaneous control */
		0x0c, 0xd8,	/* 0x0c Luma Gain lsb */
		0x0d, 0xfe,	/* 0x0d Chroma Gain (U) lsb */
		0x0e, 0xb4,	/* 0x0e Chroma Gain (V) msb */
		0x0f, 0x00,	/* 0x0f Hue control */
		0x12, 0x04,	/* 0x12 Output Format */
		0x13, 0x20,	/* 0x13 Vertial Scaling msb 0x60, */
		0x14, 0x00,	/* 0x14 Vertial Scaling lsb */
		0x16, 0x04,	/* 0x16 Video Timing Polarity 0x02, */
		0x18, 0x68,	/* 0x18 AGC Delay */
		0x19, 0x5d,	/* 0x19 Burst Gate Delay */
		0x1a, 0x80,	/* 0x1a ADC Interface */
	};

	struct timing *timing;

	DEBUG(printk(KERN_INFO "%s: init\n", client->name));

	decoder = client->data;
	timing = &timing_data[decoder->norm];

	init[3 * 2 - 1] = (((timing->vdelay >> 8) & 0x03) << 6) |
	    (((timing->vactive >> 8) & 0x03) << 4) |
	    (((timing->hdelay >> 8) & 0x03) << 2) |
	    ((timing->hactive >> 8) & 0x03);
	init[4 * 2 - 1] = timing->vdelay & 0xff;
	init[5 * 2 - 1] = timing->vactive & 0xff;
	init[6 * 2 - 1] = timing->hdelay & 0xff;
	init[7 * 2 - 1] = timing->hactive & 0xff;
	init[8 * 2 - 1] = timing->hscale >> 8;
	init[9 * 2 - 1] = timing->hscale & 0xff;

	bt819_write(client, 0x1f, 0x00);
	mdelay(1);
	return bt819_write_block(client, init, sizeof(init));

}

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

static int bt819_attach(struct i2c_adapter *adap, int addr,
			  unsigned short flags, int kind)
{
	int i;
	struct bt819 *decoder;
	struct i2c_client *client;

#if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,0)
	MOD_INC_USE_COUNT;
#endif
	DEBUG(printk(KERN_INFO "bt819: attach\n"));

	client = kmalloc(sizeof *client, GFP_KERNEL);
	if (!client) {
#if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,0)
		MOD_DEC_USE_COUNT;
#endif
		return -ENOMEM;
	}
	memcpy(client, &client_template, sizeof(struct i2c_client));
	client->adapter = adap;
	client->addr = addr;
	strcpy(client->name, "bt819");

	client->data = decoder = kmalloc(sizeof(struct bt819), GFP_KERNEL);
	if (decoder == NULL) {
		kfree(client);
		MOD_DEC_USE_COUNT;
		return -ENOMEM;
	}

	memset(decoder, 0, sizeof(struct bt819));
	decoder->norm = VIDEO_MODE_NTSC;
	decoder->input = 0;
	decoder->enable = 1;
	decoder->bright = 32768;
	decoder->contrast = 32768;
	decoder->hue = 32768;
	decoder->sat = 32768;
	decoder->initialized = 0;

	i = bt819_init(client);
	if (i < 0) {
		printk(KERN_ERR "%s: bt819_attach: init status %d\n",
		       client->name, i);
	} else {
		printk(KERN_INFO "%s: bt819_attach: chip version %x\n",
		       client->name, bt819_read(client, 0x17) & 0x0f);
	}
	return 0;
}

static int bt819_probe(struct i2c_adapter *adap)
{
	int ret;

	ret = i2c_probe(adap, &addr_data, bt819_attach);
	DEBUG(printk(KERN_INFO "bt819: i2c_probe=%d\n", ret));
	return ret;
}

static int bt819_detach(struct i2c_client *client)
{
	struct bt819 *decoder = client->data;

	i2c_detach_client(client);

	kfree(decoder);
	kfree(client);
#if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,0)
	MOD_DEC_USE_COUNT;
#endif
	return 0;
}

static int bt819_command(struct i2c_client *client, unsigned int cmd, void *arg)
{
	int temp;
	struct bt819 *decoder = client->data;

	if (!decoder->initialized) {	// First call to bt819_init could be
		bt819_init(client);	// without #FRST = 0
		decoder->initialized = 1;
	}

	switch (cmd) {

	case DECODER_GET_CAPABILITIES:
		{
			struct video_decoder_capability *cap = arg;

			cap->flags
			    = VIDEO_DECODER_PAL
			    | VIDEO_DECODER_NTSC | VIDEO_DECODER_CCIR;
			cap->inputs = 8;
			cap->outputs = 1;
		}
		break;

	case DECODER_GET_STATUS:
		{
			int *iarg = arg;
			int status;
			int res;

			status = bt819_read(client, 0x00);
			res = 0;
			if ((status & 0x80)) {
				res |= DECODER_STATUS_GOOD;
			}
			switch (decoder->norm) {
			case VIDEO_MODE_NTSC:
				res |= DECODER_STATUS_NTSC;
				break;
			case VIDEO_MODE_PAL:
				res |= DECODER_STATUS_PAL;
				break;
			default:
			case VIDEO_MODE_AUTO:
				if ((status & 0x10)) {
					res |= DECODER_STATUS_PAL;
				} else {
					res |= DECODER_STATUS_NTSC;
				}
				break;
			}
			res |= DECODER_STATUS_COLOR;
			*iarg = res;

			DEBUG(printk(KERN_INFO "%s-bt819: get status %x\n",
				     client->name, *iarg));
		}
		break;

	case DECODER_SET_NORM:
		{
			int *iarg = arg;
			struct timing *timing;

			DEBUG(printk(KERN_INFO "%s-bt819: set norm %x\n",
				     client->name, *iarg));

			if (*iarg == VIDEO_MODE_NTSC) {
				bt819_setbit(client, 0x01, 0, 1);
				bt819_setbit(client, 0x01, 1, 0);
				bt819_write(client, 0x18, 0x68);
				bt819_write(client, 0x19, 0x5d);
				//bt819_setbit(client, 0x1a,  5, 1);
				timing = &timing_data[VIDEO_MODE_NTSC];
			} else {
				bt819_setbit(client, 0x01, 0, 1);
				bt819_setbit(client, 0x01, 1, 1);
				bt819_write(client, 0x18, 0x7f);
				bt819_write(client, 0x19, 0x72);
				//bt819_setbit(client, 0x1a,  5, 0);
				timing = &timing_data[VIDEO_MODE_PAL];
			}

			bt819_write(client, 0x03,
				    (((timing->vdelay >> 8) & 0x03) << 6) |
				    (((timing->
				       vactive >> 8) & 0x03) << 4) |
				    (((timing->
				       hdelay >> 8) & 0x03) << 2) |
				    ((timing->hactive >> 8) & 0x03));
			bt819_write(client, 0x04, timing->vdelay & 0xff);
			bt819_write(client, 0x05, timing->vactive & 0xff);
			bt819_write(client, 0x06, timing->hdelay & 0xff);
			bt819_write(client, 0x07, timing->hactive & 0xff);
			bt819_write(client, 0x08, timing->hscale >> 8);
			bt819_write(client, 0x09, timing->hscale & 0xff);
			decoder->norm = *iarg;
		}
		break;

	case DECODER_SET_INPUT:
		{
			int *iarg = arg;

			DEBUG(printk(KERN_INFO "%s-bt819: set input %x\n",
				     client->name, *iarg));

			if (*iarg < 0 || *iarg > 7) {
				return -EINVAL;
			}

			if (decoder->input != *iarg) {
				decoder->input = *iarg;
				/* select mode */
				if (decoder->input == 0) {
					bt819_setbit(client, 0x0b, 6, 0);
					bt819_setbit(client, 0x1a, 1, 1);
				} else {
					bt819_setbit(client, 0x0b, 6, 1);
					bt819_setbit(client, 0x1a, 1, 0);
				}
			}
		}
		break;

	case DECODER_SET_OUTPUT:
		{
			int *iarg = arg;

			DEBUG(printk(KERN_INFO "%s-bt819: set output %x\n",
				     client->name, *iarg));

			/* not much choice of outputs */
			if (*iarg != 0) {
				return -EINVAL;
			}
		}
		break;

	case DECODER_ENABLE_OUTPUT:
		{
			int *iarg = arg;
			int enable = (*iarg != 0);

			DEBUG(printk
			      (KERN_INFO "%s-bt819: enable output %x\n",
			       client->name, *iarg));

			if (decoder->enable != enable) {
				decoder->enable = enable;

				if (decoder->enable) {
					bt819_setbit(client, 0x16, 7, 0);
				} else {
					bt819_setbit(client, 0x16, 7, 1);
				}
			}
		}
		break;

	case DECODER_SET_PICTURE:
		{
			struct video_picture *pic = arg;

			DEBUG(printk
			      (KERN_INFO
			       "%s-bt819: set picture brightness %d contrast %d colour %d\n",
			       client->name, pic->brightness,
			       pic->contrast, pic->colour));


			if (decoder->bright != pic->brightness) {
				/* We want -128 to 127 we get 0-65535 */
				decoder->bright = pic->brightness;
				bt819_write(client, 0x0a,
					    (decoder->bright >> 8) - 128);
			}

			if (decoder->contrast != pic->contrast) {
				/* We want 0 to 511 we get 0-65535 */
				decoder->contrast = pic->contrast;
				bt819_write(client, 0x0c,
					    (decoder->
					     contrast >> 7) & 0xff);
				bt819_setbit(client, 0x0b, 2,
					     ((decoder->
					       contrast >> 15) & 0x01));
			}

			if (decoder->sat != pic->colour) {
				/* We want 0 to 511 we get 0-65535 */
				decoder->sat = pic->colour;
				bt819_write(client, 0x0d,
					    (decoder->sat >> 7) & 0xff);
				bt819_setbit(client, 0x0b, 1,
					     ((decoder->
					       sat >> 15) & 0x01));

				temp = (decoder->sat * 201) / 237;
				bt819_write(client, 0x0e,
					    (temp >> 7) & 0xff);
				bt819_setbit(client, 0x0b, 0,
					     (temp >> 15) & 0x01);
			}

			if (decoder->hue != pic->hue) {
				/* We want -128 to 127 we get 0-65535 */
				decoder->hue = pic->hue;
				bt819_write(client, 0x0f,
					    128 - (decoder->hue >> 8));
			}
		}
		break;

	default:
		return -EINVAL;
	}

	return 0;
}

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

static struct i2c_driver bt819_driver = {
#if LINUX_VERSION_CODE > KERNEL_VERSION(2,4,27)
	.owner          = THIS_MODULE,
#endif
	.name           = "i2c bt819 driver",
	.id             = I2C_DRIVERID_BT819,
	.flags          = I2C_DF_NOTIFY,
	.attach_adapter = bt819_probe,
	.detach_client  = bt819_detach,
	.command        = bt819_command
};

static struct i2c_client client_template = {
	.name			= "(unset)",
	.id			= -1,
	.flags			= 0,
	.addr			= 0,
	.adapter		= NULL,
	.driver			= &bt819_driver
};

EXPORT_NO_SYMBOLS;

#ifdef MODULE
int init_module(void)
#else
int bt819_init(void)
#endif
{
	i2c_add_driver(&driver);
	return 0;
}


#ifdef MODULE
void cleanup_module(void)
{
	i2c_del_driver(&driver);
}
#endif

MODULE_LICENSE("GPL");

//module_init(bt819_setup);
//module_exit(bt819_exit);