OSDN Git Service

Fixed issue #209: High CPU usage in tortoiseproc.exe & Append text to edit ctrl
[tortoisegit/TortoiseGitJp.git] / 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