contrib/drupal-modules/module/doc_translation_status.php

   1 <!--break-->\r
   2 <?php\r
   3 //\r
   4 // Drupal doc translation status report \r
   5 // loaded into:\r
   6 // "http://tortoisesvn.net/translation_devel_doc" \r
   7 //    *AND*\r
   8 // "http://tortoisesvn.net/translation_release_doc"\r
   9 //\r
  10 // Copyright (C) 2004-2008 the TortoiseSVN team\r
  11 // This file is distributed under the same license as TortoiseSVN\r
  12 //\r
  13 // $Author: luebbe $\r
  14 // $Date: 2008-06-23 20:38:59 +0800 (Mon, 23 Jun 2008) $\r
  15 // $Rev: 13328 $\r
  16 //\r
  17 // Author: Lübbe Onken 2004-2008\r
  18 //\r
  19 \r
  20 include("/var/www/vhosts/default/htdocs/modules/tortoisesvn/trans_data_trunk.inc");\r
  21 include("/var/www/vhosts/default/htdocs/modules/tortoisesvn/trans_countries.inc");\r
  22 include("/var/www/vhosts/default/htdocs/modules/tortoisesvn/tortoisevars.inc");\r
  23 \r
  24 // different settings depending on dev or release report\r
  25 // uncomment these three lines for the trunk report\r
  26  $tsvn_var['showold']=TRUE;\r
  27  $tsvn_var['reposurl']=$tsvn_var['repos_trunk'].'doc/po/';\r
  28  $tsvn_var['header_msg']='the current development version of TortoiseSVN, which is always ahead of the latest official release';\r
  29 // uncomment these three lines for the release branch report\r
  30 // $tsvn_var['showold']=FALSE;\r
  31 // $tsvn_var['reposurl']=$tsvn_var['repos_branch'].'doc/po/';\r
  32 // $tsvn_var['header_msg']='the latest official TortoiseSVN release <b>('.$tsvn_var['release'].')</b>';\r
  33 \r
  34 function print_d_header($tsvn_var)\r
  35 {\r
  36 ?>\r
  37 \r
  38 <div class="content">\r
  39 <h2>Translations (in Revision <?php echo $tsvn_var['wcrev']; ?>)</h2>\r
  40 \r
  41 <p>\r
  42 This page is informing you about the documentation translation status of <?php echo $tsvn_var['header_msg']; ?>.\r
  43 The statistics are calculated for the HEAD revision and updated regularly.\r
  44 The last update was run at <b><?php echo $tsvn_var['update']; ?></b>.\r
  45 </p>\r
  46 \r
  47 <p>\r
  48 If you want to download the po file from the repository, either use <strong>guest (no password)</strong> or your tigris.org user ID. \r
  49 </p>\r
  50 \r
  51 <?php\r
  52 }\r
  53 \r
  54 //------------------------------------\r
  55 //\r
  56 // The program starts here\r
  57 //\r
  58 \r
  59 // Merge translation and country information into one array\r
  60 $TortoiseSVN = array_merge_recursive($countries, $TortoiseSVN);\r
  61 \r
  62 // Convert Data into a list of columns\r
  63 foreach ($TortoiseSVN as $key => $row) {\r
  64    $potfile[$key] = abs($row[0]);\r
  65    $country[$key] = $row[3];\r
  66    $errors[$key] = $row[5];\r
  67    $total[$key] = $row[6];\r
  68    $transl[$key] = $row[7];\r
  69    $fuzzy[$key] = $row[8];\r
  70    $untrans[$key] = $row[9];\r
  71    $accel[$key] = $row[10];\r
  72    $name[$key] = $row[11];\r
  73    $fdate[$key] = $row[12];\r
  74 }\r
  75 \r
  76 // Add $TortoiseSVN as the last parameter, to sort by the common key\r
  77 array_multisort($potfile, $country, $transl, $untrans, $fuzzy, $TortoiseSVN);\r
  78 \r
  79 print_d_header($tsvn_var);\r
  80 \r
  81 // Print Alphabetical statistics\r
  82 print_table_header('TortoiseSVN', 'TortoiseSVN', $TortoiseSVN['zzz'], $tsvn_var);\r
  83 print_all_stats($TortoiseSVN, $tsvn_var);\r
  84 print_table_footer();\r
  85 \r
  86 // Merge translation and country information into one array\r
  87 $TortoiseMerge = array_merge_recursive($countries, $TortoiseMerge);\r
  88 \r
  89 // Convert Data into a list of columns\r
  90 foreach ($TortoiseMerge as $key => $row) {\r
  91    $mpotfile[$key] = abs($row[0]);\r
  92    $mcountry[$key] = $row[3];\r
  93    $merrors[$key] = $row[5];\r
  94    $mtotal[$key] = $row[6];\r
  95    $mtransl[$key] = $row[7];\r
  96    $mfuzzy[$key] = $row[8];\r
  97    $muntrans[$key] = $row[9];\r
  98    $maccel[$key] = $row[10];\r
  99    $mname[$key] = $row[11];\r
 100    $mfdate[$key] = $row[12];\r
 101 }\r
 102 \r
 103 // Add $TortoiseMerge as the last parameter, to sort by the common key\r
 104 array_multisort($mpotfile, $mcountry, $mtransl, $muntrans, $mfuzzy, $maccel, $TortoiseMerge);\r
 105 \r
 106 print_table_header('TortoiseMerge', 'TortoiseMerge', $TortoiseMerge['zzz'], $tsvn_var);\r
 107 print_all_stats($TortoiseMerge, $tsvn_var);\r
 108 print_table_footer();\r
 109 \r
 110 print_footer($tsvn_var);\r
 111 \r
 112 ?>\r