remove translation status, use the pootle index page for your

percentages.
This commit is contained in:
Andrew Lewman 2010-08-16 19:15:21 +00:00
parent 299f347241
commit 006831c69f
2 changed files with 0 additions and 243 deletions

View File

@ -1,238 +0,0 @@
## translation metadata
# Revision: $Revision: 21313 $
# Note to translators:
# translating this page is probably not a good idea, and it never was intended to be translated.
# it contains lots of programming logic, which you would have to duplicate, and it's probably
# useful only to other translators which most likely will know a bit of english.
#
# Thanks for your hard work, improve the other pages instead. :) -- weasel
#include "head.wmi" TITLE="Tor Projecdt: Translation status" CHARSET="UTF-8"
#use "functions.wmi"
<div id="content" class="clearfix">
<div id="breadcrumbs">
<a href="<page index>">Home &raquo; </a>
<a href="<page getinvolved/getinvolved>">Get Involved &raquo; </a>
<a href="<page getinvolved/translation-status>">Translation Status</a>
</div>
<div id="maincol">
<h1>Tor: Translation status</h1>
<hr />
<:
sub do_status(\%$$) {
my $dir = $_[1];
my $may_miss_dir = $_[2];
my %files;
my @warnings;
for my $lang (@LANGUAGES) {
my $dir_opened = opendir(DIR, "$dir/$lang");
if (! $dir_opened) {
$may_miss_dir or die ("Cannot opendir $dir/$lang: $!\n");
next;
}
my @files = grep { $_ ne '.' && $_ ne '..' &&
$_ !~ /tor-manual/i && $_ !~ /translation-status/i && $_ =~ m/^[^.]/ && -f "$dir/$lang/$_"} readdir(DIR);
closedir DIR;
for my $file (@files) {
$files{$lang}->{$file}->{'all'} = getMetadata("$dir/$lang/$file");
if ($lang eq 'en') {
$files{$lang}->{$file}->{'rev'} = translation_get_masterrevision_file($dir, $file);
} else {
$files{$lang}->{$file}->{'based'} = translation_get_basedonrevision_langfile($dir, $lang, $file);
};
};
};
my %priorities;
for my $file (keys %{$files{'en'}}) {
my $p = $files{'en'}->{$file}->{'all'}->{'Translation-Priority'};
if (defined $p) {
$priorities{$p} = 1;
};
};
my @priorities = sort {$a cmp $b} keys %priorities;
push @priorities, 'none';
my $HTMLBASE = (defined $ENV{'HTMLBASE'} ? $ENV{'HTMLBASE'} : 'https://www.torproject.org/') . ($dir eq '.' ? '' : $dir.'/');
for my $priority (@priorities) {
for my $file (sort {$a cmp $b} keys %{$files{'en'}}) {
my $file_priority = $files{'en'}->{$file}->{'all'}->{'Translation-Priority'};
next if (defined $file_priority && $priority ne $file_priority);
next if (!defined $file_priority && $priority ne 'none');
my $path = ($dir eq '.' ? '' : $dir.'/') . $file;
my $obs = file_is_obsolete($dir, 'en', $file);
my $validatorlink = '';
my $htmlfile = $file;
if ($htmlfile =~ s/\.wml/.html/) {
$validatorlink = sprintf '<br><a href="http://validator.w3.org/check?uri=%s%s.en">validator</a>',
$HTMLBASE, $htmlfile;
};
my $cell_path = sprintf '<th>%s</th>', $path;
my $cell_en = sprintf '<td%s>Revision %s%s<br>
<a href="https://svn.torproject.org/cgi-bin/viewvc.cgi/website/trunk/%sen/%s?root=Tor&amp;view=markup">HEAD</a>
%s',
($obs ? ' bgcolor="#D3D3D3"' : ''),
$files{'en'}->{$file}->{'rev'},
($obs ? ' (obsolete)' :''),
($dir eq '.' ? '' : $dir.'/'),
$file,
$validatorlink;
${$_[0]}{$priority}->{$path}->{'data'} = $cell_path . $cell_en;
# Assign high urgency if it's *.wmi, else init to 0
if ($file =~ /.wmi$/) {
${$_[0]}{$priority}->{$path}->{'urgency'} = 1000;
} else {
${$_[0]}{$priority}->{$path}->{'urgency'} = 0;
}
for my $lang (@LANGUAGES) {
next if $lang eq 'en';
my $color;
my $status;
#my $path = ($dir eq '.' ? '' : $dir.'/') . $file;
if ($validatorlink) {
$validatorlink = sprintf '<br><a href="http://validator.w3.org/check?uri=%s%s.%s">validator</a>',
$HTMLBASE, $htmlfile, $lang;
};
if (exists $files{$lang}->{$file}) {
my $all_info = '';
for my $key (sort {$a cmp $b} keys %{$files{$lang}->{$file}->{'all'}}) {
next if $key eq 'Translation-Priority';
$all_info .= sprintf "%s: %s<br>", $key, $files{$lang}->{$file}->{'all'}->{$key};
};
my $difflink;
if ($files{$lang}->{$file}->{'based'} eq $files{'en'}->{$file}->{'rev'}) {
$color='#90EE90';
$status='current';
$difflink='';
} else {
$status='not current';
if ($files{$lang}->{$file}->{'based'} ne 'unknown') {
$difflink=sprintf '<br><a href="https://svn.torproject.org/cgi-bin/viewvc.cgi/website/trunk/%sen/%s?root=Tor&amp;r1=%s&amp;r2=%s">changes in original</a>',
($dir eq '.' ? '' : $dir.'/'), $file, $files{$lang}->{$file}->{'based'}, $files{'en'}->{$file}->{'rev'};
$color='yellow';
} else {
$difflink='';
$color='#FFA500';
};
${$_[0]}{$priority}->{$path}->{'urgency'} += 1;
};
${$_[0]}{$priority}->{$path}->{'data'} .= sprintf '<td bgcolor="%s">%s<br>
<a href="https://svn.torproject.org/cgi-bin/viewvc.cgi/website/trunk/%s%s/%s?root=Tor&amp;view=markup">HEAD</a><br>
%s
%s
%s</td>',
$color,
$status,
($dir eq '.' ? '' : $dir.'/'),
$lang, $file,
$all_info,
$difflink,
$validatorlink;
} else {
#my $path = ($dir eq '.' ? '' : $dir.'/') . $file;
$color=(($obs or $priority eq 'none') ?
'#90EE90' : 'red');
$status='missing';
${$_[0]}{$priority}->{$path}->{'data'} .= sprintf '<td bgcolor="%s">%s</td>', $color, $status;
${$_[0]}{$priority}->{$path}->{'urgency'} += ($obs or $priority eq 'none') ? 0 : 2;
};
delete $files{$lang}->{$file};
};
${$_[0]}{$priority}->{$path}->{'data'} .= $cell_en . $cell_path;
};
};
for my $lang (@LANGUAGES) {
next if $lang eq 'en';
if (keys %{$files{$lang}} > 0) {
# print "<p>";
print "<br><br>";
printf "<h2>Additional files in %s (%s)</h2>\n", $lang, $LANGUAGES{$lang};
print "<table border=1>\n";
print "<tr>\n";
print "<th>File</th>\n";
print "<th>Based on Revision</th>\n";
print "</tr>\n";
for my $file (sort {$a cmp $b} keys %{$files{$lang}}) {
print "<tr>";
printf "<th>%s</th><td>", $file;
for my $key (sort {$a cmp $b} keys %{$files{$lang}->{$file}->{'all'}}) {
printf "%s: %s<br>", $key, $files{$lang}->{$file}->{'all'}->{$key};
};
printf "</td>";
delete $files{$lang}->{$file};
print "</tr>\n";
};
print "</table>\n\n";
};
};
};
sub sort_and_print(\%) {
my %rows = %{$_[0]};
for my $priority (sort {$a cmp $b} keys %rows) {
print "<h2>Translation priority: $priority</h2>\n";
print "<table border=1>\n";
print "<tr>\n";
print "<th>File</th>\n";
printf("<th>%s (%s)</th>\n", $_, $LANGUAGES{$_}) for ('en', grep({ $_ ne 'en' } @LANGUAGES), 'en');
print "<th>File</th>\n";
print "</tr>\n";
for my $row (sort {$rows{$priority}->{$b}->{'urgency'} <=> $rows{$priority}->{$a}->{'urgency'}} keys %{$rows{$priority}}) {
print "<tr>";
print $rows{$priority}->{$row}->{'data'};
delete ${$_[0]}{$priority}->{$row};
print "</tr>\n\n";
};
print "</table><br>\n\n\n";
};
};
# accumulate the table rows, then sort and print them
my %table_rows;
do_status(%table_rows, '.', 0);
do_status(%table_rows, 'docs', 1);
#do_status(%table_rows, 'torbrowser', 1);
#do_status(%table_rows, 'torbutton', 1);
#do_status(%table_rows, 'tordnsel', 1);
do_status(%table_rows, 'projects', 1);
#do_status(%table_rows, 'torvm', 1);
do_status(%table_rows, 'press', 1);
#do_status(%table_rows, 'gettor', 1);
#do_status(%table_rows, 'vidalia', 1);
do_status(%table_data, 'eff', 1);
#do_status(%table_data, 'gui', 1);
sort_and_print(%table_rows);
:>
</div>
<!-- END MAINCOL -->
<div id = "sidecol">
#include "side.wmi"
#include "info.wmi"
</div>
<!-- END SIDECOL -->
</div>
<!-- END CONTENT -->
#include <foot.wmi>

View File

@ -26,11 +26,6 @@
contact us via email: <tt>tor-translation AT torproject.org</tt>.
</p>
<p>
To get an idea how
current our translations are, we have created a page with the current
<a href="<page getinvolved/translation-status>">translation status</a>.</p>
<p>
Note that even if you can't translate many pages for your language,
a few pages will still be helpful.