switch off message expansion. Messages seem to be expanded in the db, didn't find...
[lhc/web/wiklou.git] / includes / SpecialAllmessages.php
1 <?php
2
3 function wfSpecialAllmessages()
4 {
5 global $wgOut, $wgAllMessagesEn, $wgRequest, $wgMessageCache;
6 $ot = $wgRequest->getText('ot');
7 $mwMsg =& MagicWord::get( MAG_MSG );
8 set_time_limit(0);
9 $navText = str_replace( "$1", $mwMsg->getSynonym( 0 ), wfMsg("allmessagestext" ) );
10
11 $first = true;
12 $sortedArray = $wgAllMessagesEn;
13 ksort( $sortedArray );
14 $messages = array();
15 $wgMessageCache->disableTransform();
16 foreach ( $sortedArray as $key => $enMsg ) {
17 $messages[$key]['enmsg'] = $enMsg;
18 $wgMessageCache->disable();
19 $messages[$key]['statmsg'] = wfMsg( $key );
20 $wgMessageCache->enable();
21 $messages[$key]['msg'] = wfMsg ( $key );
22 }
23 if ($ot == 'php') {
24 $navText .= makePhp($messages);
25 $wgOut->addHTML('<pre>'.htmlspecialchars($navText).'</pre>');
26 } else {
27 $navText .= makeWikiText($messages);
28 $wgOut->addWikiText( $navText );
29 }
30 return;
31 }
32 function makePhp($messages) {
33 global $wgLanguageCode;
34 $txt = "\n\n".'$wgAllMessages'.ucfirst($wgLanguageCode).' = array('."\n";
35 foreach( $messages as $key => $m ) {
36 if(strtolower($wgLanguageCode) != 'en' and $m['msg'] == $m['enmsg'] ) {
37 $comment = ' #default';
38 } elseif ($m['msg'] == '&lt;'.$key.'&gt;'){
39 $m['msg'] = '';
40 $comment = ' #empty';
41 } else {
42 $comment = '';
43 }
44 $txt .= "'".$key."' => \"".str_replace('"','\"',$m['msg'])."\",$comment\n";
45 }
46 $txt .= ');';
47 return $txt;
48 }
49
50
51 function makeWikiText($messages) {
52 global $wgLang;
53 $talk = $wgLang->getNsText( NS_TALK );
54 $mwnspace = $wgLang->getNsText( NS_MEDIAWIKI );
55 $mwtalk = $wgLang->getNsText( NS_MEDIAWIKI_TALK );
56 $txt = "
57
58 <table border=1 cellspacing=0 width=100%><tr bgcolor=#b2b2ff><td>
59 '''Name'''
60 </td><td>
61 '''Default text'''
62 </td><td>
63 '''Current text'''
64 </td></tr>";
65 foreach( $messages as $key => $m ) {
66 $titleObj = Title::newFromText( $key );
67 $title = $titleObj->getDBkey();
68
69 $colorIt = ($m['statmsg'] == $m['msg']) ? " bgcolor=\"#f0f0ff\"" : " bgcolor=\"#ffe2e2\"";
70 $message = wfEscapeWikiText( $m['statmsg'] );
71 $mw = wfEscapeWikiText( $m['msg'] );
72
73 $txt .=
74 "<tr$colorIt><td>
75 [[$mwnspace:$title|$key]]<br>
76 [[$mwtalk:$title|$talk]]
77 </td><td>
78 $message
79 </td><td>
80 $mw
81 </td></tr>";
82 }
83 $txt .= "</table>";
84
85 return $txt;
86 }
87
88 ?>