Automatic upgrade for earlier Postgres versions
[lhc/web/wiklou.git] / maintenance / unusedMessages.php
1 <?php
2 /**
3 * Prints out messages in localisation files that are no longer used.
4 *
5 * @package MediaWiki
6 * @subpackage Maintenance
7 */
8
9 require_once('commandLine.inc');
10
11 if ( isset( $args[0] ) ) {
12 $code = $args[0];
13 } else {
14 $code = $wgLang->getCode();
15 }
16
17 if ( $code == 'en' ) {
18 print "Current selected language is English. Cannot check translations.\n";
19 exit();
20 }
21
22 $filename = Language::getFileName( "$IP/languages/Messages", $code, '.php' );
23 if ( file_exists( $filename ) ) {
24 require( $filename );
25 } else {
26 $messages = array();
27 }
28
29 $count = $total = 0;
30 $wgEnglishMessages = Language::getMessagesFor( 'en' );
31 $wgLocalMessages = $messages;
32
33 foreach ( $wgLocalMessages as $key => $msg ) {
34 ++$total;
35 if ( !isset( $wgEnglishMessages[$key] ) ) {
36 print "* $key\n";
37 ++$count;
38 }
39 }
40
41 print "{$count} messages of {$total} are unused in the language {$code}\n";
42 ?>