summaryrefslogtreecommitdiffstats
path: root/tools/genlang
diff options
context:
space:
mode:
authorDave Chapman <dave@dchapman.com>2008-08-17 12:25:39 +0000
committerDave Chapman <dave@dchapman.com>2008-08-17 12:25:39 +0000
commit509c06aa03b17b6330073e2db2170117aeea39e2 (patch)
tree6c2fa538feb1fbfb4a4220a7ca015c3115f3bfae /tools/genlang
parent3adf579702cdd0c62e431ae82d8776890fa381a3 (diff)
downloadrockbox-509c06aa03b17b6330073e2db2170117aeea39e2.tar.gz
rockbox-509c06aa03b17b6330073e2db2170117aeea39e2.zip
Add a -s option to genlang to sort a language file into the same order as english.lang
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@18303 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools/genlang')
-rwxr-xr-xtools/genlang34
1 files changed, 26 insertions, 8 deletions
diff --git a/tools/genlang b/tools/genlang
index cd153163f5..d99e3f0442 100755
--- a/tools/genlang
+++ b/tools/genlang
@@ -38,7 +38,11 @@ Usage: genlang [options] <langv2 file>
-e=<english lang file>
Point out the english (original source) file, to use that as master
- language template. Used in combination with -b or -u.
+ language template. Used in combination with -b, -u or -s.
+
+ -s
+ Sort the Update language file in the same order as the strings in the
+ English file.
-t=<target>
Specify which target you want the translations/phrases for. Required when
@@ -77,23 +81,25 @@ MOO
my $prefix = $p;
my $binary = $b;
my $update = $u;
+my $sortfile = $s;
my $english = $e;
my $voiceout = $o;
-my $check = ($binary?1:0) + ($prefix?1:0) + ($update?1:0) + ($voiceout?1:0);
+my $check = ($binary?1:0) + ($prefix?1:0) + ($update?1:0) + ($voiceout?1:0) + ($sortfile?1:0);
if($check > 1) {
- print "Please use only one of -p, -u, -o and -b\n";
+ print "Please use only one of -p, -u, -o, -b and -s\n";
exit;
}
if(!$check) {
- print "Please use at least one of -p, -u, -o and -b\n";
+ print "Please use at least one of -p, -u, -o, -b and -s\n";
exit;
}
-if(($binary || $update || $voiceout) && !$english) {
- print "Please use -e too when you use -b, -o or -u\n";
+
+if(($binary || $update || $voiceout || $sortfile) && !$english) {
+ print "Please use -e too when you use -b, -o, -u or -s\n";
exit;
}
@@ -104,7 +110,7 @@ if($binary && !$target_id) {
}
my $target = $t;
-if(!$target && !$update) {
+if(!$target && !$update && !$sortfile) {
print "Please specify a target (with -t)!\n";
exit;
}
@@ -113,6 +119,7 @@ my $verbose=$v;
my %id; # string to num hash
my @idnum; # num to string array
+my %allphrases; # For sorting - an array of the <phrase> elements
my %source; # id string to source phrase hash
my %dest; # id string to dest phrase hash
my %voice; # id string to voice phrase hash
@@ -201,6 +208,7 @@ if($english) {
my $id;
my $maybeid;
my $withindest;
+ my $numphrases = 0;
while(<ENG>) {
# get rid of DOS newlines
@@ -268,6 +276,7 @@ if($english) {
if($_ =~ /^ *id: ([^ \t\n]+)/i) {
$maybeid=$1;
+ $sortorder{$maybeid}=$numphrases++;
}
}
close(ENG);
@@ -369,7 +378,7 @@ while(<LANG>) {
if($_ =~ /^( *\#|[ \t\n\r]*\z)/) {
# comment or empty line - output it if it's part of the header
- if ($header and $update) {
+ if ($header and ($update || $sortfile)) {
print($_);
}
next;
@@ -403,6 +412,9 @@ while(<LANG>) {
# "none" as dest (without quotes) means that this entire
# phrase is to be ignored
}
+ elsif($sortfile) {
+ $allphrases{$idstr}=join('',@phrase);
+ }
elsif(!$update) {
# we don't do the fully detailed analysis when we "update"
# since we don't do it for a particular target etc
@@ -511,6 +523,12 @@ if($update) {
}
}
+if ($sortfile) {
+ for(sort { $sortorder{$a} <=> $sortorder{$b} } keys %allphrases) {
+ print $allphrases{$_};
+ }
+}
+
if($prefix) {
# We create a .c and .h file