Initial stab at responsive images for screen densities.
[lhc/web/wiklou.git] / tests / phpunit / includes / parser / NewParserTest.php
1 <?php
2
3 /**
4 * Although marked as a stub, can work independently.
5 *
6 * @group Database
7 * @group Parser
8 * @group Stub
9 */
10 class NewParserTest extends MediaWikiTestCase {
11 static protected $articles = array(); // Array of test articles defined by the tests
12 /* The data provider is run on a different instance than the test, so it must be static
13 * When running tests from several files, all tests will see all articles.
14 */
15 static protected $backendToUse;
16
17 public $keepUploads = false;
18 public $runDisabled = false;
19 public $regex = '';
20 public $showProgress = true;
21 public $savedInitialGlobals = array();
22 public $savedWeirdGlobals = array();
23 public $savedGlobals = array();
24 public $hooks = array();
25 public $functionHooks = array();
26
27 //Fuzz test
28 public $maxFuzzTestLength = 300;
29 public $fuzzSeed = 0;
30 public $memoryLimit = 50;
31
32 protected $file = false;
33
34 protected function setUp() {
35 global $wgContLang, $wgNamespaceProtection, $wgNamespaceAliases;
36 global $wgHooks, $IP;
37 $wgContLang = Language::factory( 'en' );
38
39 //Setup CLI arguments
40 if ( $this->getCliArg( 'regex=' ) ) {
41 $this->regex = $this->getCliArg( 'regex=' );
42 } else {
43 # Matches anything
44 $this->regex = '';
45 }
46
47 $this->keepUploads = $this->getCliArg( 'keep-uploads' );
48
49 $tmpGlobals = array();
50
51 $tmpGlobals['wgScript'] = '/index.php';
52 $tmpGlobals['wgScriptPath'] = '/';
53 $tmpGlobals['wgArticlePath'] = '/wiki/$1';
54 $tmpGlobals['wgStyleSheetPath'] = '/skins';
55 $tmpGlobals['wgStylePath'] = '/skins';
56 $tmpGlobals['wgThumbnailScriptPath'] = false;
57 $tmpGlobals['wgLocalFileRepo'] = array(
58 'class' => 'LocalRepo',
59 'name' => 'local',
60 'url' => 'http://example.com/images',
61 'hashLevels' => 2,
62 'transformVia404' => false,
63 'backend' => 'local-backend'
64 );
65 $tmpGlobals['wgForeignFileRepos'] = array();
66 $tmpGlobals['wgEnableParserCache'] = false;
67 $tmpGlobals['wgHooks'] = $wgHooks;
68 $tmpGlobals['wgDeferredUpdateList'] = array();
69 $tmpGlobals['wgMemc'] = wfGetMainCache();
70 $tmpGlobals['messageMemc'] = wfGetMessageCacheStorage();
71 $tmpGlobals['parserMemc'] = wfGetParserCacheStorage();
72
73 // $tmpGlobals['wgContLang'] = new StubContLang;
74 $tmpGlobals['wgUser'] = new User;
75 $context = new RequestContext();
76 $tmpGlobals['wgLang'] = $context->getLanguage();
77 $tmpGlobals['wgOut'] = $context->getOutput();
78 $tmpGlobals['wgParser'] = new StubObject( 'wgParser', $GLOBALS['wgParserConf']['class'], array( $GLOBALS['wgParserConf'] ) );
79 $tmpGlobals['wgRequest'] = $context->getRequest();
80
81 if ( $GLOBALS['wgStyleDirectory'] === false ) {
82 $tmpGlobals['wgStyleDirectory'] = "$IP/skins";
83 }
84
85
86 foreach ( $tmpGlobals as $var => $val ) {
87 if ( array_key_exists( $var, $GLOBALS ) ) {
88 $this->savedInitialGlobals[$var] = $GLOBALS[$var];
89 }
90
91 $GLOBALS[$var] = $val;
92 }
93
94 $this->savedWeirdGlobals['mw_namespace_protection'] = $wgNamespaceProtection[NS_MEDIAWIKI];
95 $this->savedWeirdGlobals['image_alias'] = $wgNamespaceAliases['Image'];
96 $this->savedWeirdGlobals['image_talk_alias'] = $wgNamespaceAliases['Image_talk'];
97
98 $wgNamespaceProtection[NS_MEDIAWIKI] = 'editinterface';
99 $wgNamespaceAliases['Image'] = NS_FILE;
100 $wgNamespaceAliases['Image_talk'] = NS_FILE_TALK;
101 }
102
103 protected function tearDown() {
104 foreach ( $this->savedInitialGlobals as $var => $val ) {
105 $GLOBALS[$var] = $val;
106 }
107
108 global $wgNamespaceProtection, $wgNamespaceAliases;
109
110 $wgNamespaceProtection[NS_MEDIAWIKI] = $this->savedWeirdGlobals['mw_namespace_protection'];
111 $wgNamespaceAliases['Image'] = $this->savedWeirdGlobals['image_alias'];
112 $wgNamespaceAliases['Image_talk'] = $this->savedWeirdGlobals['image_talk_alias'];
113
114 // Restore backends
115 RepoGroup::destroySingleton();
116 FileBackendGroup::destroySingleton();
117 }
118
119 function addDBData() {
120 $this->tablesUsed[] = 'site_stats';
121 $this->tablesUsed[] = 'interwiki';
122 # disabled for performance
123 #$this->tablesUsed[] = 'image';
124
125 # Hack: insert a few Wikipedia in-project interwiki prefixes,
126 # for testing inter-language links
127 $this->db->insert( 'interwiki', array(
128 array( 'iw_prefix' => 'wikipedia',
129 'iw_url' => 'http://en.wikipedia.org/wiki/$1',
130 'iw_api' => '',
131 'iw_wikiid' => '',
132 'iw_local' => 0 ),
133 array( 'iw_prefix' => 'meatball',
134 'iw_url' => 'http://www.usemod.com/cgi-bin/mb.pl?$1',
135 'iw_api' => '',
136 'iw_wikiid' => '',
137 'iw_local' => 0 ),
138 array( 'iw_prefix' => 'zh',
139 'iw_url' => 'http://zh.wikipedia.org/wiki/$1',
140 'iw_api' => '',
141 'iw_wikiid' => '',
142 'iw_local' => 1 ),
143 array( 'iw_prefix' => 'es',
144 'iw_url' => 'http://es.wikipedia.org/wiki/$1',
145 'iw_api' => '',
146 'iw_wikiid' => '',
147 'iw_local' => 1 ),
148 array( 'iw_prefix' => 'fr',
149 'iw_url' => 'http://fr.wikipedia.org/wiki/$1',
150 'iw_api' => '',
151 'iw_wikiid' => '',
152 'iw_local' => 1 ),
153 array( 'iw_prefix' => 'ru',
154 'iw_url' => 'http://ru.wikipedia.org/wiki/$1',
155 'iw_api' => '',
156 'iw_wikiid' => '',
157 'iw_local' => 1 ),
158 /**
159 * @todo Fixme! Why are we inserting duplicate data here? Shouldn't
160 * need this IGNORE or shouldn't need the insert at all.
161 */
162 ), __METHOD__, array( 'IGNORE' )
163 );
164
165
166 # Update certain things in site_stats
167 $this->db->insert( 'site_stats',
168 array( 'ss_row_id' => 1, 'ss_images' => 2, 'ss_good_articles' => 1 ),
169 __METHOD__
170 );
171
172 # Reinitialise the LocalisationCache to match the database state
173 Language::getLocalisationCache()->unloadAll();
174
175 # Clear the message cache
176 MessageCache::singleton()->clear();
177
178 $user = User::newFromId( 0 );
179 LinkCache::singleton()->clear(); # Avoids the odd failure at creating the nullRevision
180
181 # Upload DB table entries for files.
182 # We will upload the actual files later. Note that if anything causes LocalFile::load()
183 # to be triggered before then, it will break via maybeUpgrade() setting the fileExists
184 # member to false and storing it in cache.
185 $image = wfLocalFile( Title::makeTitle( NS_FILE, 'Foobar.jpg' ) );
186 if ( !$this->db->selectField( 'image', '1', array( 'img_name' => $image->getName() ) ) ) {
187 $image->recordUpload2(
188 '', // archive name
189 'Upload of some lame file',
190 'Some lame file',
191 array(
192 'size' => 12345,
193 'width' => 1941,
194 'height' => 220,
195 'bits' => 24,
196 'media_type' => MEDIATYPE_BITMAP,
197 'mime' => 'image/jpeg',
198 'metadata' => serialize( array() ),
199 'sha1' => wfBaseConvert( '', 16, 36, 31 ),
200 'fileExists' => true ),
201 $this->db->timestamp( '20010115123500' ), $user
202 );
203 }
204
205 # This image will be blacklisted in [[MediaWiki:Bad image list]]
206 $image = wfLocalFile( Title::makeTitle( NS_FILE, 'Bad.jpg' ) );
207 if ( !$this->db->selectField( 'image', '1', array( 'img_name' => $image->getName() ) ) ) {
208 $image->recordUpload2(
209 '', // archive name
210 'zomgnotcensored',
211 'Borderline image',
212 array(
213 'size' => 12345,
214 'width' => 320,
215 'height' => 240,
216 'bits' => 24,
217 'media_type' => MEDIATYPE_BITMAP,
218 'mime' => 'image/jpeg',
219 'metadata' => serialize( array() ),
220 'sha1' => wfBaseConvert( '', 16, 36, 31 ),
221 'fileExists' => true ),
222 $this->db->timestamp( '20010115123500' ), $user
223 );
224 }
225 }
226
227
228
229
230 //ParserTest setup/teardown functions
231
232 /**
233 * Set up the global variables for a consistent environment for each test.
234 * Ideally this should replace the global configuration entirely.
235 */
236 protected function setupGlobals( $opts = '', $config = '' ) {
237 global $wgFileBackends;
238 # Find out values for some special options.
239 $lang =
240 self::getOptionValue( 'language', $opts, 'en' );
241 $variant =
242 self::getOptionValue( 'variant', $opts, false );
243 $maxtoclevel =
244 self::getOptionValue( 'wgMaxTocLevel', $opts, 999 );
245 $linkHolderBatchSize =
246 self::getOptionValue( 'wgLinkHolderBatchSize', $opts, 1000 );
247
248 $uploadDir = $this->getUploadDir();
249 if ( $this->getCliArg( 'use-filebackend=' ) ) {
250 if ( self::$backendToUse ) {
251 $backend = self::$backendToUse;
252 } else {
253 $name = $this->getCliArg( 'use-filebackend=' );
254 $useConfig = array();
255 foreach ( $wgFileBackends as $conf ) {
256 if ( $conf['name'] == $name ) {
257 $useConfig = $conf;
258 }
259 }
260 $useConfig['name'] = 'local-backend'; // swap name
261 $class = $conf['class'];
262 self::$backendToUse = new $class( $useConfig );
263 $backend = self::$backendToUse;
264 }
265 } else {
266 $backend = new FSFileBackend( array(
267 'name' => 'local-backend',
268 'lockManager' => 'nullLockManager',
269 'containerPaths' => array(
270 'local-public' => "$uploadDir",
271 'local-thumb' => "$uploadDir/thumb",
272 )
273 ) );
274 }
275
276 $settings = array(
277 'wgServer' => 'http://Britney-Spears',
278 'wgScript' => '/index.php',
279 'wgScriptPath' => '/',
280 'wgArticlePath' => '/wiki/$1',
281 'wgExtensionAssetsPath' => '/extensions',
282 'wgActionPaths' => array(),
283 'wgLocalFileRepo' => array(
284 'class' => 'LocalRepo',
285 'name' => 'local',
286 'url' => 'http://example.com/images',
287 'hashLevels' => 2,
288 'transformVia404' => false,
289 'backend' => $backend
290 ),
291 'wgEnableUploads' => self::getOptionValue( 'wgEnableUploads', $opts, true ),
292 'wgStylePath' => '/skins',
293 'wgStyleSheetPath' => '/skins',
294 'wgSitename' => 'MediaWiki',
295 'wgLanguageCode' => $lang,
296 'wgDBprefix' => $this->db->getType() != 'oracle' ? 'unittest_' : 'ut_',
297 'wgRawHtml' => isset( $opts['rawhtml'] ),
298 'wgLang' => null,
299 'wgContLang' => null,
300 'wgNamespacesWithSubpages' => array( 0 => isset( $opts['subpage'] ) ),
301 'wgMaxTocLevel' => $maxtoclevel,
302 'wgCapitalLinks' => true,
303 'wgNoFollowLinks' => true,
304 'wgNoFollowDomainExceptions' => array(),
305 'wgThumbnailScriptPath' => false,
306 'wgUseImageResize' => true,
307 'wgUseTeX' => isset( $opts['math'] ),
308 'wgMathDirectory' => $uploadDir . '/math',
309 'wgLocaltimezone' => 'UTC',
310 'wgAllowExternalImages' => true,
311 'wgUseTidy' => false,
312 'wgDefaultLanguageVariant' => $variant,
313 'wgVariantArticlePath' => false,
314 'wgGroupPermissions' => array( '*' => array(
315 'createaccount' => true,
316 'read' => true,
317 'edit' => true,
318 'createpage' => true,
319 'createtalk' => true,
320 ) ),
321 'wgNamespaceProtection' => array( NS_MEDIAWIKI => 'editinterface' ),
322 'wgDefaultExternalStore' => array(),
323 'wgForeignFileRepos' => array(),
324 'wgLinkHolderBatchSize' => $linkHolderBatchSize,
325 'wgExperimentalHtmlIds' => false,
326 'wgExternalLinkTarget' => false,
327 'wgAlwaysUseTidy' => false,
328 'wgHtml5' => true,
329 'wgCleanupPresentationalAttributes' => true,
330 'wgWellFormedXml' => true,
331 'wgAllowMicrodataAttributes' => true,
332 'wgAdaptiveMessageCache' => true,
333 'wgUseDatabaseMessages' => true,
334 );
335
336 if ( $config ) {
337 $configLines = explode( "\n", $config );
338
339 foreach ( $configLines as $line ) {
340 list( $var, $value ) = explode( '=', $line, 2 );
341
342 $settings[$var] = eval( "return $value;" ); //???
343 }
344 }
345
346 $this->savedGlobals = array();
347
348 /** @since 1.20 */
349 wfRunHooks( 'ParserTestGlobals', array( &$settings ) );
350
351 foreach ( $settings as $var => $val ) {
352 if ( array_key_exists( $var, $GLOBALS ) ) {
353 $this->savedGlobals[$var] = $GLOBALS[$var];
354 }
355
356 $GLOBALS[$var] = $val;
357 }
358
359 $langObj = Language::factory( $lang );
360 $GLOBALS['wgContLang'] = $langObj;
361 $context = new RequestContext();
362 $GLOBALS['wgLang'] = $context->getLanguage();
363
364 $GLOBALS['wgMemc'] = new EmptyBagOStuff;
365 $GLOBALS['wgOut'] = $context->getOutput();
366 $GLOBALS['wgUser'] = $context->getUser();
367
368 global $wgHooks;
369
370 $wgHooks['ParserTestParser'][] = 'ParserTestParserHook::setup';
371 $wgHooks['ParserGetVariableValueTs'][] = 'ParserTest::getFakeTimestamp';
372
373 MagicWord::clearCache();
374 RepoGroup::destroySingleton();
375 FileBackendGroup::destroySingleton();
376
377 # Create dummy files in storage
378 $this->setupUploads();
379
380 # Publish the articles after we have the final language set
381 $this->publishTestArticles();
382
383 # The entries saved into RepoGroup cache with previous globals will be wrong.
384 RepoGroup::destroySingleton();
385 FileBackendGroup::destroySingleton();
386 MessageCache::destroyInstance();
387
388 return $context;
389 }
390
391 /**
392 * Get an FS upload directory (only applies to FSFileBackend)
393 *
394 * @return String: the directory
395 */
396 protected function getUploadDir() {
397 if ( $this->keepUploads ) {
398 $dir = wfTempDir() . '/mwParser-images';
399
400 if ( is_dir( $dir ) ) {
401 return $dir;
402 }
403 } else {
404 $dir = wfTempDir() . "/mwParser-" . mt_rand() . "-images";
405 }
406
407 // wfDebug( "Creating upload directory $dir\n" );
408 if ( file_exists( $dir ) ) {
409 wfDebug( "Already exists!\n" );
410 return $dir;
411 }
412
413 return $dir;
414 }
415
416 /**
417 * Create a dummy uploads directory which will contain a couple
418 * of files in order to pass existence tests.
419 *
420 * @return String: the directory
421 */
422 protected function setupUploads() {
423 global $IP;
424
425 $base = $this->getBaseDir();
426 $backend = RepoGroup::singleton()->getLocalRepo()->getBackend();
427 $backend->prepare( array( 'dir' => "$base/local-public/3/3a" ) );
428 $backend->store( array(
429 'src' => "$IP/skins/monobook/headbg.jpg", 'dst' => "$base/local-public/3/3a/Foobar.jpg"
430 ) );
431 $backend->prepare( array( 'dir' => "$base/local-public/0/09" ) );
432 $backend->store( array(
433 'src' => "$IP/skins/monobook/headbg.jpg", 'dst' => "$base/local-public/0/09/Bad.jpg"
434 ) );
435 }
436
437 /**
438 * Restore default values and perform any necessary clean-up
439 * after each test runs.
440 */
441 protected function teardownGlobals() {
442 $this->teardownUploads();
443
444 foreach ( $this->savedGlobals as $var => $val ) {
445 $GLOBALS[$var] = $val;
446 }
447
448 RepoGroup::destroySingleton();
449 LinkCache::singleton()->clear();
450 }
451
452 /**
453 * Remove the dummy uploads directory
454 */
455 private function teardownUploads() {
456 if ( $this->keepUploads ) {
457 return;
458 }
459
460 $base = $this->getBaseDir();
461 // delete the files first, then the dirs.
462 self::deleteFiles(
463 array (
464 "$base/local-public/3/3a/Foobar.jpg",
465 "$base/local-thumb/3/3a/Foobar.jpg/180px-Foobar.jpg",
466 "$base/local-thumb/3/3a/Foobar.jpg/200px-Foobar.jpg",
467 "$base/local-thumb/3/3a/Foobar.jpg/640px-Foobar.jpg",
468 "$base/local-thumb/3/3a/Foobar.jpg/120px-Foobar.jpg",
469
470 "$base/local-public/0/09/Bad.jpg",
471 "$base/local-thumb/0/09/Bad.jpg",
472
473 "$base/local-public/math/f/a/5/fa50b8b616463173474302ca3e63586b.png",
474 )
475 );
476 }
477
478 /**
479 * Delete the specified files, if they exist.
480 * @param $files Array: full paths to files to delete.
481 */
482 private static function deleteFiles( $files ) {
483 $backend = RepoGroup::singleton()->getLocalRepo()->getBackend();
484 foreach ( $files as $file ) {
485 $backend->delete( array( 'src' => $file ), array( 'force' => 1 ) );
486 }
487 foreach ( $files as $file ) {
488 $tmp = $file;
489 while ( $tmp = FileBackend::parentStoragePath( $tmp ) ) {
490 if ( !$backend->clean( array( 'dir' => $tmp ) )->isOK() ) {
491 break;
492 }
493 }
494 }
495 }
496
497 protected function getBaseDir() {
498 return 'mwstore://local-backend';
499 }
500
501 public function parserTestProvider() {
502 if ( $this->file === false ) {
503 global $wgParserTestFiles;
504 $this->file = $wgParserTestFiles[0];
505 }
506 return new TestFileIterator( $this->file, $this );
507 }
508
509 /**
510 * Set the file from whose tests will be run by this instance
511 */
512 public function setParserTestFile( $filename ) {
513 $this->file = $filename;
514 }
515
516 /**
517 * @group medium
518 * @dataProvider parserTestProvider
519 */
520 public function testParserTest( $desc, $input, $result, $opts, $config ) {
521 if ( $this->regex != '' && !preg_match( '/' . $this->regex . '/', $desc ) ) {
522 $this->assertTrue( true ); // XXX: don't flood output with "test made no assertions"
523 //$this->markTestSkipped( 'Filtered out by the user' );
524 return;
525 }
526
527 wfDebug( "Running parser test: $desc\n" );
528
529 $opts = $this->parseOptions( $opts );
530 $context = $this->setupGlobals( $opts, $config );
531
532 $user = $context->getUser();
533 $options = ParserOptions::newFromContext( $context );
534
535 if ( isset( $opts['title'] ) ) {
536 $titleText = $opts['title'];
537 }
538 else {
539 $titleText = 'Parser test';
540 }
541
542 $local = isset( $opts['local'] );
543 $preprocessor = isset( $opts['preprocessor'] ) ? $opts['preprocessor'] : null;
544 $parser = $this->getParser( $preprocessor );
545
546 $title = Title::newFromText( $titleText );
547
548 if ( isset( $opts['pst'] ) ) {
549 $out = $parser->preSaveTransform( $input, $title, $user, $options );
550 } elseif ( isset( $opts['msg'] ) ) {
551 $out = $parser->transformMsg( $input, $options, $title );
552 } elseif ( isset( $opts['section'] ) ) {
553 $section = $opts['section'];
554 $out = $parser->getSection( $input, $section );
555 } elseif ( isset( $opts['replace'] ) ) {
556 $section = $opts['replace'][0];
557 $replace = $opts['replace'][1];
558 $out = $parser->replaceSection( $input, $section, $replace );
559 } elseif ( isset( $opts['comment'] ) ) {
560 $out = Linker::formatComment( $input, $title, $local );
561 } elseif ( isset( $opts['preload'] ) ) {
562 $out = $parser->getpreloadText( $input, $title, $options );
563 } else {
564 $output = $parser->parse( $input, $title, $options, true, true, 1337 );
565 $out = $output->getText();
566
567 if ( isset( $opts['showtitle'] ) ) {
568 if ( $output->getTitleText() ) {
569 $title = $output->getTitleText();
570 }
571
572 $out = "$title\n$out";
573 }
574
575 if ( isset( $opts['ill'] ) ) {
576 $out = $this->tidy( implode( ' ', $output->getLanguageLinks() ) );
577 } elseif ( isset( $opts['cat'] ) ) {
578 $outputPage = $context->getOutput();
579 $outputPage->addCategoryLinks( $output->getCategories() );
580 $cats = $outputPage->getCategoryLinks();
581
582 if ( isset( $cats['normal'] ) ) {
583 $out = $this->tidy( implode( ' ', $cats['normal'] ) );
584 } else {
585 $out = '';
586 }
587 }
588 $parser->mPreprocessor = null;
589
590 $result = $this->tidy( $result );
591 }
592
593 $this->teardownGlobals();
594
595 $this->assertEquals( $result, $out, $desc );
596 }
597
598 /**
599 * Run a fuzz test series
600 * Draw input from a set of test files
601 *
602 * @todo fixme Needs some work to not eat memory until the world explodes
603 *
604 * @group ParserFuzz
605 */
606 function testFuzzTests() {
607 global $wgParserTestFiles;
608
609 $files = $wgParserTestFiles;
610
611 if( $this->getCliArg( 'file=' ) ) {
612 $files = array( $this->getCliArg( 'file=' ) );
613 }
614
615 $dict = $this->getFuzzInput( $files );
616 $dictSize = strlen( $dict );
617 $logMaxLength = log( $this->maxFuzzTestLength );
618
619 ini_set( 'memory_limit', $this->memoryLimit * 1048576 );
620
621 $user = new User;
622 $opts = ParserOptions::newFromUser( $user );
623 $title = Title::makeTitle( NS_MAIN, 'Parser_test' );
624
625 $id = 1;
626
627 while ( true ) {
628
629 // Generate test input
630 mt_srand( ++$this->fuzzSeed );
631 $totalLength = mt_rand( 1, $this->maxFuzzTestLength );
632 $input = '';
633
634 while ( strlen( $input ) < $totalLength ) {
635 $logHairLength = mt_rand( 0, 1000000 ) / 1000000 * $logMaxLength;
636 $hairLength = min( intval( exp( $logHairLength ) ), $dictSize );
637 $offset = mt_rand( 0, $dictSize - $hairLength );
638 $input .= substr( $dict, $offset, $hairLength );
639 }
640
641 $this->setupGlobals();
642 $parser = $this->getParser();
643
644 // Run the test
645 try {
646 $parser->parse( $input, $title, $opts );
647 $this->assertTrue( true, "Test $id, fuzz seed {$this->fuzzSeed}" );
648 } catch ( Exception $exception ) {
649 $input_dump = sprintf( "string(%d) \"%s\"\n", strlen( $input ), $input );
650
651 $this->assertTrue( false, "Test $id, fuzz seed {$this->fuzzSeed}. \n\nInput: $input_dump\n\nError: {$exception->getMessage()}\n\nBacktrace: {$exception->getTraceAsString()}" );
652 }
653
654 $this->teardownGlobals();
655 $parser->__destruct();
656
657 if ( $id % 100 == 0 ) {
658 $usage = intval( memory_get_usage( true ) / $this->memoryLimit / 1048576 * 100 );
659 //echo "{$this->fuzzSeed}: $numSuccess/$numTotal (mem: $usage%)\n";
660 if ( $usage > 90 ) {
661 $ret = "Out of memory:\n";
662 $memStats = $this->getMemoryBreakdown();
663
664 foreach ( $memStats as $name => $usage ) {
665 $ret .= "$name: $usage\n";
666 }
667
668 throw new MWException( $ret );
669 }
670 }
671
672 $id++;
673
674 }
675 }
676
677 //Various getter functions
678
679 /**
680 * Get an input dictionary from a set of parser test files
681 */
682 function getFuzzInput( $filenames ) {
683 $dict = '';
684
685 foreach ( $filenames as $filename ) {
686 $contents = file_get_contents( $filename );
687 preg_match_all( '/!!\s*input\n(.*?)\n!!\s*result/s', $contents, $matches );
688
689 foreach ( $matches[1] as $match ) {
690 $dict .= $match . "\n";
691 }
692 }
693
694 return $dict;
695 }
696
697 /**
698 * Get a memory usage breakdown
699 */
700 function getMemoryBreakdown() {
701 $memStats = array();
702
703 foreach ( $GLOBALS as $name => $value ) {
704 $memStats['$' . $name] = strlen( serialize( $value ) );
705 }
706
707 $classes = get_declared_classes();
708
709 foreach ( $classes as $class ) {
710 $rc = new ReflectionClass( $class );
711 $props = $rc->getStaticProperties();
712 $memStats[$class] = strlen( serialize( $props ) );
713 $methods = $rc->getMethods();
714
715 foreach ( $methods as $method ) {
716 $memStats[$class] += strlen( serialize( $method->getStaticVariables() ) );
717 }
718 }
719
720 $functions = get_defined_functions();
721
722 foreach ( $functions['user'] as $function ) {
723 $rf = new ReflectionFunction( $function );
724 $memStats["$function()"] = strlen( serialize( $rf->getStaticVariables() ) );
725 }
726
727 asort( $memStats );
728
729 return $memStats;
730 }
731
732 /**
733 * Get a Parser object
734 */
735 function getParser( $preprocessor = null ) {
736 global $wgParserConf;
737
738 $class = $wgParserConf['class'];
739 $parser = new $class( array( 'preprocessorClass' => $preprocessor ) + $wgParserConf );
740
741 wfRunHooks( 'ParserTestParser', array( &$parser ) );
742
743 return $parser;
744 }
745
746 //Various action functions
747
748 public function addArticle( $name, $text, $line ) {
749 self::$articles[$name] = array( $text, $line );
750 }
751
752 public function publishTestArticles() {
753 if ( empty( self::$articles ) ) {
754 return;
755 }
756
757 foreach ( self::$articles as $name => $info ) {
758 list( $text, $line ) = $info;
759 ParserTest::addArticle( $name, $text, $line, 'ignoreduplicate' );
760 }
761 }
762
763 /**
764 * Steal a callback function from the primary parser, save it for
765 * application to our scary parser. If the hook is not installed,
766 * abort processing of this file.
767 *
768 * @param $name String
769 * @return Bool true if tag hook is present
770 */
771 public function requireHook( $name ) {
772 global $wgParser;
773 $wgParser->firstCallInit( ); // make sure hooks are loaded.
774 return isset( $wgParser->mTagHooks[$name] );
775 }
776
777 public function requireFunctionHook( $name ) {
778 global $wgParser;
779 $wgParser->firstCallInit( ); // make sure hooks are loaded.
780 return isset( $wgParser->mFunctionHooks[$name] );
781 }
782 //Various "cleanup" functions
783
784 /**
785 * Run the "tidy" command on text if the $wgUseTidy
786 * global is true
787 *
788 * @param $text String: the text to tidy
789 * @return String
790 */
791 protected function tidy( $text ) {
792 global $wgUseTidy;
793
794 if ( $wgUseTidy ) {
795 $text = MWTidy::tidy( $text );
796 }
797
798 return $text;
799 }
800
801 /**
802 * Remove last character if it is a newline
803 */
804 public function removeEndingNewline( $s ) {
805 if ( substr( $s, -1 ) === "\n" ) {
806 return substr( $s, 0, -1 );
807 }
808 else {
809 return $s;
810 }
811 }
812
813 //Test options parser functions
814
815 protected function parseOptions( $instring ) {
816 $opts = array();
817 // foo
818 // foo=bar
819 // foo="bar baz"
820 // foo=[[bar baz]]
821 // foo=bar,"baz quux"
822 $regex = '/\b
823 ([\w-]+) # Key
824 \b
825 (?:\s*
826 = # First sub-value
827 \s*
828 (
829 "
830 [^"]* # Quoted val
831 "
832 |
833 \[\[
834 [^]]* # Link target
835 \]\]
836 |
837 [\w-]+ # Plain word
838 )
839 (?:\s*
840 , # Sub-vals 1..N
841 \s*
842 (
843 "[^"]*" # Quoted val
844 |
845 \[\[[^]]*\]\] # Link target
846 |
847 [\w-]+ # Plain word
848 )
849 )*
850 )?
851 /x';
852
853 if ( preg_match_all( $regex, $instring, $matches, PREG_SET_ORDER ) ) {
854 foreach ( $matches as $bits ) {
855 array_shift( $bits );
856 $key = strtolower( array_shift( $bits ) );
857 if ( count( $bits ) == 0 ) {
858 $opts[$key] = true;
859 } elseif ( count( $bits ) == 1 ) {
860 $opts[$key] = $this->cleanupOption( array_shift( $bits ) );
861 } else {
862 // Array!
863 $opts[$key] = array_map( array( $this, 'cleanupOption' ), $bits );
864 }
865 }
866 }
867 return $opts;
868 }
869
870 protected function cleanupOption( $opt ) {
871 if ( substr( $opt, 0, 1 ) == '"' ) {
872 return substr( $opt, 1, -1 );
873 }
874
875 if ( substr( $opt, 0, 2 ) == '[[' ) {
876 return substr( $opt, 2, -2 );
877 }
878 return $opt;
879 }
880
881 /**
882 * Use a regex to find out the value of an option
883 * @param $key String: name of option val to retrieve
884 * @param $opts Options array to look in
885 * @param $default Mixed: default value returned if not found
886 */
887 protected static function getOptionValue( $key, $opts, $default ) {
888 $key = strtolower( $key );
889
890 if ( isset( $opts[$key] ) ) {
891 return $opts[$key];
892 } else {
893 return $default;
894 }
895 }
896 }