From 606fd3cf99ac5673395fdc81a2d618698e05ce07 Mon Sep 17 00:00:00 2001
From: Mauro Carvalho Chehab <mchehab@redhat.com>
Date: Sat, 2 Oct 2010 21:15:45 -0300
Subject: [PATCH] V4L/DVB: Add a parser for cx231xx i2c logs

This is an incomplete parser for cx231xx. Currently, it
gets only i2c traffic. Yet, this is very useful when adding support
for newer cards with different i2c components on it.

Signed-off-by: Mauro Carvalho Chehab <mchehab@redhat.com>
---
 contrib/cx231xx/parse_cx231xx.pl | 98 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 98 insertions(+)
 create mode 100755 contrib/cx231xx/parse_cx231xx.pl

diff --git a/contrib/cx231xx/parse_cx231xx.pl b/contrib/cx231xx/parse_cx231xx.pl
new file mode 100755
index 0000000..ad0ec7c
--- /dev/null
+++ b/contrib/cx231xx/parse_cx231xx.pl
@@ -0,0 +1,98 @@
+#!/usr/bin/perl
+
+#   Copyright (C) 2010 Mauro Carvalho Chehab <mchehab@redhat.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, version 2 of the License.
+#
+#   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.
+#
+# This small script parses register dumps generated by cx231xx driver
+# with debug options enabled, generating a source code with the results
+# of the dump.
+#
+# To use it, you may modprobe cx231xx with reg_debug=1, and do:
+# dmesg | ./parse_em28xx.pl
+#
+# Also, there are other utilities that produce similar outputs, and it
+# is not hard to parse some USB analyzers log into the expected format.
+#
+
+use strict;
+
+sub parse_i2c($$$$$$)
+{
+	my $reqtype = shift;
+	my $req = shift;
+	my $wvalue = shift;
+	my $windex = shift;
+	my $wlen = shift;
+	my $payload = shift;
+
+	my $daddr = $wvalue >> 9;
+	my $reserved = ($wvalue >>6 ) & 0x07;
+	my $period = ($wvalue >> 4) & 0x03;
+	my $addr_len = ($wvalue >> 2) & 0x03;
+	my $nostop = ($wvalue >>1) & 0x01;
+	my $sync = $wvalue & 0x01;
+
+	if ($nostop) {
+		$nostop="nostop ";
+	} else {
+		$nostop="";
+	}
+	if ($sync) {
+		$sync="sync ";
+	} else {
+		$sync="";
+	}
+	my $type;
+	my $i2c_channel;
+	if ($reqtype > 128) {
+		$type = "IN ";
+		$i2c_channel = $req - 4;
+	} else {
+		$type = "OUT";
+		$i2c_channel = $req;
+	}
+	if ($period == 0) {
+		$period = "1Mbps";
+	} elsif ($period == 1) {
+		$period = "400kbps";
+	} elsif ($period == 2) {
+		$period = "100kbps";
+	} else {
+		$period = "???kbps";
+	}
+	printf("$type i2c channel#%d daddr 0x%02x %s addr_len %d %s%slen %d = ",
+		$i2c_channel, $daddr, $period, $addr_len, $nostop, $sync,
+		$wlen);
+	if ($addr_len == 1) {
+		printf("(saddr)%02x ", $windex & 0xff);
+	} elsif ($addr_len == 2) {
+		printf("(saddr)%04x ", $windex);
+	}
+	printf("$payload\n");
+}
+
+while (<>) {
+	tr/A-F/a-f/;
+	if (m/([4c]0) ([0-9a-f].) ([0-9a-f].) ([0-9a-f].) ([0-9a-f].) ([0-9a-f].) ([0-9a-f].) ([0-9a-f].)[\<\>\s]+(.*)/) {
+		my $reqtype = hex($1);
+		my $req = hex($2);
+		my $wvalue = hex("$4$3");
+		my $windex = hex("$6$5");
+		my $wlen = hex("$8$7");
+		my $payload = $9;
+
+		if ($reqtype > 128 && (($req >= 4) && ($req <= 6))) {
+			parse_i2c($reqtype, $req, $wvalue, $windex, $wlen, $payload);
+		} elsif ($req < 3) {
+			parse_i2c($reqtype, $req, $wvalue, $windex, $wlen, $payload);
+		}
+	}
+}
-- 
2.7.4