3 * Provide functions to generate a special page
5 * @subpackage SpecialPage
11 function wfSpecialAllmessages() {
12 global $wgOut, $wgAllMessagesEn, $wgRequest, $wgMessageCache, $wgTitle;
14 $fname = "wfSpecialAllMessages";
15 wfProfileIn( $fname );
17 wfProfileIn( "$fname-setup");
18 $ot = $wgRequest->getText( 'ot' );
19 $mwMsg =& MagicWord
::get( MAG_MSG
);
21 $navText = wfMsg( 'allmessagestext', $mwMsg->getSynonym( 0 ) );
23 $sortedArray = $wgAllMessagesEn;
24 ksort( $sortedArray );
26 $wgMessageCache->disableTransform();
28 foreach ( $sortedArray as $key => $enMsg ) {
29 $messages[$key]['enmsg'] = $enMsg;
30 $messages[$key]['statmsg'] = wfMsgNoDbNoConvert( $key );
31 $messages[$key]['msg'] = wfMsgNoConvert ( $key );
34 $wgMessageCache->enableTransform();
35 wfProfileOut( "$fname-setup" );
37 wfProfileIn( "$fname-output" );
39 $navText .= makePhp($messages);
40 $wgOut->addHTML('PHP | <a href="'.$wgTitle->escapeLocalUrl('ot=html').'">HTML</a><pre>'.htmlspecialchars($navText).'</pre>');
42 $wgOut->addHTML( '<a href="'.$wgTitle->escapeLocalUrl('ot=php').'">PHP</a> | HTML' );
43 $wgOut->addWikiText( $navText );
44 $wgOut->addHTML( makeHTMLText( $messages ) );
46 wfProfileOut( "$fname-output" );
48 wfProfileOut( $fname );
54 function makePhp($messages) {
55 global $wgLanguageCode;
56 $txt = "\n\n".'$wgAllMessages'.ucfirst($wgLanguageCode).' = array('."\n";
57 foreach( $messages as $key => $m ) {
58 if(strtolower($wgLanguageCode) != 'en' and $m['msg'] == $m['enmsg'] ) {
59 if (strstr($m['msg'],"\n")) {
66 } elseif ($m['msg'] == '<'.$key.'>'){
72 $txt .= "'".$key."' => \"".str_replace('"','\"',$m['msg'])."\",$comment\n";
81 function makeHTMLText( $messages ) {
82 global $wgLang, $wgUser;
83 $fname = "makeHTMLText";
84 wfProfileIn( $fname );
86 $sk =& $wgUser->getSkin();
87 $talk = $wgLang->getNsText( NS_TALK
);
88 $mwnspace = $wgLang->getNsText( NS_MEDIAWIKI
);
89 $mwtalk = $wgLang->getNsText( NS_MEDIAWIKI_TALK
);
92 <table border='1' cellspacing='0' width='100%'>
93 <tr bgcolor='#b2b2ff'>
99 wfProfileIn( "$fname-check" );
100 # This is a nasty hack to avoid doing independent existence checks
101 # without sending the links and table through the slow wiki parser.
103 NS_MEDIAWIKI
=> array(),
104 NS_MEDIAWIKI_TALK
=> array()
106 $sql = "SELECT cur_namespace,cur_title FROM cur WHERE cur_namespace IN (" . NS_MEDIAWIKI
. ", " . NS_MEDIAWIKI_TALK
. ")";
107 $dbr =& wfGetDB( DB_SLAVE
);
108 $res = $dbr->query( $sql );
109 while( $s = $dbr->fetchObject( $res ) ) {
110 $pageExists[$s->cur_namespace
][$s->cur_title
] = true;
112 $dbr->freeResult( $res );
113 wfProfileOut( "$fname-check" );
115 wfProfileIn( "$fname-output" );
116 foreach( $messages as $key => $m ) {
117 $title = $wgLang->ucfirst( $key );
118 $titleObj =& Title
::makeTitle( NS_MEDIAWIKI
, $title );
119 $talkPage =& Title
::makeTitle( NS_MEDIAWIKI_TALK
, $title );
121 $colorIt = ($m['statmsg'] == $m['msg']) ?
" bgcolor=\"#f0f0ff\"" : " bgcolor=\"#ffe2e2\"";
122 $message = htmlspecialchars( $m['statmsg'] );
123 $mw = htmlspecialchars( $m['msg'] );
125 #$pageLink = $sk->makeLinkObj( $titleObj, htmlspecialchars( $key ) );
126 #$talkLink = $sk->makeLinkObj( $talkPage, htmlspecialchars( $talk ) );
127 if( isset( $pageExists[NS_MEDIAWIKI
][$title] ) ) {
128 $pageLink = $sk->makeKnownLinkObj( $titleObj, htmlspecialchars( $key ) );
130 $pageLink = $sk->makeBrokenLinkObj( $titleObj, htmlspecialchars( $key ) );
132 if( isset( $pageExists[NS_MEDIAWIKI_TALK
][$title] ) ) {
133 $talkLink = $sk->makeKnownLinkObj( $talkPage, htmlspecialchars( $talk ) );
135 $talkLink = $sk->makeBrokenLinkObj( $talkPage, htmlspecialchars( $talk ) );
149 wfProfileOut( "$fname-output" );
151 wfProfileOut( $fname );