Revert r87635, r87637, r87639, r87643 (MW_MIN_PHP_VERSION etc.): breaks HipHop support.
[lhc/web/wiklou.git] / includes / specials / SpecialVersion.php
1 <?php
2 /**
3 * Implements Special:Version
4 *
5 * Copyright © 2005 Ævar Arnfjörð Bjarmason
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License along
18 * with this program; if not, write to the Free Software Foundation, Inc.,
19 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
20 * http://www.gnu.org/copyleft/gpl.html
21 *
22 * @file
23 * @ingroup SpecialPage
24 */
25
26 /**
27 * Give information about the version of MediaWiki, PHP, the DB and extensions
28 *
29 * @ingroup SpecialPage
30 */
31 class SpecialVersion extends SpecialPage {
32
33 protected $firstExtOpened = false;
34
35 protected static $extensionTypes = false;
36
37 protected static $viewvcUrls = array(
38 'svn+ssh://svn.wikimedia.org/svnroot/mediawiki' => 'http://svn.wikimedia.org/viewvc/mediawiki',
39 'http://svn.wikimedia.org/svnroot/mediawiki' => 'http://svn.wikimedia.org/viewvc/mediawiki',
40 # Doesn't work at the time of writing but maybe some day:
41 'https://svn.wikimedia.org/viewvc/mediawiki' => 'http://svn.wikimedia.org/viewvc/mediawiki',
42 );
43
44 public function __construct(){
45 parent::__construct( 'Version' );
46 }
47
48 /**
49 * main()
50 */
51 public function execute( $par ) {
52 global $wgOut, $wgSpecialVersionShowHooks, $wgContLang, $wgRequest;
53
54 $this->setHeaders();
55 $this->outputHeader();
56 $wgOut->allowClickjacking();
57
58 $wgOut->addHTML( Xml::openElement( 'div',
59 array( 'dir' => $wgContLang->getDir() ) ) );
60 $text =
61 $this->getMediaWikiCredits() .
62 $this->softwareInformation() .
63 $this->getExtensionCredits();
64 if ( $wgSpecialVersionShowHooks ) {
65 $text .= $this->getWgHooks();
66 }
67
68 $wgOut->addWikiText( $text );
69 $wgOut->addHTML( $this->IPInfo() );
70 $wgOut->addHTML( '</div>' );
71
72 if ( $wgRequest->getVal( 'easteregg' ) ) {
73 if ( $this->showEasterEgg() ) {
74 // TODO: put something interesting here
75 }
76 }
77 }
78
79 /**
80 * Returns wiki text showing the license information.
81 *
82 * @return string
83 */
84 private static function getMediaWikiCredits() {
85 $ret = Xml::element( 'h2', array( 'id' => 'mw-version-license' ), wfMsg( 'version-license' ) );
86
87 // This text is always left-to-right.
88 $ret .= '<div>';
89 $ret .= "__NOTOC__
90 " . self::getCopyrightAndAuthorList() . "\n
91 " . wfMsg( 'version-license-info' );
92 $ret .= '</div>';
93
94 return str_replace( "\t\t", '', $ret ) . "\n";
95 }
96
97 /**
98 * Get the "MediaWiki is copyright 2001-20xx by lots of cool guys" text
99 *
100 * @return String
101 */
102 public static function getCopyrightAndAuthorList() {
103 global $wgLang;
104
105 $authorList = array(
106 'Magnus Manske', 'Brion Vibber', 'Lee Daniel Crocker',
107 'Tim Starling', 'Erik Möller', 'Gabriel Wicke', 'Ævar Arnfjörð Bjarmason',
108 'Niklas Laxström', 'Domas Mituzas', 'Rob Church', 'Yuri Astrakhan',
109 'Aryeh Gregor', 'Aaron Schulz', 'Andrew Garrett', 'Raimond Spekking',
110 'Alexandre Emsenhuber', 'Siebrand Mazeland', 'Chad Horohoe',
111 'Roan Kattouw', 'Trevor Parscal', 'Bryan Tong Minh', 'Sam Reed',
112 'Victor Vasiliev', 'Rotem Liss', 'Platonides',
113 wfMsg( 'version-poweredby-others' )
114 );
115
116 return wfMsg( 'version-poweredby-credits', date( 'Y' ),
117 $wgLang->listToText( $authorList ) );
118 }
119
120 /**
121 * Returns wiki text showing the third party software versions (apache, php, mysql).
122 *
123 * @return string
124 */
125 static function softwareInformation() {
126 $dbr = wfGetDB( DB_SLAVE );
127
128 // Put the software in an array of form 'name' => 'version'. All messages should
129 // be loaded here, so feel free to use wfMsg*() in the 'name'. Raw HTML or wikimarkup
130 // can be used.
131 $software = array();
132 $software['[http://www.mediawiki.org/ MediaWiki]'] = self::getVersionLinked();
133 $software['[http://www.php.net/ PHP]'] = phpversion() . " (" . php_sapi_name() . ")";
134 $software[$dbr->getSoftwareLink()] = $dbr->getServerInfo();
135
136 // Allow a hook to add/remove items.
137 wfRunHooks( 'SoftwareInfo', array( &$software ) );
138
139 $out = Xml::element( 'h2', array( 'id' => 'mw-version-software' ), wfMsg( 'version-software' ) ) .
140 Xml::openElement( 'table', array( 'class' => 'wikitable', 'id' => 'sv-software' ) ) .
141 "<tr>
142 <th>" . wfMsg( 'version-software-product' ) . "</th>
143 <th>" . wfMsg( 'version-software-version' ) . "</th>
144 </tr>\n";
145
146 foreach( $software as $name => $version ) {
147 $out .= "<tr>
148 <td>" . $name . "</td>
149 <td>" . $version . "</td>
150 </tr>\n";
151 }
152
153 return $out . Xml::closeElement( 'table' );
154 }
155
156 /**
157 * Return a string of the MediaWiki version with SVN revision if available.
158 *
159 * @return mixed
160 */
161 public static function getVersion( $flags = '' ) {
162 global $wgVersion, $IP;
163 wfProfileIn( __METHOD__ );
164
165 $info = self::getSvnInfo( $IP );
166 if ( !$info ) {
167 $version = $wgVersion;
168 } elseif( $flags === 'nodb' ) {
169 $version = "$wgVersion (r{$info['checkout-rev']})";
170 } else {
171 $version = $wgVersion . ' ' .
172 wfMsg(
173 'version-svn-revision',
174 isset( $info['directory-rev'] ) ? $info['directory-rev'] : '',
175 $info['checkout-rev']
176 );
177 }
178
179 wfProfileOut( __METHOD__ );
180 return $version;
181 }
182
183 /**
184 * Return a wikitext-formatted string of the MediaWiki version with a link to
185 * the SVN revision if available.
186 *
187 * @return mixed
188 */
189 public static function getVersionLinked() {
190 global $wgVersion, $IP;
191 wfProfileIn( __METHOD__ );
192
193 $info = self::getSvnInfo( $IP );
194
195 if ( isset( $info['checkout-rev'] ) ) {
196 $linkText = wfMsg(
197 'version-svn-revision',
198 isset( $info['directory-rev'] ) ? $info['directory-rev'] : '',
199 $info['checkout-rev']
200 );
201
202 if ( isset( $info['viewvc-url'] ) ) {
203 $version = "$wgVersion [{$info['viewvc-url']} $linkText]";
204 } else {
205 $version = "$wgVersion $linkText";
206 }
207 } else {
208 $version = $wgVersion;
209 }
210
211 wfProfileOut( __METHOD__ );
212 return $version;
213 }
214
215 /**
216 * Returns an array with the base extension types.
217 * Type is stored as array key, the message as array value.
218 *
219 * TODO: ideally this would return all extension types, including
220 * those added by SpecialVersionExtensionTypes. This is not possible
221 * since this hook is passing along $this though.
222 *
223 * @since 1.17
224 *
225 * @return array
226 */
227 public static function getExtensionTypes() {
228 if ( self::$extensionTypes === false ) {
229 self::$extensionTypes = array(
230 'specialpage' => wfMsg( 'version-specialpages' ),
231 'parserhook' => wfMsg( 'version-parserhooks' ),
232 'variable' => wfMsg( 'version-variables' ),
233 'media' => wfMsg( 'version-mediahandlers' ),
234 'antispam' => wfMsg( 'version-antispam' ),
235 'skin' => wfMsg( 'version-skins' ),
236 'other' => wfMsg( 'version-other' ),
237 );
238
239 wfRunHooks( 'ExtensionTypes', array( &self::$extensionTypes ) );
240 }
241
242 return self::$extensionTypes;
243 }
244
245 /**
246 * Returns the internationalized name for an extension type.
247 *
248 * @since 1.17
249 *
250 * @param $type String
251 *
252 * @return string
253 */
254 public static function getExtensionTypeName( $type ) {
255 $types = self::getExtensionTypes();
256 return isset( $types[$type] ) ? $types[$type] : $types['other'];
257 }
258
259 /**
260 * Generate wikitext showing extensions name, URL, author and description.
261 *
262 * @return String: Wikitext
263 */
264 function getExtensionCredits() {
265 global $wgExtensionCredits, $wgExtensionFunctions, $wgParser;
266
267 if ( !count( $wgExtensionCredits ) && !count( $wgExtensionFunctions ) ) {
268 return '';
269 }
270
271 $extensionTypes = self::getExtensionTypes();
272
273 /**
274 * @deprecated as of 1.17, use hook ExtensionTypes instead.
275 */
276 wfRunHooks( 'SpecialVersionExtensionTypes', array( &$this, &$extensionTypes ) );
277
278 $out = Xml::element( 'h2', array( 'id' => 'mw-version-ext' ), wfMsg( 'version-extensions' ) ) .
279 Xml::openElement( 'table', array( 'class' => 'wikitable', 'id' => 'sv-ext' ) );
280
281 // Make sure the 'other' type is set to an array.
282 if ( !array_key_exists( 'other', $wgExtensionCredits ) ) {
283 $wgExtensionCredits['other'] = array();
284 }
285
286 // Find all extensions that do not have a valid type and give them the type 'other'.
287 foreach ( $wgExtensionCredits as $type => $extensions ) {
288 if ( !array_key_exists( $type, $extensionTypes ) ) {
289 $wgExtensionCredits['other'] = array_merge( $wgExtensionCredits['other'], $extensions );
290 }
291 }
292
293 // Loop through the extension categories to display their extensions in the list.
294 foreach ( $extensionTypes as $type => $message ) {
295 if ( $type != 'other' ) {
296 $out .= $this->getExtensionCategory( $type, $message );
297 }
298 }
299
300 // We want the 'other' type to be last in the list.
301 $out .= $this->getExtensionCategory( 'other', $extensionTypes['other'] );
302
303 if ( count( $wgExtensionFunctions ) ) {
304 $out .= $this->openExtType( wfMsg( 'version-extension-functions' ), 'extension-functions' );
305 $out .= '<tr><td colspan="4">' . $this->listToText( $wgExtensionFunctions ) . "</td></tr>\n";
306 }
307
308 $tags = $wgParser->getTags();
309 $cnt = count( $tags );
310
311 if ( $cnt ) {
312 for ( $i = 0; $i < $cnt; ++$i ) {
313 $tags[$i] = "&lt;{$tags[$i]}&gt;";
314 }
315 $out .= $this->openExtType( wfMsg( 'version-parser-extensiontags' ), 'parser-tags' );
316 $out .= '<tr><td colspan="4">' . $this->listToText( $tags ). "</td></tr>\n";
317 }
318
319 $fhooks = $wgParser->getFunctionHooks();
320 if( count( $fhooks ) ) {
321 $out .= $this->openExtType( wfMsg( 'version-parser-function-hooks' ), 'parser-function-hooks' );
322 $out .= '<tr><td colspan="4">' . $this->listToText( $fhooks ) . "</td></tr>\n";
323 }
324
325 $out .= Xml::closeElement( 'table' );
326
327 return $out;
328 }
329
330 /**
331 * Creates and returns the HTML for a single extension category.
332 *
333 * @since 1.17
334 *
335 * @param $type String
336 * @param $message String
337 *
338 * @return string
339 */
340 protected function getExtensionCategory( $type, $message ) {
341 global $wgExtensionCredits;
342
343 $out = '';
344
345 if ( array_key_exists( $type, $wgExtensionCredits ) && count( $wgExtensionCredits[$type] ) > 0 ) {
346 $out .= $this->openExtType( $message, 'credits-' . $type );
347
348 usort( $wgExtensionCredits[$type], array( $this, 'compare' ) );
349
350 foreach ( $wgExtensionCredits[$type] as $extension ) {
351 $out .= $this->getCreditsForExtension( $extension );
352 }
353 }
354
355 return $out;
356 }
357
358 /**
359 * Callback to sort extensions by type.
360 */
361 function compare( $a, $b ) {
362 global $wgLang;
363 if( $a['name'] === $b['name'] ) {
364 return 0;
365 } else {
366 return $wgLang->lc( $a['name'] ) > $wgLang->lc( $b['name'] )
367 ? 1
368 : -1;
369 }
370 }
371
372 /**
373 * Creates and formats the creidts for a single extension and returns this.
374 *
375 * @param $extension Array
376 *
377 * @return string
378 */
379 function getCreditsForExtension( array $extension ) {
380 $name = isset( $extension['name'] ) ? $extension['name'] : '[no name]';
381
382 if ( isset( $extension['path'] ) ) {
383 $svnInfo = self::getSvnInfo( dirname($extension['path']) );
384 $directoryRev = isset( $svnInfo['directory-rev'] ) ? $svnInfo['directory-rev'] : null;
385 $checkoutRev = isset( $svnInfo['checkout-rev'] ) ? $svnInfo['checkout-rev'] : null;
386 $viewvcUrl = isset( $svnInfo['viewvc-url'] ) ? $svnInfo['viewvc-url'] : null;
387 } else {
388 $directoryRev = null;
389 $checkoutRev = null;
390 $viewvcUrl = null;
391 }
392
393 # Make main link (or just the name if there is no URL).
394 if ( isset( $extension['url'] ) ) {
395 $mainLink = "[{$extension['url']} $name]";
396 } else {
397 $mainLink = $name;
398 }
399
400 if ( isset( $extension['version'] ) ) {
401 $versionText = '<span class="mw-version-ext-version">' .
402 wfMsg( 'version-version', $extension['version'] ) .
403 '</span>';
404 } else {
405 $versionText = '';
406 }
407
408 # Make subversion text/link.
409 if ( $checkoutRev ) {
410 $svnText = wfMsg( 'version-svn-revision', $directoryRev, $checkoutRev );
411 $svnText = isset( $viewvcUrl ) ? "[$viewvcUrl $svnText]" : $svnText;
412 } else {
413 $svnText = false;
414 }
415
416 # Make description text.
417 $description = isset ( $extension['description'] ) ? $extension['description'] : '';
418
419 if( isset ( $extension['descriptionmsg'] ) ) {
420 # Look for a localized description.
421 $descriptionMsg = $extension['descriptionmsg'];
422
423 if( is_array( $descriptionMsg ) ) {
424 $descriptionMsgKey = $descriptionMsg[0]; // Get the message key
425 array_shift( $descriptionMsg ); // Shift out the message key to get the parameters only
426 array_map( "htmlspecialchars", $descriptionMsg ); // For sanity
427 $description = wfMsg( $descriptionMsgKey, $descriptionMsg );
428 } else {
429 $description = wfMsg( $descriptionMsg );
430 }
431 }
432
433 if ( $svnText !== false ) {
434 $extNameVer = "<tr>
435 <td><em>$mainLink $versionText</em></td>
436 <td><em>$svnText</em></td>";
437 } else {
438 $extNameVer = "<tr>
439 <td colspan=\"2\"><em>$mainLink $versionText</em></td>";
440 }
441
442 $author = isset ( $extension['author'] ) ? $extension['author'] : array();
443 $extDescAuthor = "<td>$description</td>
444 <td>" . $this->listAuthors( $author, false ) . "</td>
445 </tr>\n";
446
447 return $extNameVer . $extDescAuthor;
448 }
449
450 /**
451 * Generate wikitext showing hooks in $wgHooks.
452 *
453 * @return String: wikitext
454 */
455 private function getWgHooks() {
456 global $wgHooks;
457
458 if ( count( $wgHooks ) ) {
459 $myWgHooks = $wgHooks;
460 ksort( $myWgHooks );
461
462 $ret = Xml::element( 'h2', array( 'id' => 'mw-version-hooks' ), wfMsg( 'version-hooks' ) ) .
463 Xml::openElement( 'table', array( 'class' => 'wikitable', 'id' => 'sv-hooks' ) ) .
464 "<tr>
465 <th>" . wfMsg( 'version-hook-name' ) . "</th>
466 <th>" . wfMsg( 'version-hook-subscribedby' ) . "</th>
467 </tr>\n";
468
469 foreach ( $myWgHooks as $hook => $hooks ) {
470 $ret .= "<tr>
471 <td>$hook</td>
472 <td>" . $this->listToText( $hooks ) . "</td>
473 </tr>\n";
474 }
475
476 $ret .= Xml::closeElement( 'table' );
477 return $ret;
478 } else
479 return '';
480 }
481
482 private function openExtType( $text, $name = null ) {
483 $opt = array( 'colspan' => 4 );
484 $out = '';
485
486 if( $this->firstExtOpened ) {
487 // Insert a spacing line
488 $out .= '<tr class="sv-space">' . Html::element( 'td', $opt ) . "</tr>\n";
489 }
490 $this->firstExtOpened = true;
491
492 if( $name ) {
493 $opt['id'] = "sv-$name";
494 }
495
496 $out .= "<tr>" . Xml::element( 'th', $opt, $text ) . "</tr>\n";
497
498 return $out;
499 }
500
501 /**
502 * Get information about client's IP address.
503 *
504 * @return String: HTML fragment
505 */
506 private function IPInfo() {
507 $ip = str_replace( '--', ' - ', htmlspecialchars( wfGetIP() ) );
508 return "<!-- visited from $ip -->\n" .
509 "<span style='display:none'>visited from $ip</span>";
510 }
511
512 /**
513 * Return a formatted unsorted list of authors
514 *
515 * @param $authors mixed: string or array of strings
516 * @return String: HTML fragment
517 */
518 function listAuthors( $authors ) {
519 $list = array();
520 foreach( (array)$authors as $item ) {
521 if( $item == '...' ) {
522 $list[] = wfMsg( 'version-poweredby-others' );
523 } else {
524 $list[] = $item;
525 }
526 }
527 return $this->listToText( $list, false );
528 }
529
530 /**
531 * Convert an array of items into a list for display.
532 *
533 * @param $list Array of elements to display
534 * @param $sort Boolean: whether to sort the items in $list
535 *
536 * @return String
537 */
538 function listToText( $list, $sort = true ) {
539 $cnt = count( $list );
540
541 if ( $cnt == 1 ) {
542 // Enforce always returning a string
543 return (string)self::arrayToString( $list[0] );
544 } elseif ( $cnt == 0 ) {
545 return '';
546 } else {
547 global $wgLang;
548 if ( $sort ) {
549 sort( $list );
550 }
551 return $wgLang->listToText( array_map( array( __CLASS__, 'arrayToString' ), $list ) );
552 }
553 }
554
555 /**
556 * Convert an array or object to a string for display.
557 *
558 * @param $list Mixed: will convert an array to string if given and return
559 * the paramater unaltered otherwise
560 *
561 * @return Mixed
562 */
563 public static function arrayToString( $list ) {
564 if( is_array( $list ) && count( $list ) == 1 ) {
565 $list = $list[0];
566 }
567 if( is_object( $list ) ) {
568 $class = get_class( $list );
569 return "($class)";
570 } elseif ( !is_array( $list ) ) {
571 return $list;
572 } else {
573 if( is_object( $list[0] ) ) {
574 $class = get_class( $list[0] );
575 } else {
576 $class = $list[0];
577 }
578 return "($class, {$list[1]})";
579 }
580 }
581
582 /**
583 * Get an associative array of information about a given path, from its .svn
584 * subdirectory. Returns false on error, such as if the directory was not
585 * checked out with subversion.
586 *
587 * Returned keys are:
588 * Required:
589 * checkout-rev The revision which was checked out
590 * Optional:
591 * directory-rev The revision when the directory was last modified
592 * url The subversion URL of the directory
593 * repo-url The base URL of the repository
594 * viewvc-url A ViewVC URL pointing to the checked-out revision
595 */
596 public static function getSvnInfo( $dir ) {
597 // http://svnbook.red-bean.com/nightly/en/svn.developer.insidewc.html
598 $entries = $dir . '/.svn/entries';
599
600 if( !file_exists( $entries ) ) {
601 return false;
602 }
603
604 $lines = file( $entries );
605 if ( !count( $lines ) ) {
606 return false;
607 }
608
609 // check if file is xml (subversion release <= 1.3) or not (subversion release = 1.4)
610 if( preg_match( '/^<\?xml/', $lines[0] ) ) {
611 // subversion is release <= 1.3
612 if( !function_exists( 'simplexml_load_file' ) ) {
613 // We could fall back to expat... YUCK
614 return false;
615 }
616
617 // SimpleXml whines about the xmlns...
618 wfSuppressWarnings();
619 $xml = simplexml_load_file( $entries );
620 wfRestoreWarnings();
621
622 if( $xml ) {
623 foreach( $xml->entry as $entry ) {
624 if( $xml->entry[0]['name'] == '' ) {
625 // The directory entry should always have a revision marker.
626 if( $entry['revision'] ) {
627 return array( 'checkout-rev' => intval( $entry['revision'] ) );
628 }
629 }
630 }
631 }
632
633 return false;
634 }
635
636 // Subversion is release 1.4 or above.
637 if ( count( $lines ) < 11 ) {
638 return false;
639 }
640
641 $info = array(
642 'checkout-rev' => intval( trim( $lines[3] ) ),
643 'url' => trim( $lines[4] ),
644 'repo-url' => trim( $lines[5] ),
645 'directory-rev' => intval( trim( $lines[10] ) )
646 );
647
648 if ( isset( self::$viewvcUrls[$info['repo-url']] ) ) {
649 $viewvc = str_replace(
650 $info['repo-url'],
651 self::$viewvcUrls[$info['repo-url']],
652 $info['url']
653 );
654
655 $viewvc .= '/?pathrev=';
656 $viewvc .= urlencode( $info['checkout-rev'] );
657 $info['viewvc-url'] = $viewvc;
658 }
659
660 return $info;
661 }
662
663 /**
664 * Retrieve the revision number of a Subversion working directory.
665 *
666 * @param $dir String: directory of the svn checkout
667 *
668 * @return Integer: revision number as int
669 */
670 public static function getSvnRevision( $dir ) {
671 $info = self::getSvnInfo( $dir );
672
673 if ( $info === false ) {
674 return false;
675 } elseif ( isset( $info['checkout-rev'] ) ) {
676 return $info['checkout-rev'];
677 } else {
678 return false;
679 }
680 }
681
682 function showEasterEgg() {
683 $rx = $rp = $xe = '';
684 $alpha = array("", "kbQW", "\$\n()");
685 $beta = implode( "', '", $alpha);
686 $juliet = 'echo $delta + strrev($foxtrot) - $alfa + $wgVersion . base64_decode($bravo) * $charlie';
687 for ( $i = 1; $i <= 4; $i++ ) {
688 $rx .= '([^j]*)J';
689 $rp .= "+(\\$i)";
690 }
691
692 $rx = "/$rx/Sei"; $O = substr("$alpha')", 1);
693 for ( $i = 1; $i <= strlen( $rx ) / 3; $i++ ) {
694 $rx[$i-1] = strtolower( $rx[$i-1] );
695 }
696 $ry = ".*?(.((.)(.))).{1,3}(.)(.{1,$i})(\\4.\\3)(.).*";
697 $ry = "/$ry/Sei"; $O = substr("$beta')", 1);
698 preg_match_all('/(?<=\$)[[:alnum:]]*/',substr($juliet, 0, $i<<1), $charlie);
699 foreach( $charlie[0] as $bravo ) {
700 $$bravo =& $xe;
701 }
702 $xe = 'xe=<<<mo/./hfromowoxv=<<<m
703 쵍潅旅𞗎왎캎𐺆ߨ趥䲀쫥𒯡𚦄𚬀Ꝍ螃䤎꤯溃𔱢櫅褡䞠⽬✡栠迤⾏𐵥쾃𜜧줏袏浣।궇䬃꼁꿤𘐧
704 𞛁윥桯䦎䵎Ꞅ𚠣涁쭀讀撠蝠讄伣𞫡枮ⵇ𚥣𐡃𐭏沢𞜄𞴏𞻧⠤쳯蒣䮎𒵬컡豣ۅ𐯥⦇𐫁漅蛁꼤从楆
705 ⥀䡦𚭅沢⠬輁䲯좡梇䟇伄육较촅䥃要𞝄迯쟠꺃ⶥ栆궀撠満ꐣ𞦇좧𐠅𞫠𐠧𚮣讇輤亀➏欣첡쮧⽬
706 氀쮧跧𐫥䪀⬬⾅𞼀ⵏ괬ত櫤䭀楦𚫃𐣂괥챣𐥇楀귧읠죯쒡ۅ𐾤䳄䤄𞽀괬躏譇䮄搥𚬁䯄津䶮⾅𐫅
707 𐴂௧쮯궣輥ߡ亀𞪀氀诤𐯢⿅諃⫤𞦁䮣⦬죄椎貧𞛄ඇ쿇亏跤⦌术থۏ仆䛇枡䪄𐵇곁謠𞿯ⶏⶃ䞣
708 궥螏蝁ꤣ⟬极涇𞴧伢𞼯ଅ𚣡즡⡌浣䯇쿃ⳇ궏ས⢃曦⦥蛧갠컡楧𘬧袏⦏⢠䳠챤⽧𚠧⬣⼀潧⭅椤
709 𞟯軁종쵃䬆𞮀𞮅꤇𞣅溎楯곡⢡꾥첥쫧Ⱨ균檏辀䭮⡄𐞯쿁䱤𐠠柅迠웏𚟯⾅豠𐡀𐡅䱀轡⾯쥃⥁溆
710 䢣䞮柄ꠌⶡ𞒯𐳣𞳅蛤椏𞯀✠귬ຄ𐷡𞜠䶃𞭀毥𞡯桥ꐥ❣쳀𞾧⡧𖥢꽧죄ത𖴧ޥ歠ແ위䯎撯쬁䮣浅
711 쾇泮𐢁켄𞧧𞦏䦯꾯迡𞐯曎䢦쿣杦궯⡀䤦䷢𐭢쟁쯯⧤蟯䡏氇𒭯𔜧𞢣𞱏蝤𒬧궧ߢ𐭆䛃찃쭣沠𚬀𞿏
712 䴃𐣣䣎𐺃ꥅ轃⣄蟧⦡𒛧蟃毣洇䞎Ҡ潄仆𐲃𞧥철䢤俎譯泠쮄␥栏쾯ⳏ짡𞾯⥡𚠬߂𚥯ކ澥䲀ⵀ𞻃
713 ⵡ𚦣𒯣✬𐟯𞥥輄䱀굡榏❡첄⦄ꡥⶣ𞡤⺁𞞡ݣ𐢅𒷤⤡꿄蝡𞱁ⴄ贁𒛬氃𞞇𞶡ޅ짣߁𞱃𐫄ۥ𞰣𐱅欤
714 梢蝡柧䥏仏撣𐳣𞠅좇𞐣蒣䰤྅𚪏࿂ಇ濤䞦쮅𚬁𚭧𚬬𒴯𐵣𚥌沮潁좤澅𐻯杣棦ꤤ洯𐳃𚭀콅궧쭠𔥢
715 𞱠桎䝆겡쭄𞵁겯䥂ⶀ𐥂𚧬⽬䠇쳄❬Ⰼ𞵀䐦⿌웃𒿠첏𐛡浣涆𒯌⢤অ䭎𚜧갣𞾏䴮⡃꤯죠䰀쬯༄䫏
716 𐱂ꢅ䬦賧𐯡유辇➥佃仮귣젏𒴯⭅ꢡ각컄⒤⻠讁涅䠃跥袏佄𞝄𐳇泄껧𚮡𞱏棇满གྷ𐻯輤괅𚠬❥겠
717 𒐧䣂ꤏ襃𞼧𜰧伎襡웅𞳧걯䳣𚟡켁쭄洠컥❅⿏亂𚯧𚯯쯅𞮅⢁𐠦𒮠𚯣𞞥诤꣏辀𖥢椯겇毣濢𞝣𚢀➠
718 䮮浥겁沣졣䜦泇歏𐾄搯曯柆ۇۇ䞀泆𐾧武𚭠況꽌𐧢ꝅ軀⬠쾣𞡀榧𞣏𚦤Ⱡ䠦Ⲥ𞰯𞻥쿇䬄貃柅涢
719 갏⼁𐿧ݏౠ𐿣褀涡𘼧𞮏༅𞵡𐥆䮄𐮥➇ꝣݥ䡏䯎梢𚟇輇ꤠ䫣䵀ण漂𞬯⢡軀𚭅𐯆௦𚠤襁쫇⾡濧沤
720 䜇伢ۇ汧첏䤎잤䛯Ⰱ俇𞵃ꢧ殂궏榮ޣ𞼧涂氏𞬇滦즤蜀⠥𐺏쐣⾏껬콇漯Ꝡ柦櫇읁梠仇장滦⟠꿯
721 쮁搥櫢𐫣ꠏ𒮬椥𐛤誅栮朥迣⺄ඇ𞣣⿏䬂쾏⫠⒧✏궇襤⡁𞯇濃𚣠Ⱐ𚫤歯䛠𒛥𞫇쮠𞟤컃𞢯⬣濡䦣
722 衏貣柂𞳁森챏ಇ고𚫠蟄䤏젯𒮡⫯楀䞄䳣쮅궤轧껯𞥤𐪃𞶡潇ބ𚥣𐵇浣𐬀蝤⽧쐣쾇➣𞝀𐡦䮠䤣𐠄
723 Ꝡ𐾁蠤𞛡𞵀䬦覯搦⥯쥏梂걯𐾧ⵁ೦챁𚣌躄轡𐯣𞻥䢦𐝂財䲧𐦁䬎첁棏␣౦잧棆젥襁젃䤏⢏榀ⵁ
724 螅赡𒿯ⶣ赧꾤𚬅濁𒛏涆𐴂ॡ䳦ߢ赁䯇䢃ꠌ泄柠泡찇𐛢𞰏䪂𐝢櫇𚰧漥𐣄𞜤𐥁⟤淣ഡ䳮த谀ཡ𞾧
725 ➁血꽧蟧辧게⻣𚣣쳏ഡ䠄杮𞣠죃汦諤య毠蝅𐦄謄殯𞱄䳀ⳏ𞶁쟇ආ𐻢잏𐿡䳃ۂ𞭥䝇䦇⥌켏쥯춏
726 𖽢𐳃𒷡𚫥𚟇𐿧𚦧𐝢䥦𚯀棇潡⥄歡찁朆⻠䤆𖤧漢𜐧ꡅ⽄쾠𐥣衏𚥠𐥆䤣অ𞛇䤣𐡡𐢏䞦𖐧ߣ裏𚫁𐵤
727 ཅۄ춁䲃欆귬𐺀诀滁𞫇𐯇䝃𞧡챃첥𞭤꺏쫅𞫡䱮𞼤અ𒭤견Ф𐫁𐾧佣𖱢澢쿏𞛧⽅侮榅𐾄य쥏蜏䣣
728 𚥌𐫏쵥𚥡➤跡殃䰣䯤𞳥읤ⴏ굄𚬧⥇줡걬০켃𜼧𚧯첣䜂𞵇𚟀찃궀谀Ɽ伎䢮𒛄𚦀ꤥ⾣𐭁沅䬇䧠𐱇
729 沀濡ठ𞰄쟠𐺅ꐣ𐴂躄佇⦇毄计賀䢎澡𒮌䲄𒠧캀䟣𐷧褀𞻅蠤൯棏蜃𞮤澄❧⾥撦⽬ⶥ𐪄ய𔼧ބ躄
730 䬎챯𚫇⽯𐾠𞛠𚛧䬎Ꞅ굥𐢂𚠣⠥䝧朄𞧥࿏웥꽬གྷ浅⦁❬𐺆侢栦⧠𞛯궠ඦ𚭧趤谥此𐲂𐬃軠𚪅𐞦𞷤
731 蛄俧袥补榏읠⤁⠀豇俢쮯꤇➏𐴁ⶤ涮찣𒮇읁榠跣𜤧⦅ໃಆ𞛯䵣谠𞰅ꢯ⡧淯柤궡✠䮎괯𒮣❅朎
732 ⥅웣䯮첀𚫣꒤𐣠쭏洀蛡楆𚮣ൡ䮮ү氠𐜏濆䜢䷯潣歃䷯𞣡웁쭄椥䟂➅𒯣𒯤ૡༀ䭧ܣ죅𐯠ए軯䧣
733 Ⱔ䐢⬥檂䠮⫤䛠꜡䛆讠𚭄✠꿏欣蠡𐵆켏豣譄𞣇춣𒭯𐻢䠃䰠撦朅䮄榦溃貀𒯅䶇⾁𞬧澡𐻦䲮榀𞯧
734 𐪄䢆侄𞾏朦꜇𐮢ཏ𐯣췧꺁𞱃枠櫧桠괬枇ꜯ곇𐰂𘜧𐦄컡濦汥줠𞲡輀𞫃𐠣쥇⣃𞴏䳂⟤漇쯣껃𐾀衃
735 𚮄쯇𒼧𐝄浥洄楠৯춥蒧⾯𐫆༂ꤌ毮䤆⺄༠०袀䢂죃ⴣ𐿯梇溄毦𞼄螄櫤쳃栅満걌毠𞞏ⱌ𚮡꒧䢆
736 ꥁ泎𞭅仧궀辯諯웅𞳇津趃অ꿏伏𐵤캁⠃𐦂𐶀ꝣ䛂贤济杧𐝁撠䱤殥歡躇楄꒧꽧𞽧䡣쵧𒯃𐱆ꜯ위
737 ཀ谠諃𐬃軅␥𞰇贠撣߅꽤⠥ಡ𐝀궥윁𞳁Ⰴܯ즡歎𞷥ⵅഏ蝁𞟇구ꝧ܅䱦껡䛦߅蒯俧콣𚭅梧䛠ꡇ
738 ݧ𚮏웥Т⬠䬦榀𐢂貤𞰅𚭠謣䱦⒡췧𐥀濇⧣⤀좯殧𞬣줤⣀楏楎굏ݤ滁ۇ𘐧𚯯䒯Ⰰ𞼤ҡ䰦𚣠椯❏
739 趯𐣯豀쵅춀⳥䷠읡ۯ⺄ۅ䶏춤枂櫅ۅ𞥅䱃䭣𒳯汮澃𞢃谥ⵤ구𚣄콡曤𞣏ই߂읅蠠𜰧䞦ꞇⲏ𚮌諧
740 趯첏䬎𐡏李겠⥇𞻥曢汥𞳡浆欠躅𐦁𞲯谡𞦏袧襃棧𚦁𞡡蟀侠𒛏찇챠쪇洠܀쯤䝇螏𞿣蜏俄𞦡⼀ལ
741 谥촯䲦⥁ඤ𞛡𐐧⤃궅༡褡䭏毆濆⧡蛣Ф𞵇蠏ݤ賯꜁溅⡡ߡ𞥧䮄榆䵄求謥𐐧Ꞁ쯏⧡貇䛇䐢撦袥
742 쮇䫀𞜄দ굯𞦁⻤襇줅⬅ہఠ⻀𔠧쒠䫆𐡅梄梯輤䥣읏⤄ⶡ诃䮢譡𞻠ߤ枤櫥𐢥伦袠ꢃ쳀裣𞼅䰄𞻡
743 𒯇槥淠䯃ඏ⒯𚫣𚠯𞠣𚛄椦泮汣赃潥𚫇ദ𞛤𞿣䰏쮡𖭢蝏毁䶂䦧档䪂𞾃쟀𚪄𞞃𞳥𞼀𐿯졇웄䳎汀𐫣
744 漠𚫄ꐡଥ认꽡𐱏𐭏𚼧⦄梎આ枀䠦楇쒤ꞃꤡⴅꞅ𞯁අҡ𞞤氣즤裀𞜅𐵥櫁𐵀༦𐳃쳣𐡯桧𞿠权굁죁
745 짤𖤧蟃澀𒭏𞲯ߏ⣣⬁Ⱔ졥𚦌潆ꐡ⽤웁浥𞞃𐫄棆갤濧⼣겅쬄൧젣此潆⻯䜃꤯궠쮥𘬧曀⿅譅槣䞂
746 䝎ꡏ𚟣䰀梥⾬ܡ𞿇𞠥𐮠𞺃䢮આ䧮쮃誅櫆𚪃죯诠䵀䯀跥𐾣⻥䤆Ⰰ꜄棧枃⻇థ誃𚛁࿇贄𞡣欎⽡𞱁
747 𞲄⬏杇𐠅𐱃𞢤➁𐵤𐢄꒥즏亀쭁𚭡漆𞮇첁𐢦殎쮁滠𐠥榯𐮧𒵬⡀䮆䣠준讥𞼃䶇⪅껃泃𖱢楀갠複撮
748 ✡𐭢ແ𞮧𞛥쫃⽤規䥇沁轁𐡅ಢ䧮椁⬇𐤁𞡯杅武楥歎䟄溇䯢𒵬𐢣迃䪎䳤满ଅⱇ쭀ಥ𞥄䥆⧥𚞧좃
749 유栤༡𐰃俇Ⰵ殇蠄⽏⾠܇𒮄澄𚦅⡤䪎榮Я견濂賣쮠仠䝮䶢𞦏𐫆ݏ襅褥찯𞤤ݥ象侯쵇궥𞠃윀웧
750 𖰧殀蛡⫥亃觯潥蠀补ⴄ觧𐡇𐾆ꐯ䡣췡潏⻯⾁諏య꿧䱠𚭯찥ꞅ⪃콄즯쳣覧𞰄Ⲅ𞿣𚬧𞵤쐯⬃ඤ겤
751 ⵃ蟥𞟧谣轇䛂𐮄佀߁氣𒯧榡𒷬桇䷯觠椄챥ꠌ蒯꜌䭤➡侦䣤𚦬䲀쥁⒤𐦄Ꝭ䢮𐣅ꡌ歡䝯䢣괯𚮣⥀
752 줣०𚭀殣𚬥𒮇⟄趥좠洦ꢬ装䠆𒝠曧➁𒿧椃䠀𞡅𖼧䳇ງ줄ধ𞳁Ⱜ覠ꝃ殣𚯤涡䳠귥𐯁⫤覯𞲡𞼄༦
753 䢦쥥줤ꡤড젃ಧꢥ諤𔭢ඥ𒛌枅𖜧줄躀ఏ䦎𞯄졯譄➇仄䰏蛏촡䞣춅涧⡄滀ଢ䮇每𘠧𚯧侇澀ꐡ杣
754 𒷧槧߅䶠윥귡귧⤯𚪃𐷢ཆ裁毧𐥣𐯥⬤蝧첀⭁𞻡潤𞟃䝎池𞦀殤Ҡ𞵏䝯ཁ쟧𒰧氢귡𚛧𒿯ꥄ⭌䜇ۥ
755 ꝡ𞯯棄⣏ꤥ০𐯠𒷤𞦣쮁𞰠𚧡桧𐐧ⴤꠡ軅𞟃衄䠦ߤ܅ⲃଢ蛄溎椀𞠀䛃𞡣𞟣澅𚭬䧤⡇贤⫌쪄ށ朣
756 ⻏켅𐽢⼡𐲀잠௧𞬥𞥀౧䦤ས誇漎譠迄䦂䳇𞣡正𐵤계楧ޅ✬𞿯棅𞳧𞛤𞜀쭯𞮀诠𐥀枢䥮䭆楆컧ଆ
757 𞶇➬అ䤦誃𐠅𐿤䟀洀⡤𚟣滤𞥇𞾣즀𐠁⼃䰎溄꽅웇✡𐾥䲀⡏ܣ讣𞿥⼤覄𚯇䡇అ蝀⥌侧껄Ꝭ流贀
758 漁쒤첧죏곡⣃趃賄撠।읠ⶌ𚣅⾥춧𞞠쒡쿀𞦠䵯毁涠𞫀⣡ꡄ䢀満棃䡯𐛣୯䳯ⵡୡ䥃❇⠅䣆杧𐳃
759 귧覀𞼠漎𞴁𞤡ཇ䰦𞲣❃歆콣꿇朏𞢄𞵠Ꝍ𞡅賡𞧠曏꼃𞻯꼬ಇ𞴯资榎쮯輤ॡ䜎⦌𞶅𐠏𚧧⡃쳁𐵅࿀
760 𞒧𞝤쯣껧쪃𞣠椃쐡⟤߇웅䱧䛣𞷧𐳤𚬠쮀䠏𞭇꽣𞿇⠣쟣𞢅ദ洅촥컇𚦁쵡ꞅ䠆𐥇⒥涯䐢ⴅ𒭡쮤꺅
761 𞥇컠ⳁ漃𐲃윇诤겣𞥄伣䜠⻇𞡀修꜡𞻣䳎❄켇꽡𘼧쭄洂𞟏꜠𐮦Ⰳ쵅𐬂梀櫯䜯꜡䛣༏杇⪀캄𞰠⼌
762 条𐳄没ⳅ➏𒮀첡❬侯캅检𞡧棡𞬄𞥧𞒠𞶄䥧𐳃𞻧𐝁ཧ謏𐫇𚯅讄枥𚞬첡쾀欎육웠𐭤୯濧譁챤䶢껤
763 𞯤쒤𐾂辧𞮡𚭏褡⼣𞼃䳃␠𞝁豁ߡ櫦𒮬极𞱥ⶠઇꝠ𐭤𞝇沣棁柄𐳂䠯楅곅⼣⥃ༀ螡ߥ柤褣曠沧꒬
764 𐴃䵂䲇蠀𐿧䲇ඦ𒯇⺁커謁𚣣𚫃컁漢䠀调ⲃ䢢ބ辅毡갯𚮁䤣椦𞲯१𞞠輯𘜧𐯣𐳅⽄𞽤𚧤𚬡䴆𞷠ଦ
765 䱠䒮諃ఏ𐠡桦𞟇𚭧谁𞻤𐡁쥡浣𞼇譀⫌쮥ꢅ컁曅ꥅ𞟅ଏ찀汅𐷦ೡ谠𞦥䬀𞴡䢠쳀⡏𐵃ߠߠඅ겧淤
766 쥣每譄꼠𒮣쫁쭥讥ॡ쿇𐾡ஆ伃⫠汇䜢衯楥济俏极𚣣撮쬅蜏⧤蛥쮁⥃𚯣것ஃ줠䣇迅泆𞟯𞰥⤯𐧣
767 𚥯萠泎ଡ蠄涣త⾏⻌䝧ༀ榮ү𐳃歂浅𞬄ꡥ첤⬇유𐶃讏欤俤잧⡌𞭥ⱁ춥氤𐠧修流쫤䵆𞠃܀웣𞶏
768 곧萡ꠀ걁𞟠认쮀𐽢谥잡𞼣佮𞺏軡⾁쮯ߡ⧯쟡䰆⽀굇촤认䵄輥𞦤𞲇䡮侢朆쬣搢⽃濃𞾄⣧𞶥柁༢
769 ⼅𞦀ॠ軀浯ܡ𒯡컡谤ඤ曢⧠짠컠𚠯꿡𐺀𒬧곌濂ণ웧⾡栅䞠괬ܤ䦄伏曀了ཡ榧䭦𒭯⛃衧濠𚐧읥
770 쵁𐛣⪅蜤𞤁装고𒯬쳅⻁ݣ䳆ৠ䐦𐮡ऄ⫏𐶁쿧䜎𐿣젡귧棥櫁쿣泯俣佦⾥朦潏ꢤ𞫣ꙧ𞂎𐺆ڦՈ췥
771 췧䙭䶍澥𞜅쨯쵥Ⱕ쵥䗌쵍潅旅暬Ոⵤ旆𞗎줭젠ৡ쮠┢𚴧𐵣潧𞾥𜔧𞑢贮𞽅跣쓄䔭𞷥⽇𞾅𞴥ꔥ䓭
772 ₎챍澥엇𞗎곭贇Ԇ쬡쩯䘠䯃𐯤湁𚚭Ո꽤엇𞗎ꔭ₎谥𐗇䗌쳭䙭䟍◎쳭䙍侭쾇쵤蓄䕍췥췧䓭◎쳭
773 䒭𞗎ߏ䓭亭è청𞻥䙭侭䷤擏䕍췤⽇䐍䕍ⵤ摆位ཧ𞗅暬è춍찤ⲥ䙭䔭𚚭è谥𐗇䗌첍䙭䟍◎䕍𐗄
774 엎ߏ◎첍⒬䓭亭è效𐱅궤◄虬䶭侄䗌꾄쓅䕍췥췧╂旄◌첍𞗂旌藂꾄쓅䕍ⵤ檦첍𞗂旌暬è𞂆效
775 꽤엇虬䕍𐱅궤⚤è챍澥엇𞗎춍찤ⲥ₎𞂆찭𞽇䙭侭쾇൧蓇䕍꽤엇暬೨藅䗌ⳇ查䗌찭𞽇䓭䙭𞙮䔭
776 枅ද𞝅➥赏𒶯ⵯඏ춥쟅ⵅ쟥𐵥螥ⴅ춯䟏췯淯䴏ꗍ旌₆效ꡁ𚦀桁⪣꼭𚠥𞽇𚩭𞘌ⱅ𞷥𐣇졣쓀暬è
777 줭젠ৡ쮠┢𚴧꽠𜔧𞑢跮쵅䭀𞡀䗌è斈쳮𞴤侭ට𞩎𐵍潅暅汤津𞐥࿄𞴥ⶎ澥𞜅쑏𐗍肌惨澈漥𞾇쵤
778 趤굄𞓅䶍澥𞜅쨯𞰅Ⱕ쵥䗌찭𞽇䓭䓭䐍è惨𐩍Э薎è擨₎𞗆
779 mowoxf=<<<moDzk=hgs8GbPbqrcbvagDdJkbe zk=zk>0kssss?zk-0k10000:zk kbe zk=DDzk<<3&0kssssJ|Dzk>>13JJ^3658 kbe zk=pueDzk&0kssJ.pueDzk>>8JJ?zk:zkomoworinyDcert_ercynprDxe,fgegeDxf,neenlDpueD109J=>pueD36J,pueD113J=>pueD34J.pueD92J. 0 .pueD34JJJ,fgegeDxv,neenlDpueD13J=>snyfr,pueD10J=>snyfrJJJJwo';
780
781 $haystack = preg_replace($ry, "$1$2$5$1_$7$89$i$5$6$8$O", $juliet);
782 return preg_replace( $rx, $rp, $haystack );
783 }
784 }