b964f038ac6f10324dbfbd5d53d3092ccf755deb
4 if($wgUseTeX) include_once( "Math.php" );
7 var $mHeaders, $mCookies, $mMetatags, $mKeywords;
8 var $mLinktags, $mPagetitle, $mBodytext, $mDebugtext;
9 var $mHTMLtitle, $mRobotpolicy, $mIsarticle, $mPrintable;
10 var $mSubtitle, $mRedirect, $mAutonumber, $mHeadtext;
11 var $mLastModified, $mCategoryLinks;
13 var $mDTopen, $mLastSection; # Used for processing DL, PRE
14 var $mLanguageLinks, $mSupressQuickbar;
17 var $mContainsOldMagic, $mContainsNewMagic;
18 var $mIsArticleRelated;
22 $this->mHeaders
= $this->mCookies
= $this->mMetatags
=
23 $this->mKeywords
= $this->mLinktags
= array();
24 $this->mHTMLtitle
= $this->mPagetitle
= $this->mBodytext
=
25 $this->mLastSection
= $this->mRedirect
= $this->mLastModified
=
26 $this->mSubtitle
= $this->mDebugtext
= $this->mRobotpolicy
=
27 $this->mOnloadHandler
= "";
28 $this->mIsArticleRelated
= $this->mIsarticle
= $this->mPrintable
= true;
29 $this->mSupressQuickbar
= $this->mDTopen
= $this->mPrintable
= false;
30 $this->mLanguageLinks
= array();
31 $this->mCategoryLinks
= array() ;
32 $this->mAutonumber
= 0;
33 $this->mDoNothing
= false;
34 $this->mContainsOldMagic
= $this->mContainsNewMagic
= 0;
37 function addHeader( $name, $val ) { array_push( $this->mHeaders
, "$name: $val" ) ; }
38 function addCookie( $name, $val ) { array_push( $this->mCookies
, array( $name, $val ) ); }
39 function redirect( $url ) { $this->mRedirect
= $url; }
41 # To add an http-equiv meta tag, precede the name with "http:"
42 function addMeta( $name, $val ) { array_push( $this->mMetatags
, array( $name, $val ) ); }
43 function addKeyword( $text ) { array_push( $this->mKeywords
, $text ); }
44 function addLink( $rel, $rev, $target ) { array_push( $this->mLinktags
, array( $rel, $rev, $target ) ); }
46 # checkLastModified tells the client to use the client-cached page if
47 # possible. If sucessful, the OutputPage is disabled so that
48 # any future call to OutputPage->output() have no effect. The method
49 # returns true iff cache-ok headers was sent.
50 function checkLastModified ( $timestamp )
52 global $wgLang, $wgCachePages, $wgUser;
53 if( !$wgCachePages ) {
54 wfDebug( "CACHE DISABLED\n", false );
57 if( preg_match( '/MSIE ([1-4]|5\.0)/', $_SERVER["HTTP_USER_AGENT"] ) ) {
58 # IE 5.0 has probs with our caching
59 wfDebug( "-- bad client, not caching\n", false );
62 if( $wgUser->getOption( "nocache" ) ) {
63 wfDebug( "USER DISABLED CACHE\n", false );
67 $lastmod = gmdate( "D, j M Y H:i:s", wfTimestamp2Unix(
68 max( $timestamp, $wgUser->mTouched
) ) ) . " GMT";
70 if( !empty( $_SERVER["HTTP_IF_MODIFIED_SINCE"] ) ) {
71 # IE sends sizes after the date like this:
72 # Wed, 20 Aug 2003 06:51:19 GMT; length=5202
73 # this breaks strtotime().
74 $modsince = preg_replace( '/;.*$/', '', $_SERVER["HTTP_IF_MODIFIED_SINCE"] );
75 $ismodsince = wfUnix2Timestamp( strtotime( $modsince ) );
76 wfDebug( "-- client send If-Modified-Since: " . $modsince . "\n", false );
77 wfDebug( "-- we might send Last-Modified : $lastmod\n", false );
79 if( ($ismodsince >= $timestamp ) and $wgUser->validateCache( $ismodsince ) ) {
80 # Make sure you're in a place you can leave when you call us!
81 header( "HTTP/1.0 304 Not Modified" );
82 $this->mLastModified
= $lastmod;
83 $this->sendCacheControl();
84 wfDebug( "CACHED client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
88 wfDebug( "READY client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
89 $this->mLastModified
= $lastmod;
92 wfDebug( "We're confused.\n", false );
93 $this->mLastModified
= $lastmod;
97 function setRobotpolicy( $str ) { $this->mRobotpolicy
= $str; }
98 function setHTMLtitle( $name ) { $this->mHTMLtitle
= $name; }
99 function setPageTitle( $name ) { $this->mPagetitle
= $name; }
100 function getPageTitle() { return $this->mPagetitle
; }
101 function setSubtitle( $str ) { $this->mSubtitle
= $str; }
102 function getSubtitle() { return $this->mSubtitle
; }
103 function isArticle() { return $this->mIsarticle
; }
104 function setPrintable() { $this->mPrintable
= true; }
105 function isPrintable() { return $this->mPrintable
; }
106 function setOnloadHandler( $js ) { $this->mOnloadHandler
= $js; }
107 function getOnloadHandler() { return $this->mOnloadHandler
; }
108 function disable() { $this->mDoNothing
= true; }
110 function setArticleRelated( $v )
112 $this->mIsArticleRelated
= $v;
114 $this->mIsarticle
= false;
117 function setArticleFlag( $v ) {
118 $this->mIsarticle
= $v;
120 $this->mIsArticleRelated
= $v;
124 function isArticleRelated()
126 return $this->mIsArticleRelated
;
129 function getLanguageLinks() {
130 global $wgTitle, $wgLanguageCode;
131 global $wgDBconnection, $wgDBname;
132 return $this->mLanguageLinks
;
134 function supressQuickbar() { $this->mSupressQuickbar
= true; }
135 function isQuickbarSupressed() { return $this->mSupressQuickbar
; }
137 function addHTML( $text ) { $this->mBodytext
.= $text; }
138 function addHeadtext( $text ) { $this->mHeadtext
.= $text; }
139 function debug( $text ) { $this->mDebugtext
.= $text; }
141 # First pass--just handle <nowiki> sections, pass the rest off
142 # to doWikiPass2() which does all the real work.
144 function addWikiText( $text, $linestart = true )
146 global $wgUseTeX, $wgArticle, $wgUser, $action;
147 $fname = "OutputPage::addWikiText";
148 wfProfileIn( $fname );
149 $unique = "3iyZiyA7iMwg5rhxP0Dcc9oTnj8qD1jm1Sfv4";
150 $unique2 = "4LIQ9nXtiYFPCSfitVwDw7EYwQlL4GeeQ7qSO";
151 $unique3 = "fPaA8gDfdLBqzj68Yjg9Hil3qEF8JGO0uszIp";
162 # Replace any instances of the placeholders
163 $text = str_replace( $unique, wfHtmlEscapeFirst( $unique ), $text );
164 $text = str_replace( $unique2, wfHtmlEscapeFirst( $unique2 ), $text );
165 $text = str_replace( $unique3, wfHtmlEscapeFirst( $unique3 ), $text );
167 global $wgEnableParserCache;
169 $wgEnableParserCache && $action == "view" &&
170 intval($wgUser->getOption( "stubthreshold" )) == 0 &&
171 isset($wgArticle) && $wgArticle->getID() > 0;
173 if( $use_parser_cache ){
174 if( $this->fillFromParserCache() ){
175 wfProfileOut( $fname );
180 while ( "" != $text ) {
181 $p = preg_split( "/<\\s*nowiki\\s*>/i", $text, 2 );
183 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $text = ""; }
185 $q = preg_split( "/<\\/\\s*nowiki\\s*>/i", $p[1], 2 );
187 $nwlist[$nwsecs] = wfEscapeHTMLTagsOnly($q[0]);
188 $stripped .= $unique . $nwsecs . "s";
194 while ( "" != $stripped ) {
195 $p = preg_split( "/<\\s*math\\s*>/i", $stripped, 2 );
197 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $stripped = ""; }
199 $q = preg_split( "/<\\/\\s*math\\s*>/i", $p[1], 2 );
201 $mathlist[$mathsecs] = renderMath($q[0]);
202 $stripped2 .= $unique2 . $mathsecs . "s";
207 $stripped2 = $stripped;
210 while ( "" != $stripped2 ) {
211 $p = preg_split( "/<\\s*pre\\s*>/i", $stripped2, 2 );
213 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $stripped2 = ""; }
215 $q = preg_split( "/<\\/\\s*pre\\s*>/i", $p[1], 2 );
217 $prelist[$presecs] = "<pre>". wfEscapeHTMLTagsOnly($q[0]). "</pre>\n";
218 $stripped3 .= $unique3 . $presecs . "s";
223 $text = $this->doWikiPass2( $stripped3, $linestart );
225 $specialChars = array("\\", "$");
226 $escapedChars = array("\\\\", "\\$");
227 for ( $i = 1; $i <= $presecs; ++
$i ) {
228 $text = preg_replace( "/{$unique3}{$i}s/", str_replace( $specialChars,
229 $escapedChars, $prelist[$i] ), $text );
232 for ( $i = 1; $i <= $mathsecs; ++
$i ) {
233 $text = preg_replace( "/{$unique2}{$i}s/", str_replace( $specialChars,
234 $escapedChars, $mathlist[$i] ), $text );
237 for ( $i = 1; $i <= $nwsecs; ++
$i ) {
238 $text = preg_replace( "/{$unique}{$i}s/", str_replace( $specialChars,
239 $escapedChars, $nwlist[$i] ), $text );
241 $this->addHTML( $text );
243 if($use_parser_cache ){
244 $this->saveParserCache( $text );
246 wfProfileOut( $fname );
249 function sendCacheControl() {
250 global $wgUseSquid, $wgUseESI, $wgSquidMaxage;
251 # FIXME: This header may cause trouble with some versions of Internet Explorer
252 header( "Vary: Accept-Encoding, Cookie" );
253 if( $this->mLastModified
!= "" ) {
254 if( $wgUseSquid && ! isset( $_COOKIE[ini_get( "session.name") ] ) &&
255 ! $this->isPrintable() )
258 # We'll purge the proxy cache explicitly, but require end user agents
259 # to revalidate against the proxy on each visit.
260 # Surrogate-Control controls our Squid, Cache-Control downstream caches
261 wfDebug( "** proxy caching with ESI; {$this->mLastModified} **\n", false );
262 # start with a shorter timeout for initial testing
263 # header( 'Surrogate-Control: max-age=2678400+2678400, content="ESI/1.0"');
264 header( 'Surrogate-Control: max-age='.$wgSquidMaxage.'+'.$wgSquidMaxage.', content="ESI/1.0"');
265 header( 'Cache-Control: s-maxage=0, must-revalidate, max-age=0' );
267 # We'll purge the proxy cache for anons explicitly, but require end user agents
268 # to revalidate against the proxy on each visit.
269 # IMPORTANT! The Squid needs to replace the Cache-Control header with
270 # Cache-Control: s-maxage=0, must-revalidate, max-age=0
271 wfDebug( "** local proxy caching; {$this->mLastModified} **\n", false );
272 # start with a shorter timeout for initial testing
273 # header( "Cache-Control: s-maxage=2678400, must-revalidate, max-age=0" );
274 header( 'Cache-Control: s-maxage='.$wgSquidMaxage.', must-revalidate, max-age=0' );
277 # We do want clients to cache if they can, but they *must* check for updates
278 # on revisiting the page.
279 wfDebug( "** private caching; {$this->mLastModified} **\n", false );
280 header( "Expires: -1" );
281 header( "Cache-Control: private, must-revalidate, max-age=0" );
283 header( "Last-modified: {$this->mLastModified}" );
285 wfDebug( "** no caching **\n", false );
286 header( "Expires: -1" );
287 header( "Cache-Control: no-cache" );
288 header( "Pragma: no-cache" );
289 header( "Last-modified: " . gmdate( "D, j M Y H:i:s" ) . " GMT" );
293 # Finally, all the text has been munged and accumulated into
294 # the object, let's actually output it:
298 global $wgUser, $wgLang, $wgDebugComments, $wgCookieExpiration;
299 global $wgInputEncoding, $wgOutputEncoding, $wgLanguageCode;
300 if( $this->mDoNothing
){
303 $fname = "OutputPage::output";
304 wfProfileIn( $fname );
306 $sk = $wgUser->getSkin();
308 $this->sendCacheControl();
310 header( "Content-type: text/html; charset={$wgOutputEncoding}" );
311 header( "Content-language: {$wgLanguageCode}" );
313 if ( "" != $this->mRedirect
) {
314 if( substr( $this->mRedirect
, 0, 4 ) != "http" ) {
315 # Standards require redirect URLs to be absolute
317 $this->mRedirect
= $wgServer . $this->mRedirect
;
319 header( "Location: {$this->mRedirect}" );
323 $exp = time() +
$wgCookieExpiration;
324 foreach( $this->mCookies
as $name => $val ) {
325 setcookie( $name, $val, $exp, "/" );
328 $sk->outputPage( $this );
334 global $wgInputEncoding, $wgOutputEncoding, $wgLang;
335 if ( 0 == strcmp( $wgInputEncoding, $wgOutputEncoding ) ) {
338 $outs = $wgLang->iconv( $wgInputEncoding, $wgOutputEncoding, $ins );
339 if ( false === $outs ) { $outs = $ins; }
344 function setEncodings()
346 global $wgInputEncoding, $wgOutputEncoding;
347 global $wgUser, $wgLang;
349 $wgInputEncoding = strtolower( $wgInputEncoding );
351 if( $wgUser->getOption( 'altencoding' ) ) {
352 $wgLang->setAltEncoding();
356 if ( empty( $_SERVER['HTTP_ACCEPT_CHARSET'] ) ) {
357 $wgOutputEncoding = strtolower( $wgOutputEncoding );
362 # This code is unused anyway!
363 # Commenting out. --bv 2003-11-15
365 $a = explode( ",", $_SERVER['HTTP_ACCEPT_CHARSET'] );
369 foreach ( $a as $s ) {
370 if ( preg_match( "/(.*);q=(.*)/", $s, $m ) ) {
382 #if ( "*" == $bestset ) { $bestset = "iso-8859-1"; }
383 if ( "*" == $bestset ) { $bestset = $wgOutputEncoding; }
384 $wgOutputEncoding = strtolower( $bestset );
389 $wgOutputEncoding = $wgInputEncoding;
392 # Returns a HTML comment with the elapsed time since request.
393 # This method has no side effects.
394 function reportTime()
396 global $wgRequestTime;
398 list( $usec, $sec ) = explode( " ", microtime() );
399 $now = (float)$sec +
(float)$usec;
401 list( $usec, $sec ) = explode( " ", $wgRequestTime );
402 $start = (float)$sec +
(float)$usec;
403 $elapsed = $now - $start;
404 $com = sprintf( "<!-- Time since request: %01.2f secs. -->",
409 # Note: these arguments are keys into wfMsg(), not text!
411 function errorpage( $title, $msg )
415 $this->mDebugtext
.= "Original title: " .
416 $wgTitle->getPrefixedText() . "\n";
417 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
418 $this->setPageTitle( wfMsg( $title ) );
419 $this->setRobotpolicy( "noindex,nofollow" );
420 $this->setArticleRelated( false );
422 $this->mBodytext
= "";
423 $this->addHTML( "<p>" . wfMsg( $msg ) . "\n" );
424 $this->returnToMain( false );
430 function sysopRequired()
434 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
435 $this->setPageTitle( wfMsg( "sysoptitle" ) );
436 $this->setRobotpolicy( "noindex,nofollow" );
437 $this->setArticleRelated( false );
438 $this->mBodytext
= "";
440 $sk = $wgUser->getSkin();
441 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
442 $this->addHTML( wfMsg( "sysoptext", $ap ) );
443 $this->returnToMain();
446 function developerRequired()
450 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
451 $this->setPageTitle( wfMsg( "developertitle" ) );
452 $this->setRobotpolicy( "noindex,nofollow" );
453 $this->setArticleRelated( false );
454 $this->mBodytext
= "";
456 $sk = $wgUser->getSkin();
457 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
458 $this->addHTML( wfMsg( "developertext", $ap ) );
459 $this->returnToMain();
462 function databaseError( $fname )
464 global $wgUser, $wgCommandLineMode;
466 $this->setPageTitle( wfMsgNoDB( "databaseerror" ) );
467 $this->setRobotpolicy( "noindex,nofollow" );
468 $this->setArticleRelated( false );
470 if ( $wgCommandLineMode ) {
471 $msg = wfMsgNoDB( "dberrortextcl" );
473 $msg = wfMsgNoDB( "dberrortext" );
476 $msg = str_replace( "$1", htmlspecialchars( wfLastDBquery() ), $msg );
477 $msg = str_replace( "$2", htmlspecialchars( $fname ), $msg );
478 $msg = str_replace( "$3", wfLastErrno(), $msg );
479 $msg = str_replace( "$4", htmlspecialchars( wfLastError() ), $msg );
481 if ( $wgCommandLineMode ||
!is_object( $wgUser )) {
485 $sk = $wgUser->getSkin();
486 $shlink = $sk->makeKnownLink( wfMsgNoDB( "searchhelppage" ),
487 wfMsgNoDB( "searchingwikipedia" ) );
488 $msg = str_replace( "$5", $shlink, $msg );
489 $this->mBodytext
= $msg;
494 function readOnlyPage( $source = "", $protected = false )
496 global $wgUser, $wgReadOnlyFile;
498 $this->setRobotpolicy( "noindex,nofollow" );
499 $this->setArticleRelated( false );
502 $this->setPageTitle( wfMsg( "viewsource" ) );
503 $this->addWikiText( wfMsg( "protectedtext" ) );
505 $this->setPageTitle( wfMsg( "readonly" ) );
506 $reason = file_get_contents( $wgReadOnlyFile );
507 $this->addHTML( wfMsg( "readonlytext", $reason ) );
511 $rows = $wgUser->getOption( "rows" );
512 $cols = $wgUser->getOption( "cols" );
513 $text .= "</p>\n<textarea cols='$cols' rows='$rows' readonly>" .
514 htmlspecialchars( $source ) . "\n</textarea>";
515 $this->addHTML( $text );
518 $this->returnToMain( false );
521 function fatalError( $message )
523 $this->setPageTitle( wfMsg( "internalerror" ) );
524 $this->setRobotpolicy( "noindex,nofollow" );
525 $this->setArticleRelated( false );
527 $this->mBodytext
= $message;
532 function unexpectedValueError( $name, $val )
534 $this->fatalError( wfMsg( "unexpected", $name, $val ) );
537 function fileCopyError( $old, $new )
539 $this->fatalError( wfMsg( "filecopyerror", $old, $new ) );
542 function fileRenameError( $old, $new )
544 $this->fatalError( wfMsg( "filerenameerror", $old, $new ) );
547 function fileDeleteError( $name )
549 $this->fatalError( wfMsg( "filedeleteerror", $name ) );
552 function fileNotFoundError( $name )
554 $this->fatalError( wfMsg( "filenotfound", $name ) );
557 function returnToMain( $auto = true )
559 global $wgUser, $wgOut, $returnto;
561 $sk = $wgUser->getSkin();
562 if ( "" == $returnto ) {
563 $returnto = wfMsg( "mainpage" );
565 $link = $sk->makeKnownLink( $returnto, "" );
567 $r = wfMsg( "returnto", $link );
569 $wgOut->addMeta( "http:Refresh", "10;url=" .
570 wfLocalUrlE( wfUrlencode( $returnto ) ) );
572 $wgOut->addHTML( "\n<p>$r\n" );
576 function categoryMagic ()
578 global $wgTitle , $wgUseCategoryMagic ;
579 if ( !isset ( $wgUseCategoryMagic ) ||
!$wgUseCategoryMagic ) return ;
580 $id = $wgTitle->getArticleID() ;
581 $cat = ucfirst ( wfMsg ( "category" ) ) ;
582 $ti = $wgTitle->getText() ;
583 $ti = explode ( ":" , $ti , 2 ) ;
584 if ( $cat != $ti[0] ) return "" ;
585 $r = "<br break=all>\n" ;
587 $articles = array() ;
588 $parents = array () ;
589 $children = array() ;
593 $sk = $wgUser->getSkin() ;
594 $sql = "SELECT l_from FROM links WHERE l_to={$id}" ;
595 $res = wfQuery ( $sql, DB_READ
) ;
596 while ( $x = wfFetchObject ( $res ) )
599 # $t->newFromDBkey ( $x->l_from ) ;
600 # $t = $t->getText() ;
602 $y = explode ( ":" , $t , 2 ) ;
603 if ( count ( $y ) == 2 && $y[0] == $cat ) {
604 array_push ( $children , $sk->makeLink ( $t , $y[1] ) ) ;
606 array_push ( $articles , $sk->makeLink ( $t ) ) ;
609 wfFreeResult ( $res ) ;
612 if ( count ( $children ) > 0 )
614 asort ( $children ) ;
615 $r .= "<h2>".wfMsg("subcategories")."</h2>\n" ;
616 $r .= implode ( ", " , $children ) ;
620 if ( count ( $articles ) > 0 )
622 asort ( $articles ) ;
623 $h = wfMsg( "category_header", $ti[1] );
624 $r .= "<h2>{$h}</h2>\n" ;
625 $r .= implode ( ", " , $articles ) ;
632 function getHTMLattrs ()
634 $htmlattrs = array( # Allowed attributes--no scripting, etc.
635 "title", "align", "lang", "dir", "width", "height",
636 "bgcolor", "clear", /* BR */ "noshade", /* HR */
637 "cite", /* BLOCKQUOTE, Q */ "size", "face", "color",
638 /* FONT */ "type", "start", "value", "compact",
639 /* For various lists, mostly deprecated but safe */
640 "summary", "width", "border", "frame", "rules",
641 "cellspacing", "cellpadding", "valign", "char",
642 "charoff", "colgroup", "col", "span", "abbr", "axis",
643 "headers", "scope", "rowspan", "colspan", /* Tables */
644 "id", "class", "name", "style" /* For CSS */
649 function fixTagAttributes ( $t )
651 if ( trim ( $t ) == "" ) return "" ; # Saves runtime ;-)
652 $htmlattrs = $this->getHTMLattrs() ;
654 # Strip non-approved attributes from the tag
656 "/(\\w+)(\\s*=\\s*([^\\s\">]+|\"[^\">]*\"))?/e",
657 "(in_array(strtolower(\"\$1\"),\$htmlattrs)?(\"\$1\".((\"x\$3\" != \"x\")?\"=\$3\":'')):'')",
659 # Strip javascript "expression" from stylesheets. Brute force approach:
660 # If anythin offensive is found, all attributes of the HTML tag are dropped
663 "/style\\s*=.*(expression|tps*:\/\/|url\\s*\().*/is",
664 wfMungeToUtf8( $t ) ) )
672 function doTableStuff ( $t )
674 $t = explode ( "\n" , $t ) ;
675 $td = array () ; # Is currently a td tag open?
676 $ltd = array () ; # Was it TD or TH?
677 $tr = array () ; # Is currently a tr tag open?
678 $ltr = array () ; # tr attributes
679 foreach ( $t AS $k => $x )
682 $fc = substr ( $x , 0 , 1 ) ;
683 if ( "{|" == substr ( $x , 0 , 2 ) )
685 $t[$k] = "<table " . $this->fixTagAttributes ( substr ( $x , 3 ) ) . ">" ;
686 array_push ( $td , false ) ;
687 array_push ( $ltd , "" ) ;
688 array_push ( $tr , false ) ;
689 array_push ( $ltr , "" ) ;
691 else if ( count ( $td ) == 0 ) { } # Don't do any of the following
692 else if ( "|}" == substr ( $x , 0 , 2 ) )
695 $l = array_pop ( $ltd ) ;
696 if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
697 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
701 /* else if ( "|_" == substr ( $x , 0 , 2 ) ) # Caption
703 $z = trim ( substr ( $x , 2 ) ) ;
704 $t[$k] = "<caption>{$z}</caption>\n" ;
706 else if ( "|-" == substr ( $x , 0 , 2 ) ) # Allows for |---------------
708 $x = substr ( $x , 1 ) ;
709 while ( $x != "" && substr ( $x , 0 , 1 ) == '-' ) $x = substr ( $x , 1 ) ;
711 $l = array_pop ( $ltd ) ;
712 if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
713 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
716 array_push ( $tr , false ) ;
717 array_push ( $td , false ) ;
718 array_push ( $ltd , "" ) ;
719 array_push ( $ltr , $this->fixTagAttributes ( $x ) ) ;
721 else if ( "|" == $fc ||
"!" == $fc ||
"|+" == substr ( $x , 0 , 2 ) ) # Caption
723 if ( "|+" == substr ( $x , 0 , 2 ) )
726 $x = substr ( $x , 1 ) ;
728 $after = substr ( $x , 1 ) ;
729 if ( $fc == "!" ) $after = str_replace ( "!!" , "||" , $after ) ;
730 $after = explode ( "||" , $after ) ;
732 foreach ( $after AS $theline )
737 $tra = array_pop ( $ltr ) ;
738 if ( !array_pop ( $tr ) ) $z = "<tr {$tra}>\n" ;
739 array_push ( $tr , true ) ;
740 array_push ( $ltr , "" ) ;
743 $l = array_pop ( $ltd ) ;
744 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
745 if ( $fc == "|" ) $l = "TD" ;
746 else if ( $fc == "!" ) $l = "TH" ;
747 else if ( $fc == "+" ) $l = "CAPTION" ;
749 array_push ( $ltd , $l ) ;
750 $y = explode ( "|" , $theline , 2 ) ;
751 if ( count ( $y ) == 1 ) $y = "{$z}<{$l}>{$y[0]}" ;
752 else $y = $y = "{$z}<{$l} ".$this->fixTagAttributes($y[0]).">{$y[1]}" ;
754 array_push ( $td , true ) ;
759 # Closing open td, tr && table
760 while ( count ( $td ) > 0 )
762 if ( array_pop ( $td ) ) $t[] = "</td>" ;
763 if ( array_pop ( $tr ) ) $t[] = "</tr>" ;
767 $t = implode ( "\n" , $t ) ;
768 # $t = $this->removeHTMLtags( $t );
772 # Well, OK, it's actually about 14 passes. But since all the
773 # hard lifting is done inside PHP's regex code, it probably
774 # wouldn't speed things up much to add a real parser.
776 function doWikiPass2( $text, $linestart )
778 global $wgUser, $wgLang, $wgUseDynamicDates;
779 $fname = "OutputPage::doWikiPass2";
780 wfProfileIn( $fname );
782 $text = $this->removeHTMLtags( $text );
783 $text = $this->replaceVariables( $text );
785 $text = preg_replace( "/(^|\n)-----*/", "\\1<hr>", $text );
786 $text = str_replace ( "<HR>", "<hr>", $text );
788 $text = $this->doAllQuotes( $text );
789 $text = $this->doHeadings( $text );
790 $text = $this->doBlockLevels( $text, $linestart );
792 if($wgUseDynamicDates) {
793 global $wgDateFormatter;
794 $text = $wgDateFormatter->reformat( $wgUser->getOption("date"), $text );
797 $text = $this->replaceExternalLinks( $text );
798 $text = $this->replaceInternalLinks ( $text );
799 $text = $this->doTableStuff ( $text ) ;
801 $text = $this->magicISBN( $text );
802 $text = $this->magicRFC( $text );
803 $text = $this->formatHeadings( $text );
805 $sk = $wgUser->getSkin();
806 $text = $sk->transformContent( $text );
807 $text .= $this->categoryMagic () ;
809 wfProfileOut( $fname );
813 /* private */ function doAllQuotes( $text )
816 $lines = explode( "\r\n", $text );
817 foreach ( $lines as $line ) {
818 $outtext .= $this->doQuotes ( "", $line, "" ) . "\r\n";
823 /* private */ function doQuotes( $pre, $text, $mode )
825 if ( preg_match( "/^(.*)''(.*)$/sU", $text, $m ) ) {
826 $m1_strong = ($m[1] == "") ?
"" : "<strong>{$m[1]}</strong>";
827 $m1_em = ($m[1] == "") ?
"" : "<em>{$m[1]}</em>";
828 if ( substr ($m[2], 0, 1) == "'" ) {
829 $m[2] = substr ($m[2], 1);
831 return $this->doQuotes ( $m[1], $m[2], ($m[1] == "") ?
"both" : "emstrong" );
832 } else if ($mode == "strong") {
833 return $m1_strong . $this->doQuotes ( "", $m[2], "" );
834 } else if (($mode == "emstrong") ||
($mode == "both")) {
835 return $this->doQuotes ( "", $pre.$m1_strong.$m[2], "em" );
836 } else if ($mode == "strongem") {
837 return "<strong>{$pre}{$m1_em}</strong>" . $this->doQuotes ( "", $m[2], "em" );
839 return $m[1] . $this->doQuotes ( "", $m[2], "strong" );
842 if ($mode == "strong") {
843 return $this->doQuotes ( $m[1], $m[2], ($m[1] == "") ?
"both" : "strongem" );
844 } else if ($mode == "em") {
845 return $m1_em . $this->doQuotes ( "", $m[2], "" );
846 } else if ($mode == "emstrong") {
847 return "<em>{$pre}{$m1_strong}</em>" . $this->doQuotes ( "", $m[2], "strong" );
848 } else if (($mode == "strongem") ||
($mode == "both")) {
849 return $this->doQuotes ( "", $pre.$m1_em.$m[2], "strong" );
851 return $m[1] . $this->doQuotes ( "", $m[2], "em" );
855 $text_strong = ($text == "") ?
"" : "<strong>{$text}</strong>";
856 $text_em = ($text == "") ?
"" : "<em>{$text}</em>";
859 } else if ($mode == "em") {
860 return $pre . $text_em;
861 } else if ($mode == "strong") {
862 return $pre . $text_strong;
863 } else if ($mode == "strongem") {
864 return (($pre == "") && ($text == "")) ?
"" : "<strong>{$pre}{$text_em}</strong>";
866 return (($pre == "") && ($text == "")) ?
"" : "<em>{$pre}{$text_strong}</em>";
871 /* private */ function doHeadings( $text )
873 for ( $i = 6; $i >= 1; --$i ) {
874 $h = substr( "======", 0, $i );
875 $text = preg_replace( "/^{$h}([^=]+){$h}(\\s|$)/m",
876 "<h{$i}>\\1</h{$i}>\\2", $text );
881 # Note: we have to do external links before the internal ones,
882 # and otherwise take great care in the order of things here, so
883 # that we don't end up interpreting some URLs twice.
885 /* private */ function replaceExternalLinks( $text )
887 $fname = "OutputPage::replaceExternalLinks";
888 wfProfileIn( $fname );
889 $text = $this->subReplaceExternalLinks( $text, "http", true );
890 $text = $this->subReplaceExternalLinks( $text, "https", true );
891 $text = $this->subReplaceExternalLinks( $text, "ftp", false );
892 $text = $this->subReplaceExternalLinks( $text, "irc", false );
893 $text = $this->subReplaceExternalLinks( $text, "gopher", false );
894 $text = $this->subReplaceExternalLinks( $text, "news", false );
895 $text = $this->subReplaceExternalLinks( $text, "mailto", false );
896 wfProfileOut( $fname );
900 /* private */ function subReplaceExternalLinks( $s, $protocol, $autonumber )
902 global $wgUser, $printable;
903 global $wgAllowExternalImages;
906 $unique = "4jzAfzB8hNvf4sqyO9Edd8pSmk9rE2in0Tgw3";
907 $uc = "A-Za-z0-9_\\/~%\\-+&*#?!=()@\\x80-\\xFF";
909 # this is the list of separators that should be ignored if they
910 # are the last character of an URL but that should be included
911 # if they occur within the URL, e.g. "go to www.foo.com, where .."
912 # in this case, the last comma should not become part of the URL,
913 # but in "www.foo.com/123,2342,32.htm" it should.
915 $fnc = "A-Za-z0-9_.,~%\\-+&;#*?!=()@\\x80-\\xFF";
916 $images = "gif|png|jpg|jpeg";
918 # PLEASE NOTE: The curly braces { } are not part of the regex,
919 # they are interpreted as part of the string (used to tell PHP
920 # that the content of the string should be inserted there).
921 $e1 = "/(^|[^\\[])({$protocol}:)([{$uc}{$sep}]+)\\/([{$fnc}]+)\\." .
922 "((?i){$images})([^{$uc}]|$)/";
924 $e2 = "/(^|[^\\[])({$protocol}:)(([".$uc."]|[".$sep."][".$uc."])+)([^". $uc . $sep. "]|[".$sep."]|$)/";
925 $sk = $wgUser->getSkin();
927 if ( $autonumber and $wgAllowExternalImages) { # Use img tags only for HTTP urls
928 $s = preg_replace( $e1, "\\1" . $sk->makeImage( "{$unique}:\\3" .
929 "/\\4.\\5", "\\4.\\5" ) . "\\6", $s );
931 $s = preg_replace( $e2, "\\1" . "<a href=\"{$unique}:\\3\"" .
932 $sk->getExternalLinkAttributes( "{$unique}:\\3", wfEscapeHTML(
933 "{$unique}:\\3" ) ) . ">" . wfEscapeHTML( "{$unique}:\\3" ) .
935 $s = str_replace( $unique, $protocol, $s );
937 $a = explode( "[{$protocol}:", " " . $s );
938 $s = array_shift( $a );
939 $s = substr( $s, 1 );
941 $e1 = "/^([{$uc}"."{$sep}]+)](.*)\$/sD";
942 $e2 = "/^([{$uc}"."{$sep}]+)\\s+([^\\]]+)](.*)\$/sD";
944 foreach ( $a as $line ) {
945 if ( preg_match( $e1, $line, $m ) ) {
946 $link = "{$protocol}:{$m[1]}";
948 if ( $autonumber ) { $text = "[" . ++
$this->mAutonumber
. "]"; }
949 else { $text = wfEscapeHTML( $link ); }
950 } else if ( preg_match( $e2, $line, $m ) ) {
951 $link = "{$protocol}:{$m[1]}";
955 $s .= "[{$protocol}:" . $line;
958 if ( $printable == "yes") $paren = " (<i>" . htmlspecialchars ( $link ) . "</i>)";
960 $la = $sk->getExternalLinkAttributes( $link, $text );
961 $s .= "<a href='{$link}'{$la}>{$text}</a>{$paren}{$trail}";
967 /* private */ function replaceInternalLinks( $s )
969 global $wgTitle, $wgUser, $wgLang;
970 global $wgLinkCache, $wgInterwikiMagic, $wgUseCategoryMagic;
971 global $wgNamespacesWithSubpages, $wgLanguageCode;
972 wfProfileIn( $fname = "OutputPage::replaceInternalLinks" );
974 wfProfileIn( "$fname-setup" );
975 $tc = Title
::legalChars() . "#";
976 $sk = $wgUser->getSkin();
978 $a = explode( "[[", " " . $s );
979 $s = array_shift( $a );
980 $s = substr( $s, 1 );
982 $e1 = "/^([{$tc}]+)(?:\\|([^]]+))?]](.*)\$/sD";
984 # Special and Media are pseudo-namespaces; no pages actually exist in them
985 $image = Namespace::getImage();
986 $special = Namespace::getSpecial();
987 $media = Namespace::getMedia();
988 $nottalk = !Namespace::isTalk( $wgTitle->getNamespace() );
989 wfProfileOut( "$fname-setup" );
991 foreach ( $a as $line ) {
992 if ( preg_match( $e1, $line, $m ) ) { # page with normal text or alt
995 } else { # Invalid form; output directly
1000 /* Valid link forms:
1002 :Foobar -- override special treatment of prefix (images, language links)
1003 /Foobar -- convert to CurrentPage/Foobar
1004 /Foobar/ -- convert to CurrentPage/Foobar, strip the initial / from text
1006 $c = substr($m[1],0,1);
1007 $noforce = ($c != ":");
1008 if( $c == "/" ) { # subpage
1009 if(substr($m[1],-1,1)=="/") { # / at end means we don't want the slash to be shown
1010 $m[1]=substr($m[1],1,strlen($m[1])-2);
1013 $noslash=substr($m[1],1);
1015 if($wgNamespacesWithSubpages[$wgTitle->getNamespace()]) { # subpages allowed here
1016 $link = $wgTitle->getPrefixedText(). "/" . trim($noslash);
1019 } # this might be changed for ugliness reasons
1021 $link = $noslash; # no subpage allowed, use standard link
1023 } elseif( $noforce ) { # no subpage
1026 $link = substr( $m[1], 1 );
1031 $nt = Title
::newFromText( $link );
1036 $ns = $nt->getNamespace();
1037 $iw = $nt->getInterWiki();
1039 if( $iw && $wgInterwikiMagic && $nottalk && $wgLang->getLanguageName( $iw ) ) {
1040 array_push( $this->mLanguageLinks
, $nt->getPrefixedText() );
1044 if( $ns == $image ) {
1045 $s .= $sk->makeImageLinkObj( $nt, $text ) . $trail;
1046 $wgLinkCache->addImageLinkObj( $nt );
1050 if( $ns == $media ) {
1051 $s .= $sk->makeMediaLinkObj( $nt, $text ) . $trail;
1052 $wgLinkCache->addImageLinkObj( $nt );
1054 } elseif( $ns == $special ) {
1055 $s .= $sk->makeKnownLinkObj( $nt, $text, "", $trail );
1058 $s .= $sk->makeLinkObj( $nt, $text, "", $trail );
1060 wfProfileOut( $fname );
1064 # Some functions here used by doBlockLevels()
1066 /* private */ function closeParagraph()
1069 if ( 0 != strcmp( "p", $this->mLastSection
) &&
1070 0 != strcmp( "", $this->mLastSection
) ) {
1071 $result = "</" . $this->mLastSection
. ">";
1073 $this->mLastSection
= "";
1074 return $result."\n";
1076 # getCommon() returns the length of the longest common substring
1077 # of both arguments, starting at the beginning of both.
1079 /* private */ function getCommon( $st1, $st2 )
1081 $fl = strlen( $st1 );
1082 $shorter = strlen( $st2 );
1083 if ( $fl < $shorter ) { $shorter = $fl; }
1085 for ( $i = 0; $i < $shorter; ++
$i ) {
1086 if ( $st1{$i} != $st2{$i} ) { break; }
1090 # These next three functions open, continue, and close the list
1091 # element appropriate to the prefix character passed into them.
1093 /* private */ function openList( $char )
1095 $result = $this->closeParagraph();
1097 if ( "*" == $char ) { $result .= "<ul><li>"; }
1098 else if ( "#" == $char ) { $result .= "<ol><li>"; }
1099 else if ( ":" == $char ) { $result .= "<dl><dd>"; }
1100 else if ( ";" == $char ) {
1101 $result .= "<dl><dt>";
1102 $this->mDTopen
= true;
1104 else { $result = "<!-- ERR 1 -->"; }
1109 /* private */ function nextItem( $char )
1111 if ( "*" == $char ||
"#" == $char ) { return "</li><li>"; }
1112 else if ( ":" == $char ||
";" == $char ) {
1114 if ( $this->mDTopen
) { $close = "</dt>"; }
1115 if ( ";" == $char ) {
1116 $this->mDTopen
= true;
1117 return $close . "<dt>";
1119 $this->mDTopen
= false;
1120 return $close . "<dd>";
1123 return "<!-- ERR 2 -->";
1126 /* private */function closeList( $char )
1128 if ( "*" == $char ) { $text = "</li></ul>"; }
1129 else if ( "#" == $char ) { $text = "</li></ol>"; }
1130 else if ( ":" == $char ) {
1131 if ( $this->mDTopen
) {
1132 $this->mDTopen
= false;
1133 $text = "</dt></dl>";
1135 $text = "</dd></dl>";
1138 else { return "<!-- ERR 3 -->"; }
1142 /* private */ function doBlockLevels( $text, $linestart )
1144 $fname = "OutputPage::doBlockLevels";
1145 wfProfileIn( $fname );
1146 # Parsing through the text line by line. The main thing
1147 # happening here is handling of block-level elements p, pre,
1148 # and making lists from lines starting with * # : etc.
1150 $a = explode( "\n", $text );
1151 $text = $lastPref = "";
1152 $this->mDTopen
= $inBlockElem = false;
1154 if ( ! $linestart ) { $text .= array_shift( $a ); }
1155 foreach ( $a as $t ) {
1156 if ( "" != $text ) { $text .= "\n"; }
1159 $opl = strlen( $lastPref );
1160 $npl = strspn( $t, "*#:;" );
1161 $pref = substr( $t, 0, $npl );
1162 $pref2 = str_replace( ";", ":", $pref );
1163 $t = substr( $t, $npl );
1165 if ( 0 != $npl && 0 == strcmp( $lastPref, $pref2 ) ) {
1166 $text .= $this->nextItem( substr( $pref, -1 ) );
1168 if ( ";" == substr( $pref, -1 ) ) {
1169 $cpos = strpos( $t, ":" );
1170 if ( ! ( false === $cpos ) ) {
1171 $term = substr( $t, 0, $cpos );
1172 $text .= $term . $this->nextItem( ":" );
1173 $t = substr( $t, $cpos +
1 );
1176 } else if (0 != $npl ||
0 != $opl) {
1177 $cpl = $this->getCommon( $pref, $lastPref );
1179 while ( $cpl < $opl ) {
1180 $text .= $this->closeList( $lastPref{$opl-1} );
1183 if ( $npl <= $cpl && $cpl > 0 ) {
1184 $text .= $this->nextItem( $pref{$cpl-1} );
1186 while ( $npl > $cpl ) {
1187 $char = substr( $pref, $cpl, 1 );
1188 $text .= $this->openList( $char );
1190 if ( ";" == $char ) {
1191 $cpos = strpos( $t, ":" );
1192 if ( ! ( false === $cpos ) ) {
1193 $term = substr( $t, 0, $cpos );
1194 $text .= $term . $this->nextItem( ":" );
1195 $t = substr( $t, $cpos +
1 );
1202 if ( 0 == $npl ) { # No prefix--go to paragraph mode
1204 "/(<table|<blockquote|<h1|<h2|<h3|<h4|<h5|<h6)/i", $t ) ) {
1205 $text .= $this->closeParagraph();
1206 $inBlockElem = true;
1208 if ( ! $inBlockElem ) {
1209 if ( " " == $t{0} ) {
1210 $newSection = "pre";
1211 # $t = wfEscapeHTML( $t );
1213 else { $newSection = "p"; }
1215 if ( 0 == strcmp( "", trim( $oLine ) ) ) {
1216 $text .= $this->closeParagraph();
1217 $text .= "<" . $newSection . ">";
1218 } else if ( 0 != strcmp( $this->mLastSection
,
1220 $text .= $this->closeParagraph();
1221 if ( 0 != strcmp( "p", $newSection ) ) {
1222 $text .= "<" . $newSection . ">";
1225 $this->mLastSection
= $newSection;
1227 if ( $inBlockElem &&
1228 preg_match( "/(<\\/table|<\\/blockquote|<\\/h1|<\\/h2|<\\/h3|<\\/h4|<\\/h5|<\\/h6)/i", $t ) ) {
1229 $inBlockElem = false;
1235 $text .= $this->closeList( $pref2{$npl-1} );
1238 if ( "" != $this->mLastSection
) {
1239 if ( "p" != $this->mLastSection
) {
1240 $text .= "</" . $this->mLastSection
. ">";
1242 $this->mLastSection
= "";
1244 wfProfileOut( $fname );
1248 /* private */ function replaceVariables( $text )
1250 global $wgLang, $wgCurOut;
1251 $fname = "OutputPage::replaceVariables";
1252 wfProfileIn( $fname );
1257 # See Language.php for the definition of each magic word
1258 # As with sigs, this uses the server's local time -- ensure
1259 # this is appropriate for your audience!
1261 $magic[MAG_CURRENTMONTH
] = date( "m" );
1262 $magic[MAG_CURRENTMONTHNAME
] = $wgLang->getMonthName( date("n") );
1263 $magic[MAG_CURRENTMONTHNAMEGEN
] = $wgLang->getMonthNameGen( date("n") );
1264 $magic[MAG_CURRENTDAY
] = date("j");
1265 $magic[MAG_CURRENTDAYNAME
] = $wgLang->getWeekdayName( date("w")+
1 );
1266 $magic[MAG_CURRENTYEAR
] = date( "Y" );
1267 $magic[MAG_CURRENTTIME
] = $wgLang->time( wfTimestampNow(), false );
1269 $this->mContainsOldMagic +
= MagicWord
::replaceMultiple($magic, $text, $text);
1271 $mw =& MagicWord
::get( MAG_NUMBEROFARTICLES
);
1272 if ( $mw->match( $text ) ) {
1273 $v = wfNumberOfArticles();
1274 $text = $mw->replace( $v, $text );
1275 if( $mw->getWasModified() ) { $this->mContainsOldMagic++
; }
1278 # "Variables" with an additional parameter e.g. {{MSG:wikipedia}}
1279 # The callbacks are at the bottom of this file
1281 $mw =& MagicWord
::get( MAG_MSG
);
1282 $text = $mw->substituteCallback( $text, "wfReplaceMsgVar" );
1283 if( $mw->getWasModified() ) { $this->mContainsNewMagic++
; }
1285 $mw =& MagicWord
::get( MAG_MSGNW
);
1286 $text = $mw->substituteCallback( $text, "wfReplaceMsgnwVar" );
1287 if( $mw->getWasModified() ) { $this->mContainsNewMagic++
; }
1289 wfProfileOut( $fname );
1293 # Cleans up HTML, removes dangerous tags and attributes
1294 /* private */ function removeHTMLtags( $text )
1296 $fname = "OutputPage::removeHTMLtags";
1297 wfProfileIn( $fname );
1298 $htmlpairs = array( # Tags that must be closed
1299 "b", "i", "u", "font", "big", "small", "sub", "sup", "h1",
1300 "h2", "h3", "h4", "h5", "h6", "cite", "code", "em", "s",
1301 "strike", "strong", "tt", "var", "div", "center",
1302 "blockquote", "ol", "ul", "dl", "table", "caption", "pre",
1303 "ruby", "rt" , "rb" , "rp"
1305 $htmlsingle = array(
1306 "br", "p", "hr", "li", "dt", "dd"
1308 $htmlnest = array( # Tags that can be nested--??
1309 "table", "tr", "td", "th", "div", "blockquote", "ol", "ul",
1310 "dl", "font", "big", "small", "sub", "sup"
1312 $tabletags = array( # Can only appear inside table
1316 $htmlsingle = array_merge( $tabletags, $htmlsingle );
1317 $htmlelements = array_merge( $htmlsingle, $htmlpairs );
1319 $htmlattrs = $this->getHTMLattrs () ;
1321 # Remove HTML comments
1322 $text = preg_replace( "/<!--.*-->/sU", "", $text );
1324 $bits = explode( "<", $text );
1325 $text = array_shift( $bits );
1326 $tagstack = array(); $tablestack = array();
1328 foreach ( $bits as $x ) {
1329 $prev = error_reporting( E_ALL
& ~
( E_NOTICE | E_WARNING
) );
1330 preg_match( "/^(\\/?)(\\w+)([^>]*)(\\/{0,1}>)([^<]*)$/",
1332 list( $qbar, $slash, $t, $params, $brace, $rest ) = $regs;
1333 error_reporting( $prev );
1336 if ( in_array( $t = strtolower( $t ), $htmlelements ) ) {
1340 if ( ! in_array( $t, $htmlsingle ) &&
1341 ( $ot = array_pop( $tagstack ) ) != $t ) {
1342 array_push( $tagstack, $ot );
1345 if ( $t == "table" ) {
1346 $tagstack = array_pop( $tablestack );
1351 # Keep track for later
1352 if ( in_array( $t, $tabletags ) &&
1353 ! in_array( "table", $tagstack ) ) {
1355 } else if ( in_array( $t, $tagstack ) &&
1356 ! in_array ( $t , $htmlnest ) ) {
1358 } else if ( ! in_array( $t, $htmlsingle ) ) {
1359 if ( $t == "table" ) {
1360 array_push( $tablestack, $tagstack );
1361 $tagstack = array();
1363 array_push( $tagstack, $t );
1365 # Strip non-approved attributes from the tag
1366 $newparams = $this->fixTagAttributes($params);
1370 $rest = str_replace( ">", ">", $rest );
1371 $text .= "<$slash$t $newparams$brace$rest";
1375 $text .= "<" . str_replace( ">", ">", $x);
1377 # Close off any remaining tags
1378 while ( $t = array_pop( $tagstack ) ) {
1380 if ( $t == "table" ) { $tagstack = array_pop( $tablestack ); }
1382 wfProfileOut( $fname );
1388 * This function accomplishes several tasks:
1389 * 1) Auto-number headings if that option is enabled
1390 * 2) Add an [edit] link to sections for logged in users who have enabled the option
1391 * 3) Add a Table of contents on the top for users who have enabled the option
1392 * 4) Auto-anchor headings
1394 * It loops through all headlines, collects the necessary data, then splits up the
1395 * string and re-inserts the newly formatted headlines.
1398 /* private */ function formatHeadings( $text )
1400 global $wgUser,$wgArticle,$wgTitle,$wpPreview;
1401 $nh=$wgUser->getOption( "numberheadings" );
1402 $st=$wgUser->getOption( "showtoc" );
1403 if(!$wgTitle->userCanEdit()) {
1407 $es=$wgUser->getID() && $wgUser->getOption( "editsection" );
1408 $esr=$wgUser->getID() && $wgUser->getOption( "editsectiononrightclick" );
1411 # Inhibit editsection links if requested in the page
1412 $esw =& MagicWord
::get( MAG_NOEDITSECTION
);
1413 if ($esw->matchAndRemove( $text )) {
1416 # if the string __NOTOC__ (not case-sensitive) occurs in the HTML,
1418 $mw =& MagicWord
::get( MAG_NOTOC
);
1419 if ($mw->matchAndRemove( $text ))
1424 # never add the TOC to the Main Page. This is an entry page that should not
1425 # be more than 1-2 screens large anyway
1426 if($wgTitle->getPrefixedText()==wfMsg("mainpage")) {$st=0;}
1428 # We need this to perform operations on the HTML
1429 $sk=$wgUser->getSkin();
1431 # Get all headlines for numbering them and adding funky stuff like [edit]
1433 preg_match_all("/<H([1-6])(.*?>)(.*?)<\/H[1-6]>/i",$text,$matches);
1438 # Ugh .. the TOC should have neat indentation levels which can be
1439 # passed to the skin functions. These are determined here
1440 foreach($matches[3] as $headline) {
1441 if($level) { $prevlevel=$level;}
1442 $level=$matches[1][$c];
1443 if(($nh||
$st) && $prevlevel && $level>$prevlevel) {
1445 $h[$level]=0; // reset when we enter a new level
1446 $toc.=$sk->tocIndent($level-$prevlevel);
1447 $toclevel+
=$level-$prevlevel;
1450 if(($nh||
$st) && $level<$prevlevel) {
1451 $h[$level+
1]=0; // reset when we step back a level
1452 $toc.=$sk->tocUnindent($prevlevel-$level);
1453 $toclevel-=$prevlevel-$level;
1456 $h[$level]++
; // count number of headlines for each level
1459 for($i=1;$i<=$level;$i++
) {
1461 if($dot) {$numbering.=".";}
1468 // The canonized header is a version of the header text safe to use for links
1470 $canonized_headline=preg_replace("/<.*?>/","",$headline); // strip out HTML
1471 $tocline = trim( $canonized_headline );
1472 $canonized_headline=str_replace('"',"",$canonized_headline);
1473 $canonized_headline=str_replace(" ","_",trim($canonized_headline));
1474 $refer[$c]=$canonized_headline;
1475 $refers[$canonized_headline]++
; // count how many in assoc. array so we can track dupes in anchors
1476 $refcount[$c]=$refers[$canonized_headline];
1478 // Prepend the number to the heading text
1481 $tocline=$numbering ." ". $tocline;
1483 // Don't number the heading if it is the only one (looks silly)
1484 if($nh && count($matches[3]) > 1) {
1485 $headline=$numbering . " " . $headline; // the two are different if the line contains a link
1489 // Create the anchor for linking from the TOC to the section
1491 $anchor=$canonized_headline;
1492 if($refcount[$c]>1) {$anchor.="_".$refcount[$c];}
1494 $toc.=$sk->tocLine($anchor,$tocline,$toclevel);
1496 if($es && !isset($wpPreview)) {
1497 $head[$c].=$sk->editSectionLink($c+
1);
1500 // Put it all together
1502 $head[$c].="<h".$level.$matches[2][$c]
1503 ."<a name=\"".$anchor."\">"
1508 // Add the edit section link
1510 if($esr && !isset($wpPreview)) {
1511 $head[$c]=$sk->editSectionScript($c+
1,$head[$c]);
1521 $toc.=$sk->tocUnindent($toclevel);
1522 $toc=$sk->tocTable($toc);
1525 // split up and insert constructed headlines
1527 $blocks=preg_split("/<H[1-6].*?>.*?<\/H[1-6]>/i",$text);
1530 foreach($blocks as $block) {
1531 if(($es) && !isset($wpPreview) && $c>0 && $i==0) {
1532 # This is the [edit] link that appears for the top block of text when
1533 # section editing is enabled
1534 $full.=$sk->editSectionLink(0);
1537 if($st && $toclines>3 && !$i) {
1538 # Let's add a top anchor just in case we want to link to the top of the page
1539 $full="<a name=\"top\"></a>".$full.$toc;
1549 /* private */ function magicISBN( $text )
1553 $a = split( "ISBN ", " $text" );
1554 if ( count ( $a ) < 2 ) return $text;
1555 $text = substr( array_shift( $a ), 1);
1556 $valid = "0123456789-ABCDEFGHIJKLMNOPQRSTUVWXYZ";
1558 foreach ( $a as $x ) {
1559 $isbn = $blank = "" ;
1560 while ( " " == $x{0} ) {
1562 $x = substr( $x, 1 );
1564 while ( strstr( $valid, $x{0} ) != false ) {
1566 $x = substr( $x, 1 );
1568 $num = str_replace( "-", "", $isbn );
1569 $num = str_replace( " ", "", $num );
1572 $text .= "ISBN $blank$x";
1574 $text .= "<a href=\"" . wfLocalUrlE( $wgLang->specialPage(
1575 "Booksources"), "isbn={$num}" ) . "\" class=\"internal\">ISBN $isbn</a>";
1582 /* private */ function magicRFC( $text )
1587 /* private */ function headElement()
1589 global $wgDocType, $wgDTD, $wgUser, $wgLanguageCode, $wgOutputEncoding, $wgLang;
1591 $ret = "<!DOCTYPE HTML PUBLIC \"$wgDocType\"\n \"$wgDTD\">\n";
1593 if ( "" == $this->mHTMLtitle
) {
1594 $this->mHTMLtitle
= $this->mPagetitle
;
1596 $rtl = $wgLang->isRTL() ?
" dir='RTL'" : "";
1597 $ret .= "<html lang=\"$wgLanguageCode\"$rtl><head><title>{$this->mHTMLtitle}</title>\n";
1598 array_push( $this->mMetatags
, array( "http:Content-type", "text/html; charset={$wgOutputEncoding}" ) );
1599 foreach ( $this->mMetatags
as $tag ) {
1600 if ( 0 == strcasecmp( "http:", substr( $tag[0], 0, 5 ) ) ) {
1602 $tag[0] = substr( $tag[0], 5 );
1606 $ret .= "<meta $a=\"{$tag[0]}\" content=\"{$tag[1]}\">\n";
1608 $p = $this->mRobotpolicy
;
1609 if ( "" == $p ) { $p = "index,follow"; }
1610 $ret .= "<meta name=\"robots\" content=\"$p\">\n";
1612 if ( count( $this->mKeywords
) > 0 ) {
1613 $ret .= "<meta name=\"keywords\" content=\"" .
1614 implode( ",", $this->mKeywords
) . "\">\n";
1616 foreach ( $this->mLinktags
as $tag ) {
1618 if ( "" != $tag[0] ) { $ret .= "rel=\"{$tag[0]}\" "; }
1619 if ( "" != $tag[1] ) { $ret .= "rev=\"{$tag[1]}\" "; }
1620 $ret .= "href=\"{$tag[2]}\">\n";
1622 $sk = $wgUser->getSkin();
1623 $ret .= $sk->getHeadScripts();
1624 $ret .= $sk->getUserStyles();
1626 $ret .= "</head>\n";
1630 /* private */ function fillFromParserCache(){
1631 global $wgUser, $wgArticle;
1632 $hash = $wgUser->getPageRenderingHash();
1633 $pageid = intval( $wgArticle->getID() );
1634 $res = wfQuery("SELECT pc_data FROM parsercache WHERE pc_pageid = {$pageid} ".
1635 " AND pc_prefhash = '{$hash}' AND pc_expire > NOW()", DB_WRITE
);
1636 $row = wfFetchObject ( $res );
1638 $data = unserialize( gzuncompress($row->pc_data
) );
1639 $this->addHTML( $data['html'] );
1640 $this->mLanguageLinks
= $data['mLanguageLinks'];
1641 $this->mCategoryLinks
= $data['mCategoryLinks'];
1642 wfProfileOut( $fname );
1649 /* private */ function saveParserCache( $text ){
1650 global $wgUser, $wgArticle;
1651 $hash = $wgUser->getPageRenderingHash();
1652 $pageid = intval( $wgArticle->getID() );
1653 $title = wfStrencode( $wgArticle->mTitle
->getPrefixedDBKey() );
1655 $data['html'] = $text;
1656 $data['mLanguageLinks'] = $this->mLanguageLinks
;
1657 $data['mCategoryLinks'] = $this->mCategoryLinks
;
1658 $ser = addslashes( gzcompress( serialize( $data ) ) );
1659 if( $this->mContainsOldMagic
){
1661 } else if( $this->mContainsNewMagic
){
1667 wfQuery("REPLACE INTO parsercache (pc_prefhash,pc_pageid,pc_title,pc_data, pc_expire) ".
1668 "VALUES('{$hash}', {$pageid}, '{$title}', '{$ser}', ".
1669 "DATE_ADD(NOW(), INTERVAL {$expire}))", DB_WRITE
);
1671 if( rand() %
50 == 0 ){ // more efficient to just do it sometimes
1672 $this->purgeParserCache();
1676 /* static private */ function purgeParserCache(){
1677 wfQuery("DELETE FROM parsercache WHERE pc_expire < NOW() LIMIT 250", DB_WRITE
);
1680 /* static */ function parsercacheClearLinksTo( $pid ){
1681 $pid = intval( $pid );
1682 wfQuery("DELETE parsercache FROM parsercache,links ".
1683 "WHERE pc_title=links.l_from AND l_to={$pid}", DB_WRITE
);
1684 wfQuery("DELETE FROM parsercache WHERE pc_pageid='{$pid}'", DB_WRITE
);
1687 # $title is a prefixed db title, for example like Title->getPrefixedDBkey() returns.
1688 /* static */ function parsercacheClearBrokenLinksTo( $title ){
1689 $title = wfStrencode( $title );
1690 wfQuery("DELETE parsercache FROM parsercache,brokenlinks ".
1691 "WHERE pc_pageid=bl_from AND bl_to='{$title}'", DB_WRITE
);
1695 /* static */ function parsercacheClearPage( $pid ){
1696 $pid = intval( $pid );
1697 wfQuery("DELETE FROM parsercache WHERE pc_pageid='{$pid}'", DB_WRITE
);
1701 # Regex callbacks, used in OutputPage::replaceVariables
1703 # Just get rid of the dangerous stuff
1704 # Necessary because replaceVariables is called after removeHTMLtags,
1705 # and message text can come from any user
1706 function wfReplaceMsgVar( $matches ) {
1707 global $wgCurOut, $wgLinkCache;
1708 $text = $wgCurOut->removeHTMLtags( wfMsg( $matches[1] ) );
1709 $wgLinkCache->suspend();
1710 $text = $wgCurOut->replaceInternalLinks( $text );
1711 $wgLinkCache->resume();
1712 $wgLinkCache->addLinkObj( Title
::makeTitle( NS_MEDIAWIKI
, $matches[1] ) );
1716 # Effective <nowiki></nowiki>
1717 # Not real <nowiki> because this is called after nowiki sections are processed
1718 function wfReplaceMsgnwVar( $matches ) {
1719 global $wgCurOut, $wgLinkCache;
1720 $text = wfEscapeWikiText( wfMsg( $matches[1] ) );
1721 $wgLinkCache->addLinkObj( Title
::makeTitle( NS_MEDIAWIKI
, $matches[1] ) );