Gnome $version desktop translation statistics\n";
print "Comparing translation status from $startdate to $enddate
\n";
$q = mysql_query("select ".
" stats.id, description, date, version, translated, fuzzy, untranslated".
" from stats, langs".
" where stats.id=langs.id and date='$enddate' and version='$version'".
" order by (translated/(translated+fuzzy+untranslated)) desc, translated desc, description asc");
$XMLoutput = "
\n";
$output = "\n".
"| rank | Language | State | ".
"Change | Cool graph |
|---|
\n";
$rank = 0; $ptrans = 0;
while ($q and $row = mysql_fetch_array($q)) {
$prevstate = $ptrans;
$rank++;
$total = $row['translated'] + $row['fuzzy'] + $row['untranslated'];
$ptrans = round(10000*$row['translated']/$total)/100;
$pfuzzy = round(10000*$row['fuzzy']/$total)/100;
$puntrans = round(10000*$row['untranslated']/$total)/100;
$optrans = 0;
$qq = mysql_query("select * from stats where date='$startdate' and version='$version' and id='$row[id]'");
if ($qq and $oldrow = mysql_fetch_array($qq)) {
$oldtotal = $oldrow['translated'] + $oldrow['fuzzy'] + $oldrow['untranslated'];
$optrans = number_format(round(10000*$oldrow['translated']/$oldtotal)/100,2);
}
$pchange = round(100*($ptrans-$optrans))/100;
if ($pchange>0) {
$schange = "up ". number_format($pchange,2) . "%";
} elseif ($pchange<0) {
$schange = "down ". number_format(-$pchange,2). "%";
} else {
$schange = "no change";
}
// building a graph
$dagraph = "\n";
$curstart = 0;
$curwidth = 0;
if ($pchange>0) {
$soldtrans = round(($ptrans - $pchange)*$gw/100);
$send = round($pchange*$gw/100);
$dagraph .= "
\n".
"
\n";
$curwidth = $soldtrans+$send;
} else {
$curwidth = round($ptrans*$gw/100);
$dagraph .= "
\n";
}
if ($pfuzzy>0) {
$swidth = round($pfuzzy*$gw/100);
$dagraph .= "
\n";
$curwidth += $swidth;
}
if ($puntrans>0) {
$swidth = round($puntrans*$gw/100);
if ($swidth<($gw-$curwidth)) $swidth=$gw-$curwidth;
if ($swidth>($gw-$curwidth)) $swidth=$gw-$curwidth;
$dagraph .= "
\n";
$curwidth += $swidth;
}
$dagraph .= "
| $norank | $row[description] | \n".
" $ptrans | \n".
" \n".
" \n".
" $schange | \n".
" $dagraph | \n".
"
\n";
$xpchange = number_format($pchange, 2);
$XMLoutput .= " $row[description]\n";
}
$XMLoutput .= "\n";
$XMLoutput = str_replace("å", "a", $XMLoutput);
$output .= "
\n";
print $output;
$email = readin('email');
if ($email) {
print "
Mailed translation report to: $email";
mail("$email","Translation stats for $startdate to $enddate",$XMLoutput, "From: danilo@gnome.org");
}
} else {
$stselect = "\n";
$form = "\n";
print $form;
}
if (strtolower($_SERVER['REQUEST_METHOD']) == 'post' or readin('end')) {
?>
Legend
translated messages
change for better
fuzzy messages
untranslated messages