Several fixes for using with mercurial

From: Mauro Carvalho Chehab <mchehab@infradead.org>

cvs commands replaced to hg
created a new script to help commiting

Signed-off-by: Mauro Carvalho Chehab <mchehab@infradead.org>

19 files changed, 56 insertions, 10 deletions

diff --git a/v4l/scripts/bttv.pl b/v4l/scripts/bttv.pl
index 2c2cf4b2b..2c2cf4b2b 100644..100755
--- a/v4l/scripts/bttv.pl
+++ b/v4l/scripts/bttv.pl
diff --git a/v4l/scripts/buildpatch b/v4l/scripts/buildpatch
index 39caee1bf..39caee1bf 100644..100755
--- a/v4l/scripts/buildpatch
+++ b/v4l/scripts/buildpatch
diff --git a/v4l/scripts/cardlist b/v4l/scripts/cardlist
index e368e6b4f..e368e6b4f 100644..100755
--- a/v4l/scripts/cardlist
+++ b/v4l/scripts/cardlist
diff --git a/v4l/scripts/cx88.pl b/v4l/scripts/cx88.pl
index 459514157..459514157 100644..100755
--- a/v4l/scripts/cx88.pl
+++ b/v4l/scripts/cx88.pl
diff --git a/v4l/scripts/em28xx.pl b/v4l/scripts/em28xx.pl
index 278dfc214..278dfc214 100644..100755
--- a/v4l/scripts/em28xx.pl
+++ b/v4l/scripts/em28xx.pl
diff --git a/v4l/scripts/gentree.pl b/v4l/scripts/gentree.pl
index 4885b08ad..4885b08ad 100644..100755
--- a/v4l/scripts/gentree.pl
+++ b/v4l/scripts/gentree.pl
diff --git a/v4l/scripts/hwdata.pl b/v4l/scripts/hwdata.pl
index ca583d69d..ca583d69d 100644..100755
--- a/v4l/scripts/hwdata.pl
+++ b/v4l/scripts/hwdata.pl
diff --git a/v4l/scripts/insmod.sh b/v4l/scripts/insmod.sh
index bf22a69ce..bf22a69ce 100644..100755
--- a/v4l/scripts/insmod.sh
+++ b/v4l/scripts/insmod.sh
diff --git a/v4l/scripts/make_kern_diff.sh b/v4l/scripts/make_kern_diff.sh
index a00837e45..a00837e45 100644..100755
--- a/v4l/scripts/make_kern_diff.sh
+++ b/v4l/scripts/make_kern_diff.sh
diff --git a/v4l/scripts/makelinks.sh b/v4l/scripts/makelinks.sh
index 56bc40588..56bc40588 100644..100755
--- a/v4l/scripts/makelinks.sh
+++ b/v4l/scripts/makelinks.sh
diff --git a/v4l/scripts/merge-pvrusb2.sh b/v4l/scripts/merge-pvrusb2.sh
index e12d79a3f..e12d79a3f 100644..100755
--- a/v4l/scripts/merge-pvrusb2.sh
+++ b/v4l/scripts/merge-pvrusb2.sh
diff --git a/v4l/scripts/modules.sh b/v4l/scripts/modules.sh
index 8bbc62253..8bbc62253 100644..100755
--- a/v4l/scripts/modules.sh
+++ b/v4l/scripts/modules.sh
diff --git a/v4l/scripts/prep_commit_msg.pl b/v4l/scripts/prep_commit_msg.pl
new file mode 100755
index 000000000..239fb6092
--- /dev/null
+++ b/v4l/scripts/prep_commit_msg.pl
@@ -0,0 +1,41 @@
+#!/usr/bin/perl
+
+$f=shift; 
+open IN,"<$f"; 
+my $n=2;
+my $from="";
+my $first="";
+my $changed="";
+$out="";
+while (<IN>) {
+	if (m/^[0-9]/) {
+		$n--;
+		next;
+	}
+	if ($n>0) {
+		s/[\t -]*//;
+		if (m/^\* (.*):/) {
+			$changed="#\t$1\n$changed";
+		} else {
+			if ($first eq "") {
+				if ($_ eq "\n") {
+					next;
+				}
+				$first="$_";
+				next;
+			}
+			if ($from eq "") {
+				if (m/Signed-off-by:/) {
+					$from = $_;
+					$from =~ s/Signed-off-by/From/;
+					$first="$first\n#\n# Then From line\n$from\n";
+				}
+			}
+			$out="$out$_";
+		}
+	} 
+}
+printf  "#Added/removed/changed files:\n%s" .
+	"# First line should be the subject, without Subject:\n%s" .
+	"# Then a detailed description followed by Signed-off-by: fields:\n%s",
+	$changed,$first,$out;
diff --git a/v4l/scripts/prepare-ChangeLog.pl b/v4l/scripts/prepare-ChangeLog.pl
index 087e94bf2..c3b253246 100644..100755
--- a/v4l/scripts/prepare-ChangeLog.pl
+++ b/v4l/scripts/prepare-ChangeLog.pl
@@ -2,7 +2,7 @@
 # -*- Mode: perl; indent-tabs-mode: nil; c-basic-offset: 2  -*-
 
 # Perl script to create a ChangeLog entry with names of files
-# and functions from a cvs diff.
+# and functions from a hg diff.
 #
 # Darin Adler <darin@eazel.com>, started 20 April 2000
 # Java support added by Maciej Stachowiak <mjs@eazel.com>
@@ -13,6 +13,10 @@
 # CHANVE_LOG Env variables now are mandatory.
 # Updated at 15 January 2005
 #
+# Mauro Carvalho Chehab <mchehab@brturbo.com.br>: modified to
+# work with Mercurial
+# Updated at 29 August 2005
+#
 # (Someone put a license in here, like maybe GPL.)
 #
 # TODO:
@@ -77,26 +81,27 @@ if (!defined $login)
 # Read the old change log file.
 # It's less efficient to read the whole thing into memory than it would be
 # to read it while we prepend to it later, but I like doing this part first.
-print STDERR "  Updating ChangeLog from cvs repository.\n";
-open ERRORS, "cvs update v4l/ChangeLog |" or die "The cvs update of ChangeLog failed: $OS_ERROR.\n";
-print STDERR "    $ARG" while <ERRORS>;
-close ERRORS;
+#print STDERR "  Updating ChangeLog from hg repository.\n";
+#open ERRORS, "hg update ChangeLog |" or die "The hg update of ChangeLog failed: $OS_ERROR.\n";
+#print STDERR "    $ARG" while <ERRORS>;
+#close ERRORS;
 open OLD_CHANGE_LOG, "v4l/ChangeLog" or die "Could not open ChangeLog file: $OS_ERROR.\n";
 my @old_change_log = <OLD_CHANGE_LOG>;
 close OLD_CHANGE_LOG;
 
 # For each file, build a list of modified lines.
 # Use line numbers from the "after" side of each diff.
-print STDERR "  Running cvs diff to find changes.\n";
+print STDERR "  Running hg diff to find changes.\n";
 my %changed_line_ranges;
 my $file;
-open DIFF, "cvs -fq diff -N |" or die "The cvs diff failed: $OS_ERROR.\n";
+open DIFF, "hg diff |" or die "The hg diff failed: $OS_ERROR.\n";
 while (<DIFF>)
   {
-    $file = $1 if /^Index: (\S+)$/;
+#diff -r faaf1cf8404a video4linux/scripts/prepare-ChangeLog.pl
+#        and (/^\d+(,\d+)?[acd](\d+)(,(\d+))?/ or /^Binary files/) )
+    $file = $1 if /^diff -r .* (\S+)$/;
     if (defined $file
-        and $file ne "v4l/ChangeLog"
-        and (/^\d+(,\d+)?[acd](\d+)(,(\d+))?/ or /^Binary files/) )
+        and $file ne "v4l/ChangeLog" )
       {
         push @{$changed_line_ranges{$file}}, [ $2, $4 || $2 ];
       }
diff --git a/v4l/scripts/release.sh b/v4l/scripts/release.sh
index 557172875..557172875 100644..100755
--- a/v4l/scripts/release.sh
+++ b/v4l/scripts/release.sh
diff --git a/v4l/scripts/saa7134.pl b/v4l/scripts/saa7134.pl
index 69648339a..69648339a 100644..100755
--- a/v4l/scripts/saa7134.pl
+++ b/v4l/scripts/saa7134.pl
diff --git a/v4l/scripts/strip-trailing-whitespaces.sh b/v4l/scripts/strip-trailing-whitespaces.sh
index ea3e4defa..ea3e4defa 100644..100755
--- a/v4l/scripts/strip-trailing-whitespaces.sh
+++ b/v4l/scripts/strip-trailing-whitespaces.sh
diff --git a/v4l/scripts/tuner.pl b/v4l/scripts/tuner.pl
index fcfa22e26..fcfa22e26 100644..100755
--- a/v4l/scripts/tuner.pl
+++ b/v4l/scripts/tuner.pl
diff --git a/v4l/scripts/update b/v4l/scripts/update
index efe33f392..efe33f392 100644..100755
--- a/v4l/scripts/update
+++ b/v4l/scripts/update