3 * Provide functions to generate a special page
5 * @subpackage SpecialPage
11 function wfSpecialAllmessages() {
12 global $wgOut, $wgAllMessagesEn, $wgRequest, $wgMessageCache, $wgTitle;
13 global $wgLanguageCode, $wgContLanguageCode, $wgContLang;
14 global $wgUseDatabaseMessages;
16 if($wgLanguageCode != $wgContLanguageCode &&
17 !in_array($wgLanguageCode, $wgContLang->getVariants())) {
18 $err = wfMsg('allmessagesnotsupportedUI');
19 $wgOut->addHTML( $err );
22 if(!$wgUseDatabaseMessages) {
23 $wgOut->addHTML(wfMsg('allmessagesnotsupportedDB'));
27 $fname = "wfSpecialAllMessages";
28 wfProfileIn( $fname );
30 wfProfileIn( "$fname-setup");
31 $ot = $wgRequest->getText( 'ot' );
32 $mwMsg =& MagicWord
::get( MAG_MSG
);
34 $navText = wfMsg( 'allmessagestext', $mwMsg->getSynonym( 0 ) );
38 $sortedArray = $wgAllMessagesEn;
39 ksort( $sortedArray );
41 $wgMessageCache->disableTransform();
43 foreach ( $sortedArray as $key => $enMsg ) {
44 $messages[$key]['enmsg'] = $enMsg;
45 $messages[$key]['statmsg'] = wfMsgNoDb( $key );
46 $messages[$key]['msg'] = wfMsg ( $key );
49 $wgMessageCache->enableTransform();
50 wfProfileOut( "$fname-setup" );
52 wfProfileIn( "$fname-output" );
54 $navText .= makePhp($messages);
55 $wgOut->addHTML('PHP | <a href="'.$wgTitle->escapeLocalUrl('ot=html').'">HTML</a><pre>'.htmlspecialchars($navText).'</pre>');
57 $wgOut->addHTML( '<a href="'.$wgTitle->escapeLocalUrl('ot=php').'">PHP</a> | HTML' );
58 $wgOut->addWikiText( $navText );
59 $wgOut->addHTML( makeHTMLText( $messages ) );
61 wfProfileOut( "$fname-output" );
63 wfProfileOut( $fname );
69 function makePhp($messages) {
70 global $wgLanguageCode;
71 $txt = "\n\n".'$wgAllMessages'.ucfirst($wgLanguageCode).' = array('."\n";
72 foreach( $messages as $key => $m ) {
73 if(strtolower($wgLanguageCode) != 'en' and $m['msg'] == $m['enmsg'] ) {
74 if (strstr($m['msg'],"\n")) {
81 } elseif ($m['msg'] == '<'.$key.'>'){
87 $txt .= "'".$key."' => \"".str_replace('"','\"',$m['msg'])."\",$comment\n";
96 function makeHTMLText( $messages ) {
97 global $wgLang, $wgUser, $wgLanguageCode;
98 $fname = "makeHTMLText";
99 wfProfileIn( $fname );
101 $sk =& $wgUser->getSkin();
102 $talk = $wgLang->getNsText( NS_TALK
);
103 $mwnspace = $wgLang->getNsText( NS_MEDIAWIKI
);
104 $mwtalk = $wgLang->getNsText( NS_MEDIAWIKI_TALK
);
107 <table border='1' cellspacing='0' width='100%'>
108 <tr bgcolor='#b2b2ff'>
110 <th>Default text</th>
111 <th>Current text</th>
114 wfProfileIn( "$fname-check" );
115 # This is a nasty hack to avoid doing independent existence checks
116 # without sending the links and table through the slow wiki parser.
118 NS_MEDIAWIKI
=> array(),
119 NS_MEDIAWIKI_TALK
=> array()
121 $sql = "SELECT cur_namespace,cur_title FROM cur WHERE cur_namespace IN (" . NS_MEDIAWIKI
. ", " . NS_MEDIAWIKI_TALK
. ")";
122 $dbr =& wfGetDB( DB_SLAVE
);
123 $res = $dbr->query( $sql );
124 while( $s = $dbr->fetchObject( $res ) ) {
125 $pageExists[$s->cur_namespace
][$s->cur_title
] = true;
127 $dbr->freeResult( $res );
128 wfProfileOut( "$fname-check" );
130 wfProfileIn( "$fname-output" );
131 foreach( $messages as $key => $m ) {
133 $title = $wgLang->ucfirst( $key )."/$wgLanguageCode";
134 $titleObj =& Title
::makeTitle( NS_MEDIAWIKI
, $title );
135 $talkPage =& Title
::makeTitle( NS_MEDIAWIKI_TALK
, $title );
137 $colorIt = ($m['statmsg'] == $m['msg']) ?
" bgcolor=\"#f0f0ff\"" : " bgcolor=\"#ffe2e2\"";
138 $message = htmlspecialchars( $m['statmsg'] );
139 $mw = htmlspecialchars( $m['msg'] );
141 #$pageLink = $sk->makeLinkObj( $titleObj, htmlspecialchars( $key ) );
142 #$talkLink = $sk->makeLinkObj( $talkPage, htmlspecialchars( $talk ) );
143 if( isset( $pageExists[NS_MEDIAWIKI
][$title] ) ) {
144 $pageLink = $sk->makeKnownLinkObj( $titleObj, htmlspecialchars( $key ) );
146 $pageLink = $sk->makeBrokenLinkObj( $titleObj, htmlspecialchars( $key ) );
148 if( isset( $pageExists[NS_MEDIAWIKI_TALK
][$title] ) ) {
149 $talkLink = $sk->makeKnownLinkObj( $talkPage, htmlspecialchars( $talk ) );
151 $talkLink = $sk->makeBrokenLinkObj( $talkPage, htmlspecialchars( $talk ) );
165 wfProfileOut( "$fname-output" );
167 wfProfileOut( $fname );