[linux-dvb] [PATCH] Twinhan

Manu Abraham manu at kromtek.com
Sun Feb 20 17:06:57 CET 2005


Hi,

Attached is a set of patches for Twinhan DVB cards.. If somebody can 
test the patches out, and give a feedback that would be quite nice.

The features/changes that have gone in are like this,

17-Feb-05-Twinhan-1.diff
~~~~~~~~~~~~~~~
* The delays were corrected, and unnecessary delays were removed.
* Proper RESET was added.
* The PIO (wrongly known as GPIO) were overhauled.
* The function naming was changed according to their functionality.
* Whitespace cleanups
* Changed the read sequence, (removed PIO contention)
* Removed some unnecessary variables.
* Revamped the DST initialization/device identification function
* Revamped DST Types list to be more readable

* Added basic CI support
Tested with Irdeto 1, 2 for decryption
DragonCAM and Viaccess Red, CAM communication works,
decryption not tested.
TPS and Viaccess still undergoing work.


17-Feb-05-Twinhan-Diseqc-2.diff
~~~~~~~~~~~~~~~
* Added FE_DISEQC_SEND_BURST
* Corrected a bug in the 22k TONE control

17-Feb-05-Twinhan-bttv-3.diff
~~~~~~~~~~~~~~~
* Cosmetic patch, that confused people that all Twinhan cards were DVB-T 
cards

(This patch is for bttv)


Manu
-------------- next part --------------
A non-text attachment was scrubbed...
Name: 17-Feb-05-Twinhan-1.diff
Type: text/x-patch
Size: 48612 bytes
Desc: not available
Url : http://www.linuxtv.org/pipermail/linux-dvb/attachments/20050220/763afc47/17-Feb-05-Twinhan-1.bin
-------------- next part --------------
A non-text attachment was scrubbed...
Name: 17-Feb-05-Twinhan-Diseqc-2.diff
Type: text/x-patch
Size: 1970 bytes
Desc: not available
Url : http://www.linuxtv.org/pipermail/linux-dvb/attachments/20050220/763afc47/17-Feb-05-Twinhan-Diseqc-2.bin
-------------- next part --------------
A non-text attachment was scrubbed...
Name: 17-Feb-05-Twinhan-bttv-3.diff
Type: text/x-patch
Size: 676 bytes
Desc: not available
Url : http://www.linuxtv.org/pipermail/linux-dvb/attachments/20050220/763afc47/17-Feb-05-Twinhan-bttv-3.bin
-------------- next part --------------
/*
	CA-driver for TwinHan DST Frontend/Card

	Copyright (C) 2004, 2005 Manu Abraham (manu at kromtek.com)

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

#include <linux/dvb/ca.h>
#include "dvbdev.h"
#include "dvb_frontend.h"

#include "dst_ca.h"
#include "dst_common.h"

static unsigned int dst_ca_verbose = 0;
module_param(dst_ca_verbose, int, 0644);
MODULE_PARM_DESC(dst_ca_verbose, "verbose startup messages, default is 1 (yes)");

static unsigned int dst_ca_debug = 0;
module_param(dst_ca_debug, int, 0644);
MODULE_PARM_DESC(dst_ca_debug, "debug messages, default is 0 (no)");

static unsigned int session = 0;
module_param(session, int, 0644);
MODULE_PARM_DESC(session, "Support for hardware that has multiple sessions, default 0");

static unsigned int new_ca = 0;
module_param(new_ca, int, 0644);
MODULE_PARM_DESC(new_ca, "Support for the new CA interface firmware, default 0");

#define dprintk if (dst_ca_debug) printk


/*		Module functions		*/
static int dst_ca_open(struct inode *inode, struct file *file);
static int dst_ca_release(struct inode *inode, struct file *file);
static int dst_ca_read(struct file *file, char __user * buffer, size_t length, loff_t * offset);
static int dst_ca_write(struct file *file, const char __user * buffer, size_t length, loff_t * offset);
static int dst_ca_ioctl(struct inode *inode, struct file *file, unsigned int cmd, void *arg);

/*		DVB API style implementation	*/
static int ca_send_message(struct dst_state *state, struct ca_msg *p_ca_message, void *arg);
static int ca_get_slot_descr(struct dst_state *state, struct ca_msg *p_ca_message, void *arg);
static int ca_get_slot_info(struct dst_state *state, struct ca_slot_info *p_ca_slot_info, void *arg);
static int ca_get_message(struct dst_state *state, struct ca_msg *p_ca_message, void *arg);
static int ca_get_slot_caps(struct dst_state *state, struct ca_caps *p_ca_caps, void *arg);
static int ca_set_pid(void);
static int ca_set_slot_descr(void);

/*		Device specific functions	*/
static int ca_set_pmt(struct dst_state *state, struct ca_msg *p_ca_message, struct ca_msg *hw_buffer, u8 reply, u8 query);
static int dst_check_ca_pmt(struct dst_state *state, struct ca_msg *p_ca_message, struct ca_msg *hw_buffer);
static int ca_get_app_info(struct dst_state *state);


/*		Helper functions		*/
static int dst_put_ci(struct dst_state *state, u8 *data, int len, u8 *ca_string, int read);
static int put_checksum(u8 *check_string, int length);
static int handle_en50221_tag(struct ca_msg *p_ca_message, struct ca_msg *hw_buffer);
static int write_to_8820(struct dst_state *state, struct ca_msg *hw_buffer, u8 reply);
static int debug_8820_buffer(struct ca_msg *hw_buffer);


static struct file_operations dst_ca_fops = {
	.owner = THIS_MODULE,
	.ioctl = (void *)dst_ca_ioctl,
	.open = dst_ca_open,
	.release = dst_ca_release,
	.read = dst_ca_read,
	.write = dst_ca_write
};


static struct dvb_device dvbdev_ca = {
	.priv = NULL,
	.users = 1,
	.readers = 1,
	.writers = 1,
	.fops = &dst_ca_fops
};


static int dst_ca_ioctl(struct inode *inode, struct file *file, unsigned int cmd, void *arg)
{
	struct dvb_device* dvbdev = (struct dvb_device*) file->private_data;
	struct dst_state* state = (struct dst_state*) dvbdev->priv;
	struct ca_slot_info *p_ca_slot_info;
	struct ca_caps *p_ca_caps;
	struct ca_msg *p_ca_message;

	if ((p_ca_message = (struct ca_msg *) kmalloc(sizeof (struct ca_msg), GFP_KERNEL)) == NULL) {
		printk("%s: Memory allocation failure\n", __FUNCTION__);
		return -ENOMEM;
	}

	if ((p_ca_slot_info = (struct ca_slot_info *) kmalloc(sizeof (struct ca_slot_info), GFP_KERNEL)) == NULL) {
		printk("%s: Memory allocation failure\n", __FUNCTION__);
		return -ENOMEM;
	}

	if ((p_ca_caps = (struct ca_caps *) kmalloc(sizeof (struct ca_caps), GFP_KERNEL)) == NULL) {
		printk("%s: Memory allocation failure\n", __FUNCTION__);
		return -ENOMEM;
	}

	/*	We have now only the standard ioctl's, the driver is upposed to handle internals.	*/
	switch (cmd) {
		case CA_GET_MSG:
			if (dst_ca_verbose)
				dprintk("%s: Getting message\n", __FUNCTION__);
			if ((ca_get_message(state, p_ca_message, arg)) < 0) {
				dprintk("%s: -->CA_GET_MSG Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_GET_MSG Success !\n", __FUNCTION__);

			break;

		case CA_SEND_MSG:
			if (dst_ca_verbose)
				dprintk("%s: Sending message\n", __FUNCTION__);
			if ((ca_send_message(state, p_ca_message, arg)) < 0) {
				dprintk("%s: -->CA_SEND_MSG Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_SEND_MSG Success !\n", __FUNCTION__);

			break;

		case CA_RESET:
			if (dst_ca_verbose)
				dprintk("%s: Resetting DST\n", __FUNCTION__);
			rdc_8820_reset(state);

			break;

		case CA_GET_SLOT_INFO:
			if (dst_ca_verbose)
				dprintk("%s: Getting Slot info\n", __FUNCTION__);
			if ((ca_get_slot_info(state, p_ca_slot_info, arg)) < 0) {
				dprintk("%s: -->CA_GET_SLOT_INFO Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_GET_SLOT_INFO Success !\n", __FUNCTION__);

			break;

		case CA_GET_CAP:
			if (dst_ca_verbose)
				dprintk("%s: Getting Slot capabilities\n", __FUNCTION__);
			if ((ca_get_slot_caps(state, p_ca_caps, arg)) < 0) {
				dprintk("%s: -->CA_GET_CAP Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_GET_CAP Success !\n", __FUNCTION__);

			break;

		case CA_GET_DESCR_INFO:
			if (dst_ca_verbose)
				dprintk("%s: Getting descrambler description\n", __FUNCTION__);
			if ((ca_get_slot_descr(state, p_ca_message, arg)) < 0) {
				dprintk("%s: -->CA_GET_DESCR_INFO Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_GET_DESCR_INFO Success !\n", __FUNCTION__);

			break;

		case CA_SET_DESCR:
			if (dst_ca_verbose)
				dprintk("%s: Setting descrambler\n", __FUNCTION__);
			if ((ca_set_slot_descr()) < 0) {
				dprintk("%s: -->CA_SET_DESCR Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_SET_DESCR Success !\n", __FUNCTION__);

			break;

		case CA_SET_PID:
			if (dst_ca_verbose)
				dprintk("%s: Setting PID\n", __FUNCTION__);
			if ((ca_set_pid()) < 0) {
				dprintk("%s: -->CA_SET_PID Failed !\n", __FUNCTION__);
				return -1;
			}
			dprintk("%s: -->CA_SET_PID Success !\n", __FUNCTION__);

		default:
			return -EOPNOTSUPP;
		};

	return 0;
}


static int ca_set_slot_descr(void)
{
	/*	We could make this more graceful ?	*/
	return -EOPNOTSUPP;
}

static int ca_set_pid(void)
{
	/*	We could make this more graceful ?	*/
	return -EOPNOTSUPP;
}

static int ca_get_app_info(struct dst_state *state)
{
	static u8 command[8] = {0x07, 0x40, 0x01, 0x00, 0x01, 0x00, 0x00, 0xff};
	u8 ca_string[128];
	u16 app_type, app_vendor, vendor_code;
	u8 app_info[128];

	put_checksum(&command[0], command[0]);
	if ((dst_put_ci(state, command, sizeof(command), ca_string, GET_REPLY)) < 0) {
		dprintk("%s: -->dst_put_ci FAILED !\n", __FUNCTION__);
		return -1;
	}
	dprintk("%s: -->dst_put_ci SUCCESS !\n", __FUNCTION__);

	app_type = ca_string[7];
	app_vendor = (ca_string[8] << 8) | ca_string[9];
	vendor_code = (ca_string[10] << 8) | ca_string[11];
	strcpy(app_info, ((char *)(&ca_string[12])));
	dprintk("%s: ================================ CI Module Application Info ======================================\n", __FUNCTION__);
	dprintk("%s: Application Type=[%d], Application Vendor=[%d], Vendor Code=[%d]\n%s: Application info=[%s]\n", __FUNCTION__, app_type, app_vendor, vendor_code, __FUNCTION__, app_info);
	dprintk("%s: ==================================================================================================\n", __FUNCTION__);

	return 0;
}

static int ca_get_slot_caps(struct dst_state *state, struct ca_caps *p_ca_caps, void *arg)
{
	int i;
	u8 slot_cap[256];
	static u8 slot_command[8] = {0x07, 0x40, 0x02, 0x00, 0x02, 0x00, 0x00, 0xff};

	put_checksum(&slot_command[0], slot_command[0]);
	if ((dst_put_ci(state, slot_command, sizeof (slot_command), slot_cap, GET_REPLY)) < 0) {
		dprintk("%s: -->dst_put_ci FAILED !\n", __FUNCTION__);
		return -1;
	}
	dprintk("%s: -->dst_put_ci SUCCESS !\n", __FUNCTION__);

	/*	Will implement the rest soon		*/

	dprintk("%s: Slot cap = [%d]\n", __FUNCTION__, slot_cap[7]);
	dprintk("===================================\n");
	for (i = 0; i < 8; i++)
		dprintk(" %d", slot_cap[i]);
	dprintk("\n");

	p_ca_caps->slot_num = 1;
	p_ca_caps->slot_type = 1;
	p_ca_caps->descr_num = slot_cap[7];
	p_ca_caps->descr_type = 1;


	if (copy_to_user((struct ca_caps *)arg, p_ca_caps, sizeof (struct ca_caps))) {
		return -EFAULT;
	}

	return 0;
}


static int ca_get_slot_descr(struct dst_state *state, struct ca_msg *p_ca_message, void *arg)
{
	return -EOPNOTSUPP;
}


static int ca_get_slot_info(struct dst_state *state, struct ca_slot_info *p_ca_slot_info, void *arg)
{
	int i;
	static u8 slot_command[8] = {0x00, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff};

	u8 *slot_info = state->rxbuffer;

	put_checksum(&slot_command[0], 7);
	if ((dst_put_ci(state, slot_command, sizeof (slot_command), slot_info, GET_REPLY)) < 0) {
		dprintk("%s: -->dst_put_ci FAILED !\n", __FUNCTION__);
		return -1;
	}
	dprintk("%s: -->dst_put_ci SUCCESS !\n", __FUNCTION__);

	/*	Will implement the rest soon		*/

	dprintk("%s: Slot info = [%d]\n", __FUNCTION__, slot_info[3]);
	dprintk("===================================\n");
	for (i = 0; i < 8; i++)
		dprintk(" %d", slot_info[i]);
	dprintk("\n");

	if (slot_info[4] & 0x80) {
		p_ca_slot_info->flags = CA_CI_MODULE_PRESENT;
		p_ca_slot_info->num = 1;
		p_ca_slot_info->type = CA_CI;
	}
	else if (slot_info[4] & 0x40) {
		p_ca_slot_info->flags = CA_CI_MODULE_READY;
		p_ca_slot_info->num = 1;
		p_ca_slot_info->type = CA_CI;
	}
	else {
		p_ca_slot_info->flags = 0;
	}

	if (copy_to_user((struct ca_slot_info *)arg, p_ca_slot_info, sizeof (struct ca_slot_info))) {
		return -EFAULT;
	}

	return 0;
}


static int put_checksum(u8 *check_string, int length)
{
	u8 i = 0, checksum = 0;

	dprintk("%s: ========================= Checksum calculation ===========================\n", __FUNCTION__);
	dprintk("%s: String Length=[0x%02x]\n", __FUNCTION__, length);

	dprintk("%s: String=[", __FUNCTION__);
	while (i < length) {
		dprintk(" %02x", check_string[i]);
		checksum += check_string[i];
		i++;
	}
	dprintk(" ]\n");
	dprintk("%s: Sum=[%02x]\n", __FUNCTION__, checksum);
	check_string[length] = ~checksum + 1;
	dprintk("%s: Checksum=[%02x]\n", __FUNCTION__, check_string[length]);
	dprintk("%s: ==========================================================================\n", __FUNCTION__);

	return 0;
}


static int ca_get_message(struct dst_state *state, struct ca_msg *p_ca_message, void *arg)
{
	/*	CA Get should not be harder than this	*/
	if (copy_to_user((void *)arg, p_ca_message, sizeof (struct ca_msg))) {
		return -EFAULT;
	}

	return 0;
}

static int ca_send_message(struct dst_state *state, struct ca_msg *p_ca_message, void *arg)
{
	int i = 0;
	unsigned int ca_message_header_len;

	u32 command = 0;
	struct ca_msg *hw_buffer;

	if ((hw_buffer = (struct ca_msg *) kmalloc(sizeof (struct ca_msg), GFP_KERNEL)) == NULL) {
		printk("%s: Memory allocation failure\n", __FUNCTION__);
		return -ENOMEM;
	}

	dprintk("%s\n", __FUNCTION__);

	if (copy_from_user(p_ca_message, (void *)arg, sizeof (struct ca_msg)))
		return -EFAULT;

	if (p_ca_message->msg) {
		ca_message_header_len = p_ca_message->length;	/*	Restore it back when you are done	*/
		/*	EN50221 tag	*/
		command = 0;

		for (i = 0; i < 3; i++) {
			command = command | p_ca_message->msg[i];
			if (i < 2)
				command = command << 8;
		}
		dprintk("%s:Command=[0x%x]\n", __FUNCTION__, command);

		switch (command) {
			case CA_PMT:
				dprintk("Command = SEND_CA_PMT\n");
				if ((ca_set_pmt(state, p_ca_message, hw_buffer, 0, 0)) < 0) {
					dprintk("%s: -->CA_PMT Failed !\n", __FUNCTION__);
					return -1;
				}
				dprintk("%s: -->CA_PMT Success !\n", __FUNCTION__);
//				retval = dummy_set_pmt(state, p_ca_message, hw_buffer, 0, 0);

				break;

			case CA_PMT_REPLY:
				dprintk("Command = CA_PMT_REPLY\n");
				/*      Have to handle the 2 basic types of cards here  */
				if ((dst_check_ca_pmt(state, p_ca_message, hw_buffer)) < 0) {
					dprintk("%s: -->CA_PMT_REPLY Failed !\n", __FUNCTION__);
					return -1;
				}
				dprintk("%s: -->CA_PMT_REPLY Success !\n", __FUNCTION__);

				/*      Certain boards do behave different ?            */
//				retval = ca_set_pmt(state, p_ca_message, hw_buffer, 1, 1);

			case CA_APP_INFO_ENQUIRY:		// only for debugging
				if (dst_ca_verbose)
					dprintk("%s: Getting Cam Application information\n", __FUNCTION__);

				if ((ca_get_app_info(state)) < 0) {
					dprintk("%s: -->CA_APP_INFO_ENQUIRY Failed !\n", __FUNCTION__);
					return -1;
				}
				dprintk("%s: -->CA_APP_INFO_ENQUIRY Success !\n", __FUNCTION__);

				break;
		}
	}
	return 0;
}

/*	Board supports CA PMT reply ?		*/
static int dst_check_ca_pmt(struct dst_state *state, struct ca_msg *p_ca_message, struct ca_msg *hw_buffer)
{
	int ca_pmt_reply_test = 0;

	/*	Do test board			*/
	/*	Not there yet but soon		*/


	/*	CA PMT Reply capable		*/
	if (ca_pmt_reply_test) {
		if ((ca_set_pmt(state, p_ca_message, hw_buffer, 1, GET_REPLY)) < 0) {
			dprintk("%s: ca_set_pmt.. failed !\n", __FUNCTION__);
			return -1;
		}

	/*	Process CA PMT Reply		*/
	/*	will implement soon		*/
		dprintk("%s: Not there yet\n", __FUNCTION__);
	}
	/*	CA PMT Reply not capable	*/
	if (!ca_pmt_reply_test) {
		if ((ca_set_pmt(state, p_ca_message, hw_buffer, 0, NO_REPLY)) < 0) {
			dprintk("%s: ca_set_pmt.. failed !\n", __FUNCTION__);
			return -1;
		}
		dprintk("%s: ca_set_pmt.. success !\n", __FUNCTION__);
	/*	put a dummy message		*/

	}
	return 0;
}


static int ca_set_pmt(struct dst_state *state, struct ca_msg *p_ca_message, struct ca_msg *hw_buffer, u8 reply, u8 query)
{
	u32 hw_offset, buf_offset, i, k;
	u32 program_info_length = 0, es_info_length = 0, length = 0, words = 0;
	u8 found_prog_ca_desc = 0, found_stream_ca_desc = 0, error_condition = 0, hw_buffer_length = 0;

	dprintk("%s, p_ca_message length %d (0x%x)\n", __FUNCTION__,p_ca_message->length,p_ca_message->length );

	handle_en50221_tag(p_ca_message, hw_buffer);			/*	EN50221 tag		*/

	/*	Handle the length field (variable)	*/
	if (!(p_ca_message->msg[3] & 0x80)) {				/*	Length = 1		*/
		length = p_ca_message->msg[3] & 0x7f;
		words = 0;						/*	domi's suggestion	*/
	}
	else {								/*	Length = words		*/
		words = p_ca_message->msg[3] & 0x7f;
		for (i = 0; i < words; i++) {
			length = length << 8;
			length = length | p_ca_message->msg[4 + i];
		}
	}
	dprintk("%s:Length=[%d (0x%x)], Words=[%d]\n", __FUNCTION__, length,length, words);

	/*	Debug Input string		*/
	for (i = 0; i < length; i++)
		dprintk(" %02x", p_ca_message->msg[i]);
	dprintk("]\n");


	hw_offset = 7;
	buf_offset = words + 4;

	/*		Program Header			*/
	dprintk("\n%s:Program Header=[", __FUNCTION__);
	for (i = 0; i < 6; i++) {
		hw_buffer->msg[hw_offset] = p_ca_message->msg[buf_offset];
		dprintk(" %02x", p_ca_message->msg[buf_offset]);
		hw_offset++, buf_offset++, hw_buffer_length++;
	}
	dprintk("]\n");

	program_info_length = 0;
	program_info_length = (((program_info_length | p_ca_message->msg[words + 8]) & 0x0f) << 8) | p_ca_message->msg[words + 9];
	dprintk("%s:Program info Length=[%d][%02x], hw_offset=[%d], buf_offset=[%d] \n",
			__FUNCTION__, program_info_length, program_info_length, hw_offset, buf_offset);

	if (program_info_length && (program_info_length < 256)) {	/*	If program_info_length		*/
		hw_buffer->msg[11] = hw_buffer->msg[11] & 0x0f;		/*	req only 4 bits			*/
		hw_buffer->msg[12] = hw_buffer->msg[12] + 1;		/*	increment! ASIC bug!		*/

		if (p_ca_message->msg[buf_offset + 1] == 0x09) {	/*	Check CA descriptor		*/
			found_prog_ca_desc = 1;
			dprintk("%s: Found CA descriptor @ Program level\n", __FUNCTION__);
		}

		if (found_prog_ca_desc) {				/*	Command only if CA descriptor	*/
			hw_buffer->msg[13] = p_ca_message->msg[buf_offset];	/*	CA PMT command ID	*/
			hw_offset++, buf_offset++, hw_buffer_length++;
		}

		/*			Program descriptors				*/

		dprintk("%s:**********>buf_offset=[%d], hw_offset=[%d]\n", __FUNCTION__, buf_offset, hw_offset);
		dprintk("%s:Program descriptors=[", __FUNCTION__);

		while (program_info_length && !error_condition) {		/*	Copy prog descriptors	*/
			if (program_info_length > p_ca_message->length) {	/*	Error situation		*/
				dprintk ("%s:\"WARNING\" Length error, line=[%d], prog_info_length=[%d]\n",
								__FUNCTION__, __LINE__, program_info_length);
				dprintk("%s:\"WARNING\" Bailing out of possible loop\n", __FUNCTION__);
				error_condition = 1;
				break;
			}

			hw_buffer->msg[hw_offset] = p_ca_message->msg[buf_offset];
			dprintk(" %02x", p_ca_message->msg[buf_offset]);
			hw_offset++, buf_offset++, hw_buffer_length++, program_info_length--;
		}
		dprintk("]\n");
		dprintk("%s:**********>buf_offset=[%d], hw_offset=[%d]\n", __FUNCTION__, buf_offset, hw_offset);

		if (found_prog_ca_desc) {
			if (!reply) {
				hw_buffer->msg[13] = 0x01;		/*	OK descrambling			*/
				dprintk("CA PMT Command = OK Descrambling\n");
			}
			else {
				hw_buffer->msg[13] = 0x02;		/*	Ok MMI				*/
				dprintk("CA PMT Command = Ok MMI\n");
			}
			if (query) {
				hw_buffer->msg[13] = 0x03;		/*	Query				*/
				dprintk("CA PMT Command = CA PMT query\n");
			}
		}
	}
	else {
		hw_buffer->msg[11] = hw_buffer->msg[11] & 0xf0;		/*	Don't write to ASIC		*/
		hw_buffer->msg[12] = hw_buffer->msg[12] = 0x00;
	}

	dprintk("%s:**********>p_ca_message->length=[%d], buf_offset=[%d], hw_offset=[%d]\n",
				__FUNCTION__, p_ca_message->length, buf_offset, hw_offset);

	while ((buf_offset  < p_ca_message->length)  && !error_condition) {
		/*	Bail out in case of an indefinite loop		*/
		if ((es_info_length > p_ca_message->length) || (buf_offset > p_ca_message->length)) {
			dprintk("%s:\"WARNING\" Length error, line=[%d], prog_info_length=[%d], buf_offset=[%d]\n",
							__FUNCTION__, __LINE__, program_info_length, buf_offset);

			dprintk("%s:\"WARNING\" Bailing out of possible loop\n", __FUNCTION__);
			error_condition = 1;
			break;
		}

		/*		Stream Header				*/

		for (k = 0; k < 5; k++) {
			hw_buffer->msg[hw_offset + k] = p_ca_message->msg[buf_offset + k];
		}

		es_info_length = 0;
		es_info_length = (es_info_length | (p_ca_message->msg[buf_offset + 3] & 0x0f)) << 8 | p_ca_message->msg[buf_offset + 4];

		dprintk("\n%s:----->Stream header=[%02x %02x %02x %02x %02x]\n", __FUNCTION__,
			p_ca_message->msg[buf_offset + 0], p_ca_message->msg[buf_offset + 1],
			p_ca_message->msg[buf_offset + 2], p_ca_message->msg[buf_offset + 3],
			p_ca_message->msg[buf_offset + 4]);

		dprintk("%s:----->Stream type=[%02x], es length=[%d (0x%x)], Chars=[%02x] [%02x], buf_offset=[%d]\n", __FUNCTION__,
			p_ca_message->msg[buf_offset + 0], es_info_length, es_info_length,
			p_ca_message->msg[buf_offset + 3], p_ca_message->msg[buf_offset + 4], buf_offset);


		hw_buffer->msg[hw_offset + 3] &= 0x0f;			/*	req only 4 bits			*/

		if (found_prog_ca_desc) {
			hw_buffer->msg[hw_offset + 3] = 0x00;
			hw_buffer->msg[hw_offset + 4] = 0x00;
		}

		hw_offset += 5, buf_offset += 5, hw_buffer_length += 5;

		/*		Check for CA descriptor			*/
		if (p_ca_message->msg[buf_offset + 1] == 0x09) {
			dprintk("%s:Found CA descriptor @ Stream level\n", __FUNCTION__);
			found_stream_ca_desc = 1;
		}

		/*		ES descriptors				*/

		if (es_info_length && !error_condition && !found_prog_ca_desc && found_stream_ca_desc) {
//			if (!ca_pmt_done) {
				hw_buffer->msg[hw_offset] = p_ca_message->msg[buf_offset];	/*	CA PMT cmd(es)	*/
				printk("%s:----->CA PMT Command ID=[%02x]\n", __FUNCTION__, p_ca_message->msg[buf_offset]);
//				hw_offset++, buf_offset++, hw_buffer_length++, es_info_length--, ca_pmt_done = 1;
				hw_offset++, buf_offset++, hw_buffer_length++, es_info_length--;
//			}

			dprintk("%s:----->ES descriptors=[", __FUNCTION__);

			while (es_info_length && !error_condition) {	/*	ES descriptors			*/
				if ((es_info_length > p_ca_message->length) || (buf_offset > p_ca_message->length)) {
					dprintk("%s:\"WARNING\" ES Length error, line=[%d], es_info_length=[%d], buf_offset=[%d]\n",
										__FUNCTION__, __LINE__, es_info_length, buf_offset);

					dprintk("%s:\"WARNING\" Bailing out of possible loop\n", __FUNCTION__);
					error_condition = 1;
					break;
				}

				hw_buffer->msg[hw_offset] = p_ca_message->msg[buf_offset];
				dprintk("%02x ", hw_buffer->msg[hw_offset]);
				hw_offset++, buf_offset++, hw_buffer_length++, es_info_length--;
			}
			found_stream_ca_desc = 0;			/*	unset for new streams		*/
			dprintk("]\n");
		}
	}

	/*		MCU Magic words					*/

	hw_buffer_length += 7;
	hw_buffer->msg[0] = hw_buffer_length;
	hw_buffer->msg[1] = 64;
	hw_buffer->msg[4] = 3;
	hw_buffer->msg[5] = hw_buffer->msg[0] - 7;
	hw_buffer->msg[6] = 0;


	/*      Fix length      */
	hw_buffer->length = hw_buffer->msg[0];

//	do_checksum (hw_buffer);
	put_checksum(&hw_buffer->msg[0], hw_buffer->msg[0]);
	/*      Do the actual write     */
	write_to_8820(state, hw_buffer, reply);

	dprintk("%s:======================DEBUGGING================================\n", __FUNCTION__);
	dprintk("%s: Actual Length=[%d]\n", __FUNCTION__, hw_buffer_length);
	/*      Only for debugging!     */
	debug_8820_buffer(hw_buffer);

	return 0;
}

/*			Set PMT Helper functions			*/

static int handle_en50221_tag(struct ca_msg *p_ca_message, struct ca_msg *hw_buffer)
{
	if (session) {
		hw_buffer->msg[2] = p_ca_message->msg[1];		/*		MSB			*/
		hw_buffer->msg[3] = p_ca_message->msg[2];		/*		LSB			*/
	}
	else {
		hw_buffer->msg[2] = 0x03;
		hw_buffer->msg[3] = 0x00;
	}
	return 0;
}

static int write_to_8820(struct dst_state *state, struct ca_msg *hw_buffer, u8 reply)
{
	if ((dst_put_ci(state, hw_buffer->msg, hw_buffer->length, hw_buffer->msg, reply)) < 0) {
		dprintk("%s: DST-CI Command failed.\n", __FUNCTION__);
		dprintk("%s: Resetting DST.\n", __FUNCTION__);
		rdc_reset_state(state);
		return -1;
	}
	dprintk("%s: DST-CI Command succes.\n", __FUNCTION__);

	return 0;
}

static int debug_8820_buffer(struct ca_msg *hw_buffer)
{
	unsigned int i;

	dprintk("%s:Debug=[", __FUNCTION__);
	for (i = 0; i < (hw_buffer->msg[0] + 1); i++)
		dprintk(" %02x", hw_buffer->msg[i]);
	dprintk("]\n");

	return 0;
}

/*			End of Set PMT Helper functions			*/


static int dst_ci_command(struct dst_state* state, u8 * data, u8 *ca_string, u8 len)
{
	u8 reply;

	dst_comm_init(state);
	msleep(65);

	if (write_dst(state, data, len)) {
		dprintk("%s: Write not successful, trying to recover\n", __FUNCTION__);
		dst_error_recovery(state);
		return -1;
	}

	if ((dst_pio_disable(state)) < 0) {
		dprintk("%s: DST PIO disable failed.\n", __FUNCTION__);
		return -1;
	}

	if (read_dst(state, &reply, GET_ACK) < 0) {
		dprintk("%s: Read not successful, trying to recover\n", __FUNCTION__);
		msleep(10);
		dst_error_recovery(state);
		return -1;
	}

	if (! dst_wait_dst_ready(state, LONG_DELAY)) {
		dprintk("%s: 8820 not ready\n", __FUNCTION__);
		return -1;
	}

	if (read_dst(state, ca_string, 128) < 0) {	/*	Try to make this dynamic	*/
		dprintk("%s: Read not successful, trying to recover\n", __FUNCTION__);
		dst_error_recovery(state);
		return -1;
	}

	return 0;
}


static int dst_put_ci(struct dst_state *state, u8 *data, int len, u8 *ca_string, int read)
{
	u8 dst_ca_comm_err = 0;

	while (dst_ca_comm_err < RETRIES) {
		dst_comm_init(state);

		dprintk("%s: Put Command\n", __FUNCTION__);
		if (dst_ci_command(state, data, ca_string, len)) {	// If error
			dst_error_recovery(state);
			dst_ca_comm_err++;
		}
		break;
	}

	return 0;
}


static int dst_ca_open(struct inode *inode, struct file *file)
{
	dprintk("%s:Device opened [%p]\n", __FUNCTION__, file);
	try_module_get(THIS_MODULE);

	return 0;
}

static int dst_ca_release(struct inode *inode, struct file *file)
{
	dprintk("%s:Device closed.\n", __FUNCTION__);
	module_put(THIS_MODULE);

	return 0;
}

static int dst_ca_read(struct file *file, char __user * buffer, size_t length, loff_t * offset)
{
	int bytes_read = 0;
	dprintk("%s:Device read.\n", __FUNCTION__);

	return bytes_read;
}

static int dst_ca_write(struct file *file, const char __user * buffer, size_t length, loff_t * offset)
{
	dprintk("%s:Device write.\n", __FUNCTION__);

	return 0;
}


int dst_ca_attach(struct dst_state *dst, struct dvb_adapter *dvb_adapter)
{

	struct dvb_device *dvbdev;

	dprintk("%s:registering DST-CA device\n", __FUNCTION__);
	dvb_register_device(dvb_adapter, &dvbdev, &dvbdev_ca, dst, DVB_DEVICE_CA);
	return 0;
}

EXPORT_SYMBOL(dst_ca_attach);

MODULE_DESCRIPTION("DST DVB-S/T/C Combo CA driver");
MODULE_AUTHOR("Manu Abraham");
MODULE_LICENSE("GPL");
-------------- next part --------------
/*
	CA-driver for TwinHan DST Frontend/Card

	Copyright (C) 2004, 2005 Manu Abraham (manu at kromtek.com)

	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.
*/

#ifndef _DST_CA_H_
#define _DST_CA_H_

#define RETRIES			5


#define	CA_APP_INFO_ENQUIRY	0x9f8020
#define	CA_APP_INFO		0x9f8021
#define	CA_ENTER_MENU		0x9f8022
#define CA_INFO_ENQUIRY		0x9f8030
#define	CA_INFO			0x9f8031
#define CA_PMT			0x9f8032
#define CA_PMT_REPLY		0x9f8033

#define CA_CLOSE_MMI		0x9f8800
#define CA_DISPLAY_CONTROL	0x9f8801
#define CA_DISPLAY_REPLY	0x9f8802
#define CA_TEXT_LAST		0x9f8803
#define CA_TEXT_MORE		0x9f8804
#define CA_KEYPAD_CONTROL	0x9f8805
#define CA_KEYPRESS		0x9f8806

#define CA_ENQUIRY		0x9f8807
#define CA_ANSWER		0x9f8808
#define CA_MENU_LAST		0x9f8809
#define CA_MENU_MORE		0x9f880a
#define CA_MENU_ANSWER		0x9f880b
#define CA_LIST_LAST		0x9f880c
#define CA_LIST_MORE		0x9f880d


struct dst_ca_private {
	struct dst_state *dst;
	struct dvb_device *dvbdev;
};


#endif
-------------- next part --------------
/*
	Frontend-driver for TwinHan DST Frontend

	Copyright (C) 2003 Jamie Honan
	Copyright (C) 2004, 2005 Manu Abraham (manu at kromtek.com)

	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.
*/

#ifndef DST_COMMON_H
#define DST_COMMON_H

#include <linux/dvb/frontend.h>
#include <linux/device.h>
#include "bt878.h"

#include "dst_ca.h"


#define NO_DELAY		0
#define LONG_DELAY		1
#define DEVICE_INIT		2

#define DELAY			1

#define DST_TYPE_IS_SAT		0
#define DST_TYPE_IS_TERR	1
#define DST_TYPE_IS_CABLE	2
#define DST_TYPE_IS_ATSC	3

#define DST_TYPE_HAS_NEWTUNE	1
#define DST_TYPE_HAS_TS204	2
#define DST_TYPE_HAS_SYMDIV	4
#define DST_TYPE_HAS_FW_1	8
#define DST_TYPE_HAS_FW_2	16
#define DST_TYPE_HAS_FW_3	32



/*	Card capability list	*/

#define DST_TYPE_HAS_MAC	1
#define DST_TYPE_HAS_DISEQC3	2
#define DST_TYPE_HAS_DISEQC4	4
#define DST_TYPE_HAS_DISEQC5	8
#define DST_TYPE_HAS_MOTO	16
#define DST_TYPE_HAS_CA		32
#define	DST_TYPE_HAS_ANALOG	64	/*	Analog inputs	*/


#define RDC_8820_PIO_0_DISABLE	0
#define RDC_8820_PIO_0_ENABLE	1
#define RDC_8820_INT		2
#define RDC_8820_RESET		4

/*	DST Communication	*/
#define GET_REPLY		1
#define NO_REPLY		0

#define GET_ACK			1
#define FIXED_COMM		8

#define ACK			0xff

struct dst_state {

	struct i2c_adapter* i2c;

	struct bt878* bt;

	struct dvb_frontend_ops ops;

	/* configuration settings */
	const struct dst_config* config;

	struct dvb_frontend frontend;

	/* private ASIC data */
	u8 tx_tuna[10];
	u8 rx_tuna[10];
	u8 rxbuffer[10];
	u8 diseq_flags;
	u8 dst_type;
	u32 type_flags;
	u32 frequency;		/* intermediate frequency in kHz for QPSK */
	fe_spectral_inversion_t inversion;
	u32 symbol_rate;	/* symbol rate in Symbols per second */
	fe_code_rate_t fec;
	fe_sec_voltage_t voltage;
	fe_sec_tone_mode_t tone;
	u32 decode_freq;
	u8 decode_lock;
	u16 decode_strength;
	u16 decode_snr;
	unsigned long cur_jiff;
	u8 k22;
	fe_bandwidth_t bandwidth;
	u8 dst_hw_cap;
	u8 dst_fw_version;
};

struct dst_types {
	char *device_id;
	int offset;
	u8 dst_type;
	u32 type_flags;
	u8 dst_feature;
};



struct dst_config
{
	/* the ASIC i2c address */
	u8 demod_address;
};


int rdc_reset_state(struct dst_state *state);
int rdc_8820_reset(struct dst_state *state);

int dst_wait_dst_ready(struct dst_state *state, u8 delay_mode);
int dst_pio_enable(struct dst_state *state);
int dst_pio_disable(struct dst_state *state);
int dst_error_recovery(struct dst_state* state);
int dst_comm_init(struct dst_state* state);

int write_dst(struct dst_state *state, u8 * data, u8 len);
int read_dst(struct dst_state *state, u8 * ret, u8 len);
u8 dst_check_sum(u8 * buf, u32 len);
struct dst_state* dst_attach(struct dst_state* state, struct dvb_adapter *dvb_adapter);
int dst_ca_attach(struct dst_state *state, struct dvb_adapter *dvb_adapter);
int dst_gpio_outb(struct dst_state* state, u32 mask, u32 enbb, u32 outhigh, int delay);

int dst_command(struct dst_state* state, u8 * data, u8 len);


#endif // DST_COMMON_H


More information about the linux-dvb mailing list