(bug 16589) CoreParserFunctions error causes 500
[lhc/web/wiklou.git] / includes / parser / CoreParserFunctions.php
1 <?php
2
3 /**
4 * Various core parser functions, registered in Parser::firstCallInit()
5 * @ingroup Parser
6 */
7 class CoreParserFunctions {
8 static function register( $parser ) {
9 global $wgAllowDisplayTitle, $wgAllowSlowParserFunctions;
10
11 # Syntax for arguments (see self::setFunctionHook):
12 # "name for lookup in localized magic words array",
13 # function callback,
14 # optional SFH_NO_HASH to omit the hash from calls (e.g. {{int:...}
15 # instead of {{#int:...}})
16
17 $parser->setFunctionHook( 'int', array( __CLASS__, 'intFunction' ), SFH_NO_HASH );
18 $parser->setFunctionHook( 'ns', array( __CLASS__, 'ns' ), SFH_NO_HASH );
19 $parser->setFunctionHook( 'urlencode', array( __CLASS__, 'urlencode' ), SFH_NO_HASH );
20 $parser->setFunctionHook( 'lcfirst', array( __CLASS__, 'lcfirst' ), SFH_NO_HASH );
21 $parser->setFunctionHook( 'ucfirst', array( __CLASS__, 'ucfirst' ), SFH_NO_HASH );
22 $parser->setFunctionHook( 'lc', array( __CLASS__, 'lc' ), SFH_NO_HASH );
23 $parser->setFunctionHook( 'uc', array( __CLASS__, 'uc' ), SFH_NO_HASH );
24 $parser->setFunctionHook( 'localurl', array( __CLASS__, 'localurl' ), SFH_NO_HASH );
25 $parser->setFunctionHook( 'localurle', array( __CLASS__, 'localurle' ), SFH_NO_HASH );
26 $parser->setFunctionHook( 'fullurl', array( __CLASS__, 'fullurl' ), SFH_NO_HASH );
27 $parser->setFunctionHook( 'fullurle', array( __CLASS__, 'fullurle' ), SFH_NO_HASH );
28 $parser->setFunctionHook( 'formatnum', array( __CLASS__, 'formatnum' ), SFH_NO_HASH );
29 $parser->setFunctionHook( 'grammar', array( __CLASS__, 'grammar' ), SFH_NO_HASH );
30 $parser->setFunctionHook( 'plural', array( __CLASS__, 'plural' ), SFH_NO_HASH );
31 $parser->setFunctionHook( 'numberofpages', array( __CLASS__, 'numberofpages' ), SFH_NO_HASH );
32 $parser->setFunctionHook( 'numberofusers', array( __CLASS__, 'numberofusers' ), SFH_NO_HASH );
33 $parser->setFunctionHook( 'numberofarticles', array( __CLASS__, 'numberofarticles' ), SFH_NO_HASH );
34 $parser->setFunctionHook( 'numberoffiles', array( __CLASS__, 'numberoffiles' ), SFH_NO_HASH );
35 $parser->setFunctionHook( 'numberofadmins', array( __CLASS__, 'numberofadmins' ), SFH_NO_HASH );
36 $parser->setFunctionHook( 'numberingroup', array( __CLASS__, 'numberingroup' ), SFH_NO_HASH );
37 $parser->setFunctionHook( 'numberofedits', array( __CLASS__, 'numberofedits' ), SFH_NO_HASH );
38 $parser->setFunctionHook( 'numberofviews', array( __CLASS__, 'numberofviews' ), SFH_NO_HASH );
39 $parser->setFunctionHook( 'language', array( __CLASS__, 'language' ), SFH_NO_HASH );
40 $parser->setFunctionHook( 'padleft', array( __CLASS__, 'padleft' ), SFH_NO_HASH );
41 $parser->setFunctionHook( 'padright', array( __CLASS__, 'padright' ), SFH_NO_HASH );
42 $parser->setFunctionHook( 'anchorencode', array( __CLASS__, 'anchorencode' ), SFH_NO_HASH );
43 $parser->setFunctionHook( 'special', array( __CLASS__, 'special' ) );
44 $parser->setFunctionHook( 'defaultsort', array( __CLASS__, 'defaultsort' ), SFH_NO_HASH );
45 $parser->setFunctionHook( 'filepath', array( __CLASS__, 'filepath' ), SFH_NO_HASH );
46 $parser->setFunctionHook( 'pagesincategory', array( __CLASS__, 'pagesincategory' ), SFH_NO_HASH );
47 $parser->setFunctionHook( 'pagesize', array( __CLASS__, 'pagesize' ), SFH_NO_HASH );
48 $parser->setFunctionHook( 'tag', array( __CLASS__, 'tagObj' ), SFH_OBJECT_ARGS );
49
50 if ( $wgAllowDisplayTitle ) {
51 $parser->setFunctionHook( 'displaytitle', array( __CLASS__, 'displaytitle' ), SFH_NO_HASH );
52 }
53 if ( $wgAllowSlowParserFunctions ) {
54 $parser->setFunctionHook( 'pagesinnamespace', array( __CLASS__, 'pagesinnamespace' ), SFH_NO_HASH );
55 }
56 }
57
58 static function intFunction( $parser, $part1 = '' /*, ... */ ) {
59 if ( strval( $part1 ) !== '' ) {
60 $args = array_slice( func_get_args(), 2 );
61 $message = wfMsgGetKey( $part1, true, false, false );
62 $message = wfMsgReplaceArgs( $message, $args );
63 $message = $parser->replaceVariables( $message ); // like $wgMessageCache->transform()
64 return $message;
65 } else {
66 return array( 'found' => false );
67 }
68 }
69
70 static function ns( $parser, $part1 = '' ) {
71 global $wgContLang;
72 if ( intval( $part1 ) || $part1 == "0" ) {
73 $index = intval( $part1 );
74 } else {
75 $index = $wgContLang->getNsIndex( str_replace( ' ', '_', $part1 ) );
76 }
77 if ( $index !== false ) {
78 return $wgContLang->getFormattedNsText( $index );
79 } else {
80 return array( 'found' => false );
81 }
82 }
83
84 static function urlencode( $parser, $s = '' ) {
85 return urlencode( $s );
86 }
87
88 static function lcfirst( $parser, $s = '' ) {
89 global $wgContLang;
90 return $wgContLang->lcfirst( $s );
91 }
92
93 static function ucfirst( $parser, $s = '' ) {
94 global $wgContLang;
95 return $wgContLang->ucfirst( $s );
96 }
97
98 static function lc( $parser, $s = '' ) {
99 global $wgContLang;
100 if ( is_callable( array( $parser, 'markerSkipCallback' ) ) ) {
101 return $parser->markerSkipCallback( $s, array( $wgContLang, 'lc' ) );
102 } else {
103 return $wgContLang->lc( $s );
104 }
105 }
106
107 static function uc( $parser, $s = '' ) {
108 global $wgContLang;
109 if ( is_callable( array( $parser, 'markerSkipCallback' ) ) ) {
110 return $parser->markerSkipCallback( $s, array( $wgContLang, 'uc' ) );
111 } else {
112 return $wgContLang->uc( $s );
113 }
114 }
115
116 static function localurl( $parser, $s = '', $arg = null ) { return self::urlFunction( 'getLocalURL', $s, $arg ); }
117 static function localurle( $parser, $s = '', $arg = null ) { return self::urlFunction( 'escapeLocalURL', $s, $arg ); }
118 static function fullurl( $parser, $s = '', $arg = null ) { return self::urlFunction( 'getFullURL', $s, $arg ); }
119 static function fullurle( $parser, $s = '', $arg = null ) { return self::urlFunction( 'escapeFullURL', $s, $arg ); }
120
121 static function urlFunction( $func, $s = '', $arg = null ) {
122 $title = Title::newFromText( $s );
123 # Due to order of execution of a lot of bits, the values might be encoded
124 # before arriving here; if that's true, then the title can't be created
125 # and the variable will fail. If we can't get a decent title from the first
126 # attempt, url-decode and try for a second.
127 if( is_null( $title ) )
128 $title = Title::newFromUrl( urldecode( $s ) );
129 if ( !is_null( $title ) ) {
130 if ( !is_null( $arg ) ) {
131 $text = $title->$func( $arg );
132 } else {
133 $text = $title->$func();
134 }
135 return $text;
136 } else {
137 return array( 'found' => false );
138 }
139 }
140
141 static function formatNum( $parser, $num = '', $raw = null) {
142 if ( self::israw( $raw ) ) {
143 return $parser->getFunctionLang()->parseFormattedNumber( $num );
144 } else {
145 return $parser->getFunctionLang()->formatNum( $num );
146 }
147 }
148
149 static function grammar( $parser, $case = '', $word = '' ) {
150 return $parser->getFunctionLang()->convertGrammar( $word, $case );
151 }
152
153 static function plural( $parser, $text = '') {
154 $forms = array_slice( func_get_args(), 2);
155 $text = $parser->getFunctionLang()->parseFormattedNumber( $text );
156 return $parser->getFunctionLang()->convertPlural( $text, $forms );
157 }
158
159 /**
160 * Override the title of the page when viewed, provided we've been given a
161 * title which will normalise to the canonical title
162 *
163 * @param Parser $parser Parent parser
164 * @param string $text Desired title text
165 * @return string
166 */
167 static function displaytitle( $parser, $text = '' ) {
168 global $wgRestrictDisplayTitle;
169 $text = trim( Sanitizer::decodeCharReferences( $text ) );
170
171 if ( !$wgRestrictDisplayTitle ) {
172 $parser->mOutput->setDisplayTitle( $text );
173 } else {
174 $title = Title::newFromText( $text );
175 if( $title instanceof Title && $title->getFragment() == '' && $title->equals( $parser->mTitle ) )
176 $parser->mOutput->setDisplayTitle( $text );
177 }
178 return '';
179 }
180
181 static function isRaw( $param ) {
182 static $mwRaw;
183 if ( !$mwRaw ) {
184 $mwRaw =& MagicWord::get( 'rawsuffix' );
185 }
186 if ( is_null( $param ) ) {
187 return false;
188 } else {
189 return $mwRaw->match( $param );
190 }
191 }
192
193 static function formatRaw( $num, $raw ) {
194 if( self::isRaw( $raw ) ) {
195 return $num;
196 } else {
197 global $wgContLang;
198 return $wgContLang->formatNum( $num );
199 }
200 }
201 static function numberofpages( $parser, $raw = null ) {
202 return self::formatRaw( SiteStats::pages(), $raw );
203 }
204 static function numberofusers( $parser, $raw = null ) {
205 return self::formatRaw( SiteStats::users(), $raw );
206 }
207 static function numberofarticles( $parser, $raw = null ) {
208 return self::formatRaw( SiteStats::articles(), $raw );
209 }
210 static function numberoffiles( $parser, $raw = null ) {
211 return self::formatRaw( SiteStats::images(), $raw );
212 }
213 static function numberofadmins( $parser, $raw = null ) {
214 return self::formatRaw( SiteStats::numberingroup('sysop'), $raw );
215 }
216 static function numberofedits( $parser, $raw = null ) {
217 return self::formatRaw( SiteStats::edits(), $raw );
218 }
219 static function numberofviews( $parser, $raw = null ) {
220 return self::formatRaw( SiteStats::views(), $raw );
221 }
222 static function pagesinnamespace( $parser, $namespace = 0, $raw = null ) {
223 return self::formatRaw( SiteStats::pagesInNs( intval( $namespace ) ), $raw );
224 }
225 static function numberingroup( $parser, $name = '', $raw = null) {
226 return self::formatRaw( SiteStats::numberingroup( strtolower( $name ) ), $raw );
227 }
228
229 /**
230 * Return the number of pages in the given category, or 0 if it's nonexis-
231 * tent. This is an expensive parser function and can't be called too many
232 * times per page.
233 */
234 static function pagesincategory( $parser, $name = '', $raw = null ) {
235 static $cache = array();
236 $category = Category::newFromName( $name );
237
238 if( !is_object( $category ) ) {
239 $cache[$name] = 0;
240 return self::formatRaw( 0, $raw );
241 }
242
243 # Normalize name for cache
244 $name = $category->getName();
245
246 $count = 0;
247 if( isset( $cache[$name] ) ) {
248 $count = $cache[$name];
249 } elseif( $parser->incrementExpensiveFunctionCount() ) {
250 $count = $cache[$name] = (int)$category->getPageCount();
251 }
252 return self::formatRaw( $count, $raw );
253 }
254
255 /**
256 * Return the size of the given page, or 0 if it's nonexistent. This is an
257 * expensive parser function and can't be called too many times per page.
258 *
259 * @FIXME This doesn't work correctly on preview for getting the size of
260 * the current page.
261 * @FIXME Title::getLength() documentation claims that it adds things to
262 * the link cache, so the local cache here should be unnecessary, but in
263 * fact calling getLength() repeatedly for the same $page does seem to
264 * run one query for each call?
265 */
266 static function pagesize( $parser, $page = '', $raw = null ) {
267 static $cache = array();
268 $title = Title::newFromText($page);
269
270 if( !is_object( $title ) ) {
271 $cache[$page] = 0;
272 return self::formatRaw( 0, $raw );
273 }
274
275 # Normalize name for cache
276 $page = $title->getPrefixedText();
277
278 $length = 0;
279 if( isset( $cache[$page] ) ) {
280 $length = $cache[$page];
281 } elseif( $parser->incrementExpensiveFunctionCount() ) {
282 $length = $cache[$page] = $title->getLength();
283
284 // Register dependency in templatelinks
285 $id = $title->getArticleId();
286 $rev = Revision::newFromTitle($title);
287 $parser->mOutput->addTemplate( $title, $id, $rev->getId() );
288 }
289 return self::formatRaw( $length, $raw );
290 }
291
292 static function language( $parser, $arg = '' ) {
293 global $wgContLang;
294 $lang = $wgContLang->getLanguageName( strtolower( $arg ) );
295 return $lang != '' ? $lang : $arg;
296 }
297
298 static function pad( $string = '', $length = 0, $char = 0, $direction = STR_PAD_RIGHT ) {
299 $length = min( max( $length, 0 ), 500 );
300 $char = substr( $char, 0, 1 );
301 return ( $string !== '' && (int)$length > 0 && strlen( trim( (string)$char ) ) > 0 )
302 ? str_pad( $string, $length, (string)$char, $direction )
303 : $string;
304 }
305
306 static function padleft( $parser, $string = '', $length = 0, $char = 0 ) {
307 return self::pad( $string, $length, $char, STR_PAD_LEFT );
308 }
309
310 static function padright( $parser, $string = '', $length = 0, $char = 0 ) {
311 return self::pad( $string, $length, $char );
312 }
313
314 static function anchorencode( $parser, $text ) {
315 $a = urlencode( $text );
316 $a = strtr( $a, array( '%' => '.', '+' => '_' ) );
317 # leave colons alone, however
318 $a = str_replace( '.3A', ':', $a );
319 return $a;
320 }
321
322 static function special( $parser, $text ) {
323 $title = SpecialPage::getTitleForAlias( $text );
324 if ( $title ) {
325 return $title->getPrefixedText();
326 } else {
327 return wfMsgForContent( 'nosuchspecialpage' );
328 }
329 }
330
331 public static function defaultsort( $parser, $text ) {
332 $text = trim( $text );
333 if( strlen( $text ) == 0 )
334 return '';
335 $old = $parser->getCustomDefaultSort();
336 $parser->setDefaultSort( $text );
337 if( $old === false || $old == $text )
338 return '';
339 else
340 return( '<span class="error">' .
341 wfMsg( 'duplicate-defaultsort',
342 htmlspecialchars( $old ),
343 htmlspecialchars( $text ) ) .
344 '</span>' );
345 }
346
347 public static function filepath( $parser, $name='', $option='' ) {
348 $file = wfFindFile( $name );
349 if( $file ) {
350 $url = $file->getFullUrl();
351 if( $option == 'nowiki' ) {
352 return "<nowiki>$url</nowiki>";
353 }
354 return $url;
355 } else {
356 return '';
357 }
358 }
359
360 /**
361 * Parser function to extension tag adaptor
362 */
363 public static function tagObj( $parser, $frame, $args ) {
364 $xpath = false;
365 if ( !count( $args ) ) {
366 return '';
367 }
368 $tagName = strtolower( trim( $frame->expand( array_shift( $args ) ) ) );
369
370 if ( count( $args ) ) {
371 $inner = $frame->expand( array_shift( $args ) );
372 } else {
373 $inner = null;
374 }
375
376 $stripList = $parser->getStripList();
377 if ( !in_array( $tagName, $stripList ) ) {
378 return '<span class="error">' .
379 wfMsg( 'unknown_extension_tag', $tagName ) .
380 '</span>';
381 }
382
383 $attributes = array();
384 foreach ( $args as $arg ) {
385 $bits = $arg->splitArg();
386 if ( strval( $bits['index'] ) === '' ) {
387 $name = trim( $frame->expand( $bits['name'], PPFrame::STRIP_COMMENTS ) );
388 $value = trim( $frame->expand( $bits['value'] ) );
389 if ( preg_match( '/^(?:["\'](.+)["\']|""|\'\')$/s', $value, $m ) ) {
390 $value = isset( $m[1] ) ? $m[1] : '';
391 }
392 $attributes[$name] = $value;
393 }
394 }
395
396 $params = array(
397 'name' => $tagName,
398 'inner' => $inner,
399 'attributes' => $attributes,
400 'close' => "</$tagName>",
401 );
402 return $parser->extensionSubstitution( $params, $frame );
403 }
404 }