[git.ipfire.org] IPFire 2.x development tree branch, fifteen, updated. 30f08bcf80c4c016cdc1f025cc2fbd5533ef20b9

[git@ipfire.org]

[-- Attachment #1: Type: text/plain, Size: 2901 bytes --]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "IPFire 2.x development tree".

The branch, fifteen has been updated
       via  30f08bcf80c4c016cdc1f025cc2fbd5533ef20b9 (commit)
       via  33e64584dd14decbeec39f0bdd4f4b2029b45e9b (commit)
      from  fac3861429d1b4c57c18ff13236d363d87fd31c0 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 30f08bcf80c4c016cdc1f025cc2fbd5533ef20b9
Merge: fac3861 33e6458
Author: Michael Tremer <michael.tremer(a)ipfire.org>
Date:   Mon Dec 16 12:31:19 2013 +0100

    Merge remote-tracking branch 'amarx/difflang' into fifteen

commit 33e64584dd14decbeec39f0bdd4f4b2029b45e9b
Author: Alexander Marx <amarx(a)ipfire.org>
Date:   Fri Dec 13 08:03:23 2013 +0100

    TOOLS: new script langdiff added. With this script one can check a languagefile against another and gets a txtfile conatining the missing lines.

-----------------------------------------------------------------------

Summary of changes:
 tools/langdiff.pl | 57 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 57 insertions(+)
 create mode 100755 tools/langdiff.pl

Difference in files:
diff --git a/tools/langdiff.pl b/tools/langdiff.pl
new file mode 100755
index 0000000..6ce313d
--- /dev/null
+++ b/tools/langdiff.pl
@@ -0,0 +1,57 @@
+#!/usr/bin/perl
+
+my @one=();
+my @two=();
+
+my $file1;
+my $file2;
+my $cnt=0;
+my $numArgs = $#ARGV + 1;
+if ($numArgs !=2 ){
+	print"Usage:  langdiff.pl <languagefile1 - incomplete> <languagefile2 - complete>\n";
+	exit;
+}else{
+	$file1=$ARGV[0];
+	$file2=$ARGV[1];
+}
+
+open(FILE1, $file1) or die 'Unable to open file $file1.';
+my @one = <FILE1>;
+close(FILE1);
+undef ($one[0]);
+undef ($one[1]);
+undef ($one[2]);
+undef ($one[3]);
+undef ($one[$#one-1]);
+undef ($one[$#one-2]);
+open(FILE2, $file2) or die 'Unable to open file $file2.';
+my @two = <FILE2>;
+close(FILE2);
+undef ($two[0]);
+undef ($two[1]);
+undef ($two[2]);
+undef ($two[3]);
+undef ($two[$#two-1]);
+undef ($two[$#two-2]);
+open(FILE3, ">language-diff.txt") or die 'Unable to open config file.';
+
+foreach my $line (@two){
+	my ($a,$b) = split ("=>",$line);
+	if(!&is_in_array($a)){
+		$cnt++;
+		print FILE3 "$a => $b";
+	}
+}
+
+sub is_in_array{
+	my $val = shift;
+
+	foreach my $line1 (@one){
+		my ($c,$d) = split ("=>",$line1);
+		return 1 if ($val eq $c);
+	}
+	return 0;
+}
+
+
+print"$cnt lines from $file2 are not existent in $file1. Please check language-diff.txt for details.\n\n";


hooks/post-receive
--
IPFire 2.x development tree