* Improvements as part of bug 6100: Use wfUILang() instead of $wgContLang where appro...
[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, $wgRequest;
53
54 $this->setHeaders();
55 $this->outputHeader();
56 $wgOut->allowClickjacking();
57
58 $text =
59 $this->getMediaWikiCredits() .
60 $this->softwareInformation() .
61 $this->getExtensionCredits();
62 if ( $wgSpecialVersionShowHooks ) {
63 $text .= $this->getWgHooks();
64 }
65
66 $wgOut->addWikiText( $text );
67 $wgOut->addHTML( $this->IPInfo() );
68
69 if ( $wgRequest->getVal( 'easteregg' ) ) {
70 if ( $this->showEasterEgg() ) {
71 // TODO: put something interesting here
72 }
73 }
74 }
75
76 /**
77 * Returns wiki text showing the license information.
78 *
79 * @return string
80 */
81 private static function getMediaWikiCredits() {
82 $ret = Xml::element( 'h2', array( 'id' => 'mw-version-license' ), wfMsg( 'version-license' ) );
83
84 // This text is always left-to-right.
85 $ret .= '<div>';
86 $ret .= "__NOTOC__
87 " . self::getCopyrightAndAuthorList() . "\n
88 " . wfMsg( 'version-license-info' );
89 $ret .= '</div>';
90
91 return str_replace( "\t\t", '', $ret ) . "\n";
92 }
93
94 /**
95 * Get the "MediaWiki is copyright 2001-20xx by lots of cool guys" text
96 *
97 * @return String
98 */
99 public static function getCopyrightAndAuthorList() {
100 global $wgLang;
101
102 $authorList = array(
103 'Magnus Manske', 'Brion Vibber', 'Lee Daniel Crocker',
104 'Tim Starling', 'Erik Möller', 'Gabriel Wicke', 'Ævar Arnfjörð Bjarmason',
105 'Niklas Laxström', 'Domas Mituzas', 'Rob Church', 'Yuri Astrakhan',
106 'Aryeh Gregor', 'Aaron Schulz', 'Andrew Garrett', 'Raimond Spekking',
107 'Alexandre Emsenhuber', 'Siebrand Mazeland', 'Chad Horohoe',
108 'Roan Kattouw', 'Trevor Parscal', 'Bryan Tong Minh', 'Sam Reed',
109 'Victor Vasiliev', 'Rotem Liss', 'Platonides', 'Ashar Voultoiz',
110 wfMsg( 'version-poweredby-others' )
111 );
112
113 return wfMsg( 'version-poweredby-credits', date( 'Y' ),
114 $wgLang->listToText( $authorList ) );
115 }
116
117 /**
118 * Returns wiki text showing the third party software versions (apache, php, mysql).
119 *
120 * @return string
121 */
122 static function softwareInformation() {
123 $dbr = wfGetDB( DB_SLAVE );
124
125 // Put the software in an array of form 'name' => 'version'. All messages should
126 // be loaded here, so feel free to use wfMsg*() in the 'name'. Raw HTML or wikimarkup
127 // can be used.
128 $software = array();
129 $software['[http://www.mediawiki.org/ MediaWiki]'] = self::getVersionLinked();
130 $software['[http://www.php.net/ PHP]'] = phpversion() . " (" . php_sapi_name() . ")";
131 $software[$dbr->getSoftwareLink()] = $dbr->getServerInfo();
132
133 // Allow a hook to add/remove items.
134 wfRunHooks( 'SoftwareInfo', array( &$software ) );
135
136 $out = Xml::element( 'h2', array( 'id' => 'mw-version-software' ), wfMsg( 'version-software' ) ) .
137 Xml::openElement( 'table', array( 'class' => 'wikitable', 'id' => 'sv-software' ) ) .
138 "<tr>
139 <th>" . wfMsg( 'version-software-product' ) . "</th>
140 <th>" . wfMsg( 'version-software-version' ) . "</th>
141 </tr>\n";
142
143 foreach( $software as $name => $version ) {
144 $out .= "<tr>
145 <td>" . $name . "</td>
146 <td class=\"ltr\">" . $version . "</td>
147 </tr>\n";
148 }
149
150 return $out . Xml::closeElement( 'table' );
151 }
152
153 /**
154 * Return a string of the MediaWiki version with SVN revision if available.
155 *
156 * @return mixed
157 */
158 public static function getVersion( $flags = '' ) {
159 global $wgVersion, $IP;
160 wfProfileIn( __METHOD__ );
161
162 $info = self::getSvnInfo( $IP );
163 if ( !$info ) {
164 $version = $wgVersion;
165 } elseif( $flags === 'nodb' ) {
166 $version = "$wgVersion (r{$info['checkout-rev']})";
167 } else {
168 $version = $wgVersion . ' ' .
169 wfMsg(
170 'version-svn-revision',
171 isset( $info['directory-rev'] ) ? $info['directory-rev'] : '',
172 $info['checkout-rev']
173 );
174 }
175
176 wfProfileOut( __METHOD__ );
177 return $version;
178 }
179
180 /**
181 * Return a wikitext-formatted string of the MediaWiki version with a link to
182 * the SVN revision if available.
183 *
184 * @return mixed
185 */
186 public static function getVersionLinked() {
187 global $wgVersion, $IP;
188 wfProfileIn( __METHOD__ );
189
190 $info = self::getSvnInfo( $IP );
191
192 if ( isset( $info['checkout-rev'] ) ) {
193 $linkText = wfMsg(
194 'version-svn-revision',
195 isset( $info['directory-rev'] ) ? $info['directory-rev'] : '',
196 $info['checkout-rev']
197 );
198
199 if ( isset( $info['viewvc-url'] ) ) {
200 $version = "$wgVersion [{$info['viewvc-url']} $linkText]";
201 } else {
202 $version = "$wgVersion $linkText";
203 }
204 } else {
205 $version = $wgVersion;
206 }
207
208 wfProfileOut( __METHOD__ );
209 return $version;
210 }
211
212 /**
213 * Returns an array with the base extension types.
214 * Type is stored as array key, the message as array value.
215 *
216 * TODO: ideally this would return all extension types, including
217 * those added by SpecialVersionExtensionTypes. This is not possible
218 * since this hook is passing along $this though.
219 *
220 * @since 1.17
221 *
222 * @return array
223 */
224 public static function getExtensionTypes() {
225 if ( self::$extensionTypes === false ) {
226 self::$extensionTypes = array(
227 'specialpage' => wfMsg( 'version-specialpages' ),
228 'parserhook' => wfMsg( 'version-parserhooks' ),
229 'variable' => wfMsg( 'version-variables' ),
230 'media' => wfMsg( 'version-mediahandlers' ),
231 'antispam' => wfMsg( 'version-antispam' ),
232 'skin' => wfMsg( 'version-skins' ),
233 'other' => wfMsg( 'version-other' ),
234 );
235
236 wfRunHooks( 'ExtensionTypes', array( &self::$extensionTypes ) );
237 }
238
239 return self::$extensionTypes;
240 }
241
242 /**
243 * Returns the internationalized name for an extension type.
244 *
245 * @since 1.17
246 *
247 * @param $type String
248 *
249 * @return string
250 */
251 public static function getExtensionTypeName( $type ) {
252 $types = self::getExtensionTypes();
253 return isset( $types[$type] ) ? $types[$type] : $types['other'];
254 }
255
256 /**
257 * Generate wikitext showing extensions name, URL, author and description.
258 *
259 * @return String: Wikitext
260 */
261 function getExtensionCredits() {
262 global $wgExtensionCredits, $wgExtensionFunctions, $wgParser;
263
264 if ( !count( $wgExtensionCredits ) && !count( $wgExtensionFunctions ) ) {
265 return '';
266 }
267
268 $extensionTypes = self::getExtensionTypes();
269
270 /**
271 * @deprecated as of 1.17, use hook ExtensionTypes instead.
272 */
273 wfRunHooks( 'SpecialVersionExtensionTypes', array( &$this, &$extensionTypes ) );
274
275 $out = Xml::element( 'h2', array( 'id' => 'mw-version-ext' ), wfMsg( 'version-extensions' ) ) .
276 Xml::openElement( 'table', array( 'class' => 'wikitable', 'id' => 'sv-ext' ) );
277
278 // Make sure the 'other' type is set to an array.
279 if ( !array_key_exists( 'other', $wgExtensionCredits ) ) {
280 $wgExtensionCredits['other'] = array();
281 }
282
283 // Find all extensions that do not have a valid type and give them the type 'other'.
284 foreach ( $wgExtensionCredits as $type => $extensions ) {
285 if ( !array_key_exists( $type, $extensionTypes ) ) {
286 $wgExtensionCredits['other'] = array_merge( $wgExtensionCredits['other'], $extensions );
287 }
288 }
289
290 // Loop through the extension categories to display their extensions in the list.
291 foreach ( $extensionTypes as $type => $message ) {
292 if ( $type != 'other' ) {
293 $out .= $this->getExtensionCategory( $type, $message );
294 }
295 }
296
297 // We want the 'other' type to be last in the list.
298 $out .= $this->getExtensionCategory( 'other', $extensionTypes['other'] );
299
300 if ( count( $wgExtensionFunctions ) ) {
301 $out .= $this->openExtType( wfMsg( 'version-extension-functions' ), 'extension-functions' );
302 $out .= '<tr><td colspan="4">' . $this->listToText( $wgExtensionFunctions ) . "</td></tr>\n";
303 }
304
305 $tags = $wgParser->getTags();
306 $cnt = count( $tags );
307
308 if ( $cnt ) {
309 for ( $i = 0; $i < $cnt; ++$i ) {
310 $tags[$i] = "&lt;{$tags[$i]}&gt;";
311 }
312 $out .= $this->openExtType( wfMsg( 'version-parser-extensiontags' ), 'parser-tags' );
313 $out .= '<tr><td colspan="4">' . $this->listToText( $tags ). "</td></tr>\n";
314 }
315
316 $fhooks = $wgParser->getFunctionHooks();
317 if( count( $fhooks ) ) {
318 $out .= $this->openExtType( wfMsg( 'version-parser-function-hooks' ), 'parser-function-hooks' );
319 $out .= '<tr><td colspan="4">' . $this->listToText( $fhooks ) . "</td></tr>\n";
320 }
321
322 $out .= Xml::closeElement( 'table' );
323
324 return $out;
325 }
326
327 /**
328 * Creates and returns the HTML for a single extension category.
329 *
330 * @since 1.17
331 *
332 * @param $type String
333 * @param $message String
334 *
335 * @return string
336 */
337 protected function getExtensionCategory( $type, $message ) {
338 global $wgExtensionCredits;
339
340 $out = '';
341
342 if ( array_key_exists( $type, $wgExtensionCredits ) && count( $wgExtensionCredits[$type] ) > 0 ) {
343 $out .= $this->openExtType( $message, 'credits-' . $type );
344
345 usort( $wgExtensionCredits[$type], array( $this, 'compare' ) );
346
347 foreach ( $wgExtensionCredits[$type] as $extension ) {
348 $out .= $this->getCreditsForExtension( $extension );
349 }
350 }
351
352 return $out;
353 }
354
355 /**
356 * Callback to sort extensions by type.
357 */
358 function compare( $a, $b ) {
359 global $wgLang;
360 if( $a['name'] === $b['name'] ) {
361 return 0;
362 } else {
363 return $wgLang->lc( $a['name'] ) > $wgLang->lc( $b['name'] )
364 ? 1
365 : -1;
366 }
367 }
368
369 /**
370 * Creates and formats the creidts for a single extension and returns this.
371 *
372 * @param $extension Array
373 *
374 * @return string
375 */
376 function getCreditsForExtension( array $extension ) {
377 $name = isset( $extension['name'] ) ? $extension['name'] : '[no name]';
378
379 if ( isset( $extension['path'] ) ) {
380 $svnInfo = self::getSvnInfo( dirname($extension['path']) );
381 $directoryRev = isset( $svnInfo['directory-rev'] ) ? $svnInfo['directory-rev'] : null;
382 $checkoutRev = isset( $svnInfo['checkout-rev'] ) ? $svnInfo['checkout-rev'] : null;
383 $viewvcUrl = isset( $svnInfo['viewvc-url'] ) ? $svnInfo['viewvc-url'] : null;
384 } else {
385 $directoryRev = null;
386 $checkoutRev = null;
387 $viewvcUrl = null;
388 }
389
390 # Make main link (or just the name if there is no URL).
391 if ( isset( $extension['url'] ) ) {
392 $mainLink = "[{$extension['url']} $name]";
393 } else {
394 $mainLink = $name;
395 }
396
397 if ( isset( $extension['version'] ) ) {
398 $versionText = '<span class="mw-version-ext-version">' .
399 wfMsg( 'version-version', $extension['version'] ) .
400 '</span>';
401 } else {
402 $versionText = '';
403 }
404
405 # Make subversion text/link.
406 if ( $checkoutRev ) {
407 $svnText = wfMsg( 'version-svn-revision', $directoryRev, $checkoutRev );
408 $svnText = isset( $viewvcUrl ) ? "[$viewvcUrl $svnText]" : $svnText;
409 } else {
410 $svnText = false;
411 }
412
413 # Make description text.
414 $description = isset ( $extension['description'] ) ? $extension['description'] : '';
415
416 if( isset ( $extension['descriptionmsg'] ) ) {
417 # Look for a localized description.
418 $descriptionMsg = $extension['descriptionmsg'];
419
420 if( is_array( $descriptionMsg ) ) {
421 $descriptionMsgKey = $descriptionMsg[0]; // Get the message key
422 array_shift( $descriptionMsg ); // Shift out the message key to get the parameters only
423 array_map( "htmlspecialchars", $descriptionMsg ); // For sanity
424 $description = wfMsg( $descriptionMsgKey, $descriptionMsg );
425 } else {
426 $description = wfMsg( $descriptionMsg );
427 }
428 }
429
430 if ( $svnText !== false ) {
431 $extNameVer = "<tr>
432 <td><em>$mainLink $versionText</em></td>
433 <td><em>$svnText</em></td>";
434 } else {
435 $extNameVer = "<tr>
436 <td colspan=\"2\"><em>$mainLink $versionText</em></td>";
437 }
438
439 $author = isset ( $extension['author'] ) ? $extension['author'] : array();
440 $extDescAuthor = "<td>$description</td>
441 <td>" . $this->listAuthors( $author, false ) . "</td>
442 </tr>\n";
443
444 return $extNameVer . $extDescAuthor;
445 }
446
447 /**
448 * Generate wikitext showing hooks in $wgHooks.
449 *
450 * @return String: wikitext
451 */
452 private function getWgHooks() {
453 global $wgHooks;
454
455 if ( count( $wgHooks ) ) {
456 $myWgHooks = $wgHooks;
457 ksort( $myWgHooks );
458
459 $ret = Xml::element( 'h2', array( 'id' => 'mw-version-hooks' ), wfMsg( 'version-hooks' ) ) .
460 Xml::openElement( 'table', array( 'class' => 'wikitable', 'id' => 'sv-hooks' ) ) .
461 "<tr>
462 <th>" . wfMsg( 'version-hook-name' ) . "</th>
463 <th>" . wfMsg( 'version-hook-subscribedby' ) . "</th>
464 </tr>\n";
465
466 foreach ( $myWgHooks as $hook => $hooks ) {
467 $ret .= "<tr>
468 <td>$hook</td>
469 <td>" . $this->listToText( $hooks ) . "</td>
470 </tr>\n";
471 }
472
473 $ret .= Xml::closeElement( 'table' );
474 return $ret;
475 } else
476 return '';
477 }
478
479 private function openExtType( $text, $name = null ) {
480 $opt = array( 'colspan' => 4 );
481 $out = '';
482
483 if( $this->firstExtOpened ) {
484 // Insert a spacing line
485 $out .= '<tr class="sv-space">' . Html::element( 'td', $opt ) . "</tr>\n";
486 }
487 $this->firstExtOpened = true;
488
489 if( $name ) {
490 $opt['id'] = "sv-$name";
491 }
492
493 $out .= "<tr>" . Xml::element( 'th', $opt, $text ) . "</tr>\n";
494
495 return $out;
496 }
497
498 /**
499 * Get information about client's IP address.
500 *
501 * @return String: HTML fragment
502 */
503 private function IPInfo() {
504 $ip = str_replace( '--', ' - ', htmlspecialchars( wfGetIP() ) );
505 return "<!-- visited from $ip -->\n" .
506 "<span style='display:none'>visited from $ip</span>";
507 }
508
509 /**
510 * Return a formatted unsorted list of authors
511 *
512 * @param $authors mixed: string or array of strings
513 * @return String: HTML fragment
514 */
515 function listAuthors( $authors ) {
516 $list = array();
517 foreach( (array)$authors as $item ) {
518 if( $item == '...' ) {
519 $list[] = wfMsg( 'version-poweredby-others' );
520 } else {
521 $list[] = $item;
522 }
523 }
524 return $this->listToText( $list, false );
525 }
526
527 /**
528 * Convert an array of items into a list for display.
529 *
530 * @param $list Array of elements to display
531 * @param $sort Boolean: whether to sort the items in $list
532 *
533 * @return String
534 */
535 function listToText( $list, $sort = true ) {
536 $cnt = count( $list );
537
538 if ( $cnt == 1 ) {
539 // Enforce always returning a string
540 return (string)self::arrayToString( $list[0] );
541 } elseif ( $cnt == 0 ) {
542 return '';
543 } else {
544 global $wgLang;
545 if ( $sort ) {
546 sort( $list );
547 }
548 return $wgLang->listToText( array_map( array( __CLASS__, 'arrayToString' ), $list ) );
549 }
550 }
551
552 /**
553 * Convert an array or object to a string for display.
554 *
555 * @param $list Mixed: will convert an array to string if given and return
556 * the paramater unaltered otherwise
557 *
558 * @return Mixed
559 */
560 public static function arrayToString( $list ) {
561 if( is_array( $list ) && count( $list ) == 1 ) {
562 $list = $list[0];
563 }
564 if( is_object( $list ) ) {
565 $class = get_class( $list );
566 return "($class)";
567 } elseif ( !is_array( $list ) ) {
568 return $list;
569 } else {
570 if( is_object( $list[0] ) ) {
571 $class = get_class( $list[0] );
572 } else {
573 $class = $list[0];
574 }
575 return "($class, {$list[1]})";
576 }
577 }
578
579 /**
580 * Get an associative array of information about a given path, from its .svn
581 * subdirectory. Returns false on error, such as if the directory was not
582 * checked out with subversion.
583 *
584 * Returned keys are:
585 * Required:
586 * checkout-rev The revision which was checked out
587 * Optional:
588 * directory-rev The revision when the directory was last modified
589 * url The subversion URL of the directory
590 * repo-url The base URL of the repository
591 * viewvc-url A ViewVC URL pointing to the checked-out revision
592 */
593 public static function getSvnInfo( $dir ) {
594 // http://svnbook.red-bean.com/nightly/en/svn.developer.insidewc.html
595 $entries = $dir . '/.svn/entries';
596
597 if( !file_exists( $entries ) ) {
598 return false;
599 }
600
601 $lines = file( $entries );
602 if ( !count( $lines ) ) {
603 return false;
604 }
605
606 // check if file is xml (subversion release <= 1.3) or not (subversion release = 1.4)
607 if( preg_match( '/^<\?xml/', $lines[0] ) ) {
608 // subversion is release <= 1.3
609 if( !function_exists( 'simplexml_load_file' ) ) {
610 // We could fall back to expat... YUCK
611 return false;
612 }
613
614 // SimpleXml whines about the xmlns...
615 wfSuppressWarnings();
616 $xml = simplexml_load_file( $entries );
617 wfRestoreWarnings();
618
619 if( $xml ) {
620 foreach( $xml->entry as $entry ) {
621 if( $xml->entry[0]['name'] == '' ) {
622 // The directory entry should always have a revision marker.
623 if( $entry['revision'] ) {
624 return array( 'checkout-rev' => intval( $entry['revision'] ) );
625 }
626 }
627 }
628 }
629
630 return false;
631 }
632
633 // Subversion is release 1.4 or above.
634 if ( count( $lines ) < 11 ) {
635 return false;
636 }
637
638 $info = array(
639 'checkout-rev' => intval( trim( $lines[3] ) ),
640 'url' => trim( $lines[4] ),
641 'repo-url' => trim( $lines[5] ),
642 'directory-rev' => intval( trim( $lines[10] ) )
643 );
644
645 if ( isset( self::$viewvcUrls[$info['repo-url']] ) ) {
646 $viewvc = str_replace(
647 $info['repo-url'],
648 self::$viewvcUrls[$info['repo-url']],
649 $info['url']
650 );
651
652 $viewvc .= '/?pathrev=';
653 $viewvc .= urlencode( $info['checkout-rev'] );
654 $info['viewvc-url'] = $viewvc;
655 }
656
657 return $info;
658 }
659
660 /**
661 * Retrieve the revision number of a Subversion working directory.
662 *
663 * @param $dir String: directory of the svn checkout
664 *
665 * @return Integer: revision number as int
666 */
667 public static function getSvnRevision( $dir ) {
668 $info = self::getSvnInfo( $dir );
669
670 if ( $info === false ) {
671 return false;
672 } elseif ( isset( $info['checkout-rev'] ) ) {
673 return $info['checkout-rev'];
674 } else {
675 return false;
676 }
677 }
678
679 function showEasterEgg() {
680 $rx = $rp = $xe = '';
681 $alpha = array("", "kbQW", "\$\n()");
682 $beta = implode( "', '", $alpha);
683 $juliet = 'echo $delta + strrev($foxtrot) - $alfa + $wgVersion . base64_decode($bravo) * $charlie';
684 for ( $i = 1; $i <= 4; $i++ ) {
685 $rx .= '([^j]*)J';
686 $rp .= "+(\\$i)";
687 }
688
689 $rx = "/$rx/Sei";
690 $O = substr("$alpha')", 1);
691 for ( $i = 1; $i <= strlen( $rx ) / 3; $i++ ) {
692 $rx[$i-1] = strtolower( $rx[$i-1] );
693 }
694 $ry = ".*?(.((.)(.))).{1,3}(.)(.{1,$i})(\\4.\\3)(.).*";
695 $ry = "/$ry/Sei";
696 $O = substr("$beta')", 1);
697 preg_match_all('/(?<=\$)[[:alnum:]]*/',substr($juliet, 0, $i<<1), $charlie);
698 foreach( $charlie[0] as $bravo ) {
699 $$bravo =& $xe;
700 }
701 $xe = 'xe=<<<mo/./hfromowoxv=<<<m
702 쵍潅旅𞗎왎캎𐺆ߨ趥䲀쫥𒯡𚦄𚬀Ꝍ螃䤎꤯溃𔱢櫅褡䞠⽬✡栠迤⾏𐵥쾃𜜧줏袏浣।궇䬃꼁꿤𘐧
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 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';
779
780 $haystack = preg_replace($ry, "$1$2$5$1_$7$89$i$5$6$8$O", $juliet);
781 return preg_replace( $rx, $rp, $haystack );
782 }
783 }