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 header( "Expires: Mon, 15 Jan 2001 00:00:00 GMT" ); # Cachers always validate the page!
83 header( "Cache-Control: private, must-revalidate, max-age=0" );
84 header( "Last-Modified: {$lastmod}" );
85 wfDebug( "CACHED client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
89 wfDebug( "READY client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
90 $this->mLastModified
= $lastmod;
93 wfDebug( "We're confused.\n", false );
94 $this->mLastModified
= $lastmod;
98 function setRobotpolicy( $str ) { $this->mRobotpolicy
= $str; }
99 function setHTMLtitle( $name ) { $this->mHTMLtitle
= $name; }
100 function setPageTitle( $name ) { $this->mPagetitle
= $name; }
101 function getPageTitle() { return $this->mPagetitle
; }
102 function setSubtitle( $str ) { $this->mSubtitle
= $str; }
103 function getSubtitle() { return $this->mSubtitle
; }
104 function isArticle() { return $this->mIsarticle
; }
105 function setPrintable() { $this->mPrintable
= true; }
106 function isPrintable() { return $this->mPrintable
; }
107 function setOnloadHandler( $js ) { $this->mOnloadHandler
= $js; }
108 function getOnloadHandler() { return $this->mOnloadHandler
; }
109 function disable() { $this->mDoNothing
= true; }
111 function setArticleRelated( $v )
113 $this->mIsArticleRelated
= $v;
115 $this->mIsarticle
= false;
118 function setArticleFlag( $v ) {
119 $this->mIsarticle
= $v;
121 $this->mIsArticleRelated
= $v;
125 function isArticleRelated()
127 return $this->mIsArticleRelated
;
130 function getLanguageLinks() {
131 global $wgTitle, $wgLanguageCode;
132 global $wgDBconnection, $wgDBname;
133 return $this->mLanguageLinks
;
135 function supressQuickbar() { $this->mSupressQuickbar
= true; }
136 function isQuickbarSupressed() { return $this->mSupressQuickbar
; }
138 function addHTML( $text ) { $this->mBodytext
.= $text; }
139 function addHeadtext( $text ) { $this->mHeadtext
.= $text; }
140 function debug( $text ) { $this->mDebugtext
.= $text; }
142 # First pass--just handle <nowiki> sections, pass the rest off
143 # to doWikiPass2() which does all the real work.
145 function addWikiText( $text, $linestart = true )
147 global $wgUseTeX, $wgArticle, $wgUser, $action;
148 $fname = "OutputPage::addWikiText";
149 wfProfileIn( $fname );
150 $unique = "3iyZiyA7iMwg5rhxP0Dcc9oTnj8qD1jm1Sfv4";
151 $unique2 = "4LIQ9nXtiYFPCSfitVwDw7EYwQlL4GeeQ7qSO";
152 $unique3 = "fPaA8gDfdLBqzj68Yjg9Hil3qEF8JGO0uszIp";
163 # Replace any instances of the placeholders
164 $text = str_replace( $unique, wfHtmlEscapeFirst( $unique ), $text );
165 $text = str_replace( $unique2, wfHtmlEscapeFirst( $unique2 ), $text );
166 $text = str_replace( $unique3, wfHtmlEscapeFirst( $unique3 ), $text );
168 global $wgEnableParserCache;
170 $wgEnableParserCache && $action == "view" &&
171 intval($wgUser->getOption( "stubthreshold" )) == 0 &&
172 isset($wgArticle) && $wgArticle->getID() > 0;
174 if( $use_parser_cache ){
175 if( $this->fillFromParserCache() ){
176 wfProfileOut( $fname );
181 while ( "" != $text ) {
182 $p = preg_split( "/<\\s*nowiki\\s*>/i", $text, 2 );
184 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $text = ""; }
186 $q = preg_split( "/<\\/\\s*nowiki\\s*>/i", $p[1], 2 );
188 $nwlist[$nwsecs] = wfEscapeHTMLTagsOnly($q[0]);
189 $stripped .= $unique . $nwsecs . "s";
195 while ( "" != $stripped ) {
196 $p = preg_split( "/<\\s*math\\s*>/i", $stripped, 2 );
198 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $stripped = ""; }
200 $q = preg_split( "/<\\/\\s*math\\s*>/i", $p[1], 2 );
202 $mathlist[$mathsecs] = renderMath($q[0]);
203 $stripped2 .= $unique2 . $mathsecs . "s";
208 $stripped2 = $stripped;
211 while ( "" != $stripped2 ) {
212 $p = preg_split( "/<\\s*pre\\s*>/i", $stripped2, 2 );
214 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $stripped2 = ""; }
216 $q = preg_split( "/<\\/\\s*pre\\s*>/i", $p[1], 2 );
218 $prelist[$presecs] = "<pre>". wfEscapeHTMLTagsOnly($q[0]). "</pre>\n";
219 $stripped3 .= $unique3 . $presecs . "s";
224 $text = $this->doWikiPass2( $stripped3, $linestart );
226 $specialChars = array("\\", "$");
227 $escapedChars = array("\\\\", "\\$");
228 for ( $i = 1; $i <= $presecs; ++
$i ) {
229 $text = preg_replace( "/{$unique3}{$i}s/", str_replace( $specialChars,
230 $escapedChars, $prelist[$i] ), $text );
233 for ( $i = 1; $i <= $mathsecs; ++
$i ) {
234 $text = preg_replace( "/{$unique2}{$i}s/", str_replace( $specialChars,
235 $escapedChars, $mathlist[$i] ), $text );
238 for ( $i = 1; $i <= $nwsecs; ++
$i ) {
239 $text = preg_replace( "/{$unique}{$i}s/", str_replace( $specialChars,
240 $escapedChars, $nwlist[$i] ), $text );
242 $this->addHTML( $text );
244 if($use_parser_cache ){
245 $this->saveParserCache( $text );
247 wfProfileOut( $fname );
250 function sendCacheControl() {
252 if( $this->mLastModified
!= "" ) {
253 wfDebug( "** private caching; {$this->mLastModified} **\n", false );
254 header( "Cache-Control: private, must-revalidate, max-age=0" );
255 header( "Last-modified: {$this->mLastModified}" );
257 # We should put in Accept-Encoding, but IE chokes on anything but
258 # User-Agent in a Vary: header (at least through 6.0)
259 header( "Vary: User-Agent" );
262 wfDebug( "** no caching **\n", false );
263 header( "Cache-Control: no-cache" ); # Experimental - see below
264 header( "Pragma: no-cache" );
265 header( "Last-modified: " . gmdate( "D, j M Y H:i:s" ) . " GMT" );
267 header( "Expires: Mon, 15 Jan 2001 00:00:00 GMT" ); # Cachers always validate the page!
270 # Finally, all the text has been munged and accumulated into
271 # the object, let's actually output it:
275 global $wgUser, $wgLang, $wgDebugComments, $wgCookieExpiration;
276 global $wgInputEncoding, $wgOutputEncoding, $wgLanguageCode;
277 if( $this->mDoNothing
){
280 $fname = "OutputPage::output";
281 wfProfileIn( $fname );
283 $sk = $wgUser->getSkin();
285 $this->sendCacheControl();
287 header( "Content-type: text/html; charset={$wgOutputEncoding}" );
288 header( "Content-language: {$wgLanguageCode}" );
290 if ( "" != $this->mRedirect
) {
291 if( substr( $this->mRedirect
, 0, 4 ) != "http" ) {
292 # Standards require redirect URLs to be absolute
294 $this->mRedirect
= $wgServer . $this->mRedirect
;
296 header( "Location: {$this->mRedirect}" );
300 $exp = time() +
$wgCookieExpiration;
301 foreach( $this->mCookies
as $name => $val ) {
302 setcookie( $name, $val, $exp, "/" );
305 $sk->outputPage( $this );
311 global $wgInputEncoding, $wgOutputEncoding, $wgLang;
312 if ( 0 == strcmp( $wgInputEncoding, $wgOutputEncoding ) ) {
315 $outs = $wgLang->iconv( $wgInputEncoding, $wgOutputEncoding, $ins );
316 if ( false === $outs ) { $outs = $ins; }
321 function setEncodings()
323 global $wgInputEncoding, $wgOutputEncoding;
324 global $wgUser, $wgLang;
326 $wgInputEncoding = strtolower( $wgInputEncoding );
328 if( $wgUser->getOption( 'altencoding' ) ) {
329 $wgLang->setAltEncoding();
333 if ( empty( $_SERVER['HTTP_ACCEPT_CHARSET'] ) ) {
334 $wgOutputEncoding = strtolower( $wgOutputEncoding );
339 # This code is unused anyway!
340 # Commenting out. --bv 2003-11-15
342 $a = explode( ",", $_SERVER['HTTP_ACCEPT_CHARSET'] );
346 foreach ( $a as $s ) {
347 if ( preg_match( "/(.*);q=(.*)/", $s, $m ) ) {
359 #if ( "*" == $bestset ) { $bestset = "iso-8859-1"; }
360 if ( "*" == $bestset ) { $bestset = $wgOutputEncoding; }
361 $wgOutputEncoding = strtolower( $bestset );
366 $wgOutputEncoding = $wgInputEncoding;
369 # Returns a HTML comment with the elapsed time since request.
370 # This method has no side effects.
371 function reportTime()
373 global $wgRequestTime;
375 list( $usec, $sec ) = explode( " ", microtime() );
376 $now = (float)$sec +
(float)$usec;
378 list( $usec, $sec ) = explode( " ", $wgRequestTime );
379 $start = (float)$sec +
(float)$usec;
380 $elapsed = $now - $start;
381 $com = sprintf( "<!-- Time since request: %01.2f secs. -->",
386 # Note: these arguments are keys into wfMsg(), not text!
388 function errorpage( $title, $msg )
392 $this->mDebugtext
.= "Original title: " .
393 $wgTitle->getPrefixedText() . "\n";
394 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
395 $this->setPageTitle( wfMsg( $title ) );
396 $this->setRobotpolicy( "noindex,nofollow" );
397 $this->setArticleRelated( false );
399 $this->mBodytext
= "";
400 $this->addHTML( "<p>" . wfMsg( $msg ) . "\n" );
401 $this->returnToMain( false );
407 function sysopRequired()
411 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
412 $this->setPageTitle( wfMsg( "sysoptitle" ) );
413 $this->setRobotpolicy( "noindex,nofollow" );
414 $this->setArticleRelated( false );
415 $this->mBodytext
= "";
417 $sk = $wgUser->getSkin();
418 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
419 $this->addHTML( wfMsg( "sysoptext", $ap ) );
420 $this->returnToMain();
423 function developerRequired()
427 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
428 $this->setPageTitle( wfMsg( "developertitle" ) );
429 $this->setRobotpolicy( "noindex,nofollow" );
430 $this->setArticleRelated( false );
431 $this->mBodytext
= "";
433 $sk = $wgUser->getSkin();
434 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
435 $this->addHTML( wfMsg( "developertext", $ap ) );
436 $this->returnToMain();
439 function databaseError( $fname )
441 global $wgUser, $wgCommandLineMode;
443 $this->setPageTitle( wfMsgNoDB( "databaseerror" ) );
444 $this->setRobotpolicy( "noindex,nofollow" );
445 $this->setArticleRelated( false );
447 if ( $wgCommandLineMode ) {
448 $msg = wfMsgNoDB( "dberrortextcl" );
450 $msg = wfMsgNoDB( "dberrortext" );
453 $msg = str_replace( "$1", htmlspecialchars( wfLastDBquery() ), $msg );
454 $msg = str_replace( "$2", htmlspecialchars( $fname ), $msg );
455 $msg = str_replace( "$3", wfLastErrno(), $msg );
456 $msg = str_replace( "$4", htmlspecialchars( wfLastError() ), $msg );
458 if ( $wgCommandLineMode ) {
462 $sk = $wgUser->getSkin();
463 $shlink = $sk->makeKnownLink( wfMsgNoDB( "searchhelppage" ),
464 wfMsgNoDB( "searchingwikipedia" ) );
465 $msg = str_replace( "$5", $shlink, $msg );
467 $this->mBodytext
= $msg;
472 function readOnlyPage( $source = "", $protected = false )
474 global $wgUser, $wgReadOnlyFile;
476 $this->setRobotpolicy( "noindex,nofollow" );
477 $this->setArticleRelated( false );
480 $this->setPageTitle( wfMsg( "viewsource" ) );
481 $this->addWikiText( wfMsg( "protectedtext" ) );
483 $this->setPageTitle( wfMsg( "readonly" ) );
484 $reason = file_get_contents( $wgReadOnlyFile );
485 $this->addHTML( wfMsg( "readonlytext", $reason ) );
489 $rows = $wgUser->getOption( "rows" );
490 $cols = $wgUser->getOption( "cols" );
491 $text .= "</p>\n<textarea cols='$cols' rows='$rows' readonly>" .
492 htmlspecialchars( $source ) . "\n</textarea>";
493 $this->addHTML( $text );
496 $this->returnToMain( false );
499 function fatalError( $message )
501 $this->setPageTitle( wfMsg( "internalerror" ) );
502 $this->setRobotpolicy( "noindex,nofollow" );
503 $this->setArticleRelated( false );
505 $this->mBodytext
= $message;
510 function unexpectedValueError( $name, $val )
512 $this->fatalError( wfMsg( "unexpected", $name, $val ) );
515 function fileCopyError( $old, $new )
517 $this->fatalError( wfMsg( "filecopyerror", $old, $new ) );
520 function fileRenameError( $old, $new )
522 $this->fatalError( wfMsg( "filerenameerror", $old, $new ) );
525 function fileDeleteError( $name )
527 $this->fatalError( wfMsg( "filedeleteerror", $name ) );
530 function fileNotFoundError( $name )
532 $this->fatalError( wfMsg( "filenotfound", $name ) );
535 function returnToMain( $auto = true )
537 global $wgUser, $wgOut, $returnto;
539 $sk = $wgUser->getSkin();
540 if ( "" == $returnto ) {
541 $returnto = wfMsg( "mainpage" );
543 $link = $sk->makeKnownLink( $returnto, "" );
545 $r = wfMsg( "returnto", $link );
547 $wgOut->addMeta( "http:Refresh", "10;url=" .
548 wfLocalUrlE( wfUrlencode( $returnto ) ) );
550 $wgOut->addHTML( "\n<p>$r\n" );
554 function categoryMagic ()
556 global $wgTitle , $wgUseCategoryMagic ;
557 if ( !isset ( $wgUseCategoryMagic ) ||
!$wgUseCategoryMagic ) return ;
558 $id = $wgTitle->getArticleID() ;
559 $cat = ucfirst ( wfMsg ( "category" ) ) ;
560 $ti = $wgTitle->getText() ;
561 $ti = explode ( ":" , $ti , 2 ) ;
562 if ( $cat != $ti[0] ) return "" ;
563 $r = "<br break=all>\n" ;
565 $articles = array() ;
566 $parents = array () ;
567 $children = array() ;
571 $sk = $wgUser->getSkin() ;
572 $sql = "SELECT l_from FROM links WHERE l_to={$id}" ;
573 $res = wfQuery ( $sql, DB_READ
) ;
574 while ( $x = wfFetchObject ( $res ) )
577 # $t->newFromDBkey ( $x->l_from ) ;
578 # $t = $t->getText() ;
580 $y = explode ( ":" , $t , 2 ) ;
581 if ( count ( $y ) == 2 && $y[0] == $cat ) {
582 array_push ( $children , $sk->makeLink ( $t , $y[1] ) ) ;
584 array_push ( $articles , $sk->makeLink ( $t ) ) ;
587 wfFreeResult ( $res ) ;
590 if ( count ( $children ) > 0 )
592 asort ( $children ) ;
593 $r .= "<h2>".wfMsg("subcategories")."</h2>\n" ;
594 $r .= implode ( ", " , $children ) ;
598 if ( count ( $articles ) > 0 )
600 asort ( $articles ) ;
601 $h = wfMsg( "category_header", $ti[1] );
602 $r .= "<h2>{$h}</h2>\n" ;
603 $r .= implode ( ", " , $articles ) ;
610 function getHTMLattrs ()
612 $htmlattrs = array( # Allowed attributes--no scripting, etc.
613 "title", "align", "lang", "dir", "width", "height",
614 "bgcolor", "clear", /* BR */ "noshade", /* HR */
615 "cite", /* BLOCKQUOTE, Q */ "size", "face", "color",
616 /* FONT */ "type", "start", "value", "compact",
617 /* For various lists, mostly deprecated but safe */
618 "summary", "width", "border", "frame", "rules",
619 "cellspacing", "cellpadding", "valign", "char",
620 "charoff", "colgroup", "col", "span", "abbr", "axis",
621 "headers", "scope", "rowspan", "colspan", /* Tables */
622 "id", "class", "name", "style" /* For CSS */
627 function fixTagAttributes ( $t )
629 if ( trim ( $t ) == "" ) return "" ; # Saves runtime ;-)
630 $htmlattrs = $this->getHTMLattrs() ;
632 # Strip non-approved attributes from the tag
634 "/(\\w+)(\\s*=\\s*([^\\s\">]+|\"[^\">]*\"))?/e",
635 "(in_array(strtolower(\"\$1\"),\$htmlattrs)?(\"\$1\".((\"x\$3\" != \"x\")?\"=\$3\":'')):'')",
637 # Strip javascript "expression" from stylesheets. Brute force approach:
638 # If anythin offensive is found, all attributes of the HTML tag are dropped
641 "/style\\s*=.*(expression|tps*:\/\/|url\\s*\().*/is",
642 wfMungeToUtf8( $t ) ) )
650 function doTableStuff ( $t )
652 $t = explode ( "\n" , $t ) ;
653 $td = array () ; # Is currently a td tag open?
654 $ltd = array () ; # Was it TD or TH?
655 $tr = array () ; # Is currently a tr tag open?
656 $ltr = array () ; # tr attributes
657 foreach ( $t AS $k => $x )
660 $fc = substr ( $x , 0 , 1 ) ;
661 if ( "{|" == substr ( $x , 0 , 2 ) )
663 $t[$k] = "<table " . $this->fixTagAttributes ( substr ( $x , 3 ) ) . ">" ;
664 array_push ( $td , false ) ;
665 array_push ( $ltd , "" ) ;
666 array_push ( $tr , false ) ;
667 array_push ( $ltr , "" ) ;
669 else if ( count ( $td ) == 0 ) { } # Don't do any of the following
670 else if ( "|}" == substr ( $x , 0 , 2 ) )
673 $l = array_pop ( $ltd ) ;
674 if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
675 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
679 /* else if ( "|_" == substr ( $x , 0 , 2 ) ) # Caption
681 $z = trim ( substr ( $x , 2 ) ) ;
682 $t[$k] = "<caption>{$z}</caption>\n" ;
684 else if ( "|-" == substr ( $x , 0 , 2 ) ) # Allows for |---------------
686 $x = substr ( $x , 1 ) ;
687 while ( $x != "" && substr ( $x , 0 , 1 ) == '-' ) $x = substr ( $x , 1 ) ;
689 $l = array_pop ( $ltd ) ;
690 if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
691 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
694 array_push ( $tr , false ) ;
695 array_push ( $td , false ) ;
696 array_push ( $ltd , "" ) ;
697 array_push ( $ltr , $this->fixTagAttributes ( $x ) ) ;
699 else if ( "|" == $fc ||
"!" == $fc ||
"|+" == substr ( $x , 0 , 2 ) ) # Caption
701 if ( "|+" == substr ( $x , 0 , 2 ) )
704 $x = substr ( $x , 1 ) ;
706 $after = substr ( $x , 1 ) ;
707 if ( $fc == "!" ) $after = str_replace ( "!!" , "||" , $after ) ;
708 $after = explode ( "||" , $after ) ;
710 foreach ( $after AS $theline )
713 $tra = array_pop ( $ltr ) ;
714 if ( !array_pop ( $tr ) ) $z = "<tr {$tra}>\n" ;
715 array_push ( $tr , true ) ;
716 array_push ( $ltr , "" ) ;
718 $l = array_pop ( $ltd ) ;
719 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
720 if ( $fc == "|" ) $l = "TD" ;
721 else if ( $fc == "!" ) $l = "TH" ;
722 else if ( $fc == "+" ) $l = "CAPTION" ;
724 array_push ( $ltd , $l ) ;
725 $y = explode ( "|" , $theline , 2 ) ;
726 if ( count ( $y ) == 1 ) $y = "{$z}<{$l}>{$y[0]}" ;
727 else $y = $y = "{$z}<{$l} ".$this->fixTagAttributes($y[0]).">{$y[1]}" ;
729 array_push ( $td , true ) ;
734 # Closing open td, tr && table
735 while ( count ( $td ) > 0 )
737 if ( array_pop ( $td ) ) $t[] = "</td>" ;
738 if ( array_pop ( $tr ) ) $t[] = "</tr>" ;
742 $t = implode ( "\n" , $t ) ;
743 # $t = $this->removeHTMLtags( $t );
747 # Well, OK, it's actually about 14 passes. But since all the
748 # hard lifting is done inside PHP's regex code, it probably
749 # wouldn't speed things up much to add a real parser.
751 function doWikiPass2( $text, $linestart )
753 global $wgUser, $wgLang, $wgUseDynamicDates;
754 $fname = "OutputPage::doWikiPass2";
755 wfProfileIn( $fname );
757 $text = $this->removeHTMLtags( $text );
758 $text = $this->replaceVariables( $text );
760 $text = preg_replace( "/(^|\n)-----*/", "\\1<hr>", $text );
761 $text = str_replace ( "<HR>", "<hr>", $text );
763 $text = $this->doAllQuotes( $text );
764 $text = $this->doHeadings( $text );
765 $text = $this->doBlockLevels( $text, $linestart );
767 if($wgUseDynamicDates) {
768 global $wgDateFormatter;
769 $text = $wgDateFormatter->reformat( $wgUser->getOption("date"), $text );
772 $text = $this->replaceExternalLinks( $text );
773 $text = $this->replaceInternalLinks ( $text );
774 $text = $this->doTableStuff ( $text ) ;
776 $text = $this->magicISBN( $text );
777 $text = $this->magicRFC( $text );
778 $text = $this->formatHeadings( $text );
780 $sk = $wgUser->getSkin();
781 $text = $sk->transformContent( $text );
782 $text .= $this->categoryMagic () ;
784 wfProfileOut( $fname );
788 /* private */ function doAllQuotes( $text )
791 $lines = explode( "\r\n", $text );
792 foreach ( $lines as $line ) {
793 $outtext .= $this->doQuotes ( "", $line, "" ) . "\r\n";
798 /* private */ function doQuotes( $pre, $text, $mode )
800 if ( preg_match( "/^(.*)''(.*)$/sU", $text, $m ) ) {
801 $m1_strong = ($m[1] == "") ?
"" : "<strong>{$m[1]}</strong>";
802 $m1_em = ($m[1] == "") ?
"" : "<em>{$m[1]}</em>";
803 if ( substr ($m[2], 0, 1) == "'" ) {
804 $m[2] = substr ($m[2], 1);
806 return $this->doQuotes ( $m[1], $m[2], ($m[1] == "") ?
"both" : "emstrong" );
807 } else if ($mode == "strong") {
808 return $m1_strong . $this->doQuotes ( "", $m[2], "" );
809 } else if (($mode == "emstrong") ||
($mode == "both")) {
810 return $this->doQuotes ( "", $pre.$m1_strong.$m[2], "em" );
811 } else if ($mode == "strongem") {
812 return "<strong>{$pre}{$m1_em}</strong>" . $this->doQuotes ( "", $m[2], "em" );
814 return $m[1] . $this->doQuotes ( "", $m[2], "strong" );
817 if ($mode == "strong") {
818 return $this->doQuotes ( $m[1], $m[2], ($m[1] == "") ?
"both" : "strongem" );
819 } else if ($mode == "em") {
820 return $m1_em . $this->doQuotes ( "", $m[2], "" );
821 } else if ($mode == "emstrong") {
822 return "<em>{$pre}{$m1_strong}</em>" . $this->doQuotes ( "", $m[2], "strong" );
823 } else if (($mode == "strongem") ||
($mode == "both")) {
824 return $this->doQuotes ( "", $pre.$m1_em.$m[2], "strong" );
826 return $m[1] . $this->doQuotes ( "", $m[2], "em" );
830 $text_strong = ($text == "") ?
"" : "<strong>{$text}</strong>";
831 $text_em = ($text == "") ?
"" : "<em>{$text}</em>";
834 } else if ($mode == "em") {
835 return $pre . $text_em;
836 } else if ($mode == "strong") {
837 return $pre . $text_strong;
838 } else if ($mode == "strongem") {
839 return (($pre == "") && ($text == "")) ?
"" : "<strong>{$pre}{$text_em}</strong>";
841 return (($pre == "") && ($text == "")) ?
"" : "<em>{$pre}{$text_strong}</em>";
846 /* private */ function doHeadings( $text )
848 for ( $i = 6; $i >= 1; --$i ) {
849 $h = substr( "======", 0, $i );
850 $text = preg_replace( "/^{$h}([^=]+){$h}(\\s|$)/m",
851 "<h{$i}>\\1</h{$i}>\\2", $text );
856 # Note: we have to do external links before the internal ones,
857 # and otherwise take great care in the order of things here, so
858 # that we don't end up interpreting some URLs twice.
860 /* private */ function replaceExternalLinks( $text )
862 $fname = "OutputPage::replaceExternalLinks";
863 wfProfileIn( $fname );
864 $text = $this->subReplaceExternalLinks( $text, "http", true );
865 $text = $this->subReplaceExternalLinks( $text, "https", true );
866 $text = $this->subReplaceExternalLinks( $text, "ftp", false );
867 $text = $this->subReplaceExternalLinks( $text, "gopher", false );
868 $text = $this->subReplaceExternalLinks( $text, "news", false );
869 $text = $this->subReplaceExternalLinks( $text, "mailto", false );
870 wfProfileOut( $fname );
874 /* private */ function subReplaceExternalLinks( $s, $protocol, $autonumber )
876 global $wgUser, $printable;
877 global $wgAllowExternalImages;
880 $unique = "4jzAfzB8hNvf4sqyO9Edd8pSmk9rE2in0Tgw3";
881 $uc = "A-Za-z0-9_\\/~%\\-+&*#?!=()@\\x80-\\xFF";
883 # this is the list of separators that should be ignored if they
884 # are the last character of an URL but that should be included
885 # if they occur within the URL, e.g. "go to www.foo.com, where .."
886 # in this case, the last comma should not become part of the URL,
887 # but in "www.foo.com/123,2342,32.htm" it should.
889 $fnc = "A-Za-z0-9_.,~%\\-+&;#*?!=()@\\x80-\\xFF";
890 $images = "gif|png|jpg|jpeg";
892 # PLEASE NOTE: The curly braces { } are not part of the regex,
893 # they are interpreted as part of the string (used to tell PHP
894 # that the content of the string should be inserted there).
895 $e1 = "/(^|[^\\[])({$protocol}:)([{$uc}{$sep}]+)\\/([{$fnc}]+)\\." .
896 "((?i){$images})([^{$uc}]|$)/";
898 $e2 = "/(^|[^\\[])({$protocol}:)(([".$uc."]|[".$sep."][".$uc."])+)([^". $uc . $sep. "]|[".$sep."]|$)/";
899 $sk = $wgUser->getSkin();
901 if ( $autonumber and $wgAllowExternalImages) { # Use img tags only for HTTP urls
902 $s = preg_replace( $e1, "\\1" . $sk->makeImage( "{$unique}:\\3" .
903 "/\\4.\\5", "\\4.\\5" ) . "\\6", $s );
905 $s = preg_replace( $e2, "\\1" . "<a href=\"{$unique}:\\3\"" .
906 $sk->getExternalLinkAttributes( "{$unique}:\\3", wfEscapeHTML(
907 "{$unique}:\\3" ) ) . ">" . wfEscapeHTML( "{$unique}:\\3" ) .
909 $s = str_replace( $unique, $protocol, $s );
911 $a = explode( "[{$protocol}:", " " . $s );
912 $s = array_shift( $a );
913 $s = substr( $s, 1 );
915 $e1 = "/^([{$uc}"."{$sep}]+)](.*)\$/sD";
916 $e2 = "/^([{$uc}"."{$sep}]+)\\s+([^\\]]+)](.*)\$/sD";
918 foreach ( $a as $line ) {
919 if ( preg_match( $e1, $line, $m ) ) {
920 $link = "{$protocol}:{$m[1]}";
922 if ( $autonumber ) { $text = "[" . ++
$this->mAutonumber
. "]"; }
923 else { $text = wfEscapeHTML( $link ); }
924 } else if ( preg_match( $e2, $line, $m ) ) {
925 $link = "{$protocol}:{$m[1]}";
929 $s .= "[{$protocol}:" . $line;
932 if ( $printable == "yes") $paren = " (<i>" . htmlspecialchars ( $link ) . "</i>)";
934 $la = $sk->getExternalLinkAttributes( $link, $text );
935 $s .= "<a href='{$link}'{$la}>{$text}</a>{$paren}{$trail}";
941 /* private */ function replaceInternalLinks( $s )
943 global $wgTitle, $wgUser, $wgLang;
944 global $wgLinkCache, $wgInterwikiMagic, $wgUseCategoryMagic;
945 global $wgNamespacesWithSubpages, $wgLanguageCode;
946 wfProfileIn( $fname = "OutputPage::replaceInternalLinks" );
948 wfProfileIn( "$fname-setup" );
949 $tc = Title
::legalChars() . "#";
950 $sk = $wgUser->getSkin();
952 $a = explode( "[[", " " . $s );
953 $s = array_shift( $a );
954 $s = substr( $s, 1 );
956 $e1 = "/^([{$tc}]+)(?:\\|([^]]+))?]](.*)\$/sD";
958 # Special and Media are pseudo-namespaces; no pages actually exist in them
959 $image = Namespace::getImage();
960 $special = Namespace::getSpecial();
961 $media = Namespace::getMedia();
962 $nottalk = !Namespace::isTalk( $wgTitle->getNamespace() );
963 wfProfileOut( "$fname-setup" );
965 foreach ( $a as $line ) {
966 if ( preg_match( $e1, $line, $m ) ) { # page with normal text or alt
969 } else { # Invalid form; output directly
976 :Foobar -- override special treatment of prefix (images, language links)
977 /Foobar -- convert to CurrentPage/Foobar
978 /Foobar/ -- convert to CurrentPage/Foobar, strip the initial / from text
980 $c = substr($m[1],0,1);
981 $noforce = ($c != ":");
982 if( $c == "/" ) { # subpage
983 if(substr($m[1],-1,1)=="/") { # / at end means we don't want the slash to be shown
984 $m[1]=substr($m[1],1,strlen($m[1])-2);
987 $noslash=substr($m[1],1);
989 if($wgNamespacesWithSubpages[$wgTitle->getNamespace()]) { # subpages allowed here
990 $link = $wgTitle->getPrefixedText(). "/" . trim($noslash);
993 } # this might be changed for ugliness reasons
995 $link = $noslash; # no subpage allowed, use standard link
997 } elseif( $noforce ) { # no subpage
1000 $link = substr( $m[1], 1 );
1005 $nt = Title
::newFromText( $link );
1010 $ns = $nt->getNamespace();
1011 $iw = $nt->getInterWiki();
1013 if( $iw && $wgInterwikiMagic && $nottalk && $wgLang->getLanguageName( $iw ) ) {
1014 array_push( $this->mLanguageLinks
, $nt->getPrefixedText() );
1017 } else if ( "media" == $pre ) {
1018 $nt = Title::newFromText( $suf );
1019 $name = $nt->getDBkey();
1020 if ( "" == $text ) { $text = $nt->GetText(); }
1022 $wgLinkCache->addImageLink( $name );
1023 $s .= $sk->makeMediaLink( $name,
1024 wfImageUrl( $name ), $text );
1026 } else if ( isset($wgUseCategoryMagic) && $wgUseCategoryMagic && $pre == wfMsg ( "category" ) ) {
1027 $l = $sk->makeLink ( $pre.":".ucfirst( $m[2] ), ucfirst ( $m[2] ) ) ;
1028 array_push ( $this->mCategoryLinks , $l ) ;
1031 $l = $wgLang->getLanguageName( $pre );
1032 if ( "" == $l or !$wgInterwikiMagic or Namespace::isTalk( $wgTitle->getNamespace() ) ) {
1033 if ( "" == $text ) {
1036 $s .= $sk->makeLink( $link, $text, "", $trail );
1037 } else if ( $pre != $wgLanguageCode ) {
1038 array_push( $this->mLanguageLinks, "$pre:$suf" );
1044 if( $ns == $image ) {
1045 $s .= $sk->makeImageLinkObj( $nt, $text ) . $trail;
1046 $wgLinkCache->addImageLinkObj( $nt );
1050 # } else if ( 0 == strcmp( "##", substr( $link, 0, 2 ) ) ) {
1051 # $link = substr( $link, 2 );
1052 # $s .= "<a name=\"{$link}\">{$text}</a>{$trail}";
1054 if ( "" == $text ) { $text = $link; }
1056 $s .= $sk->makeLink( $link, $text, "", $trail );
1059 if( $ns == $media ) {
1060 $s .= $sk->makeMediaLinkObj( $nt, $text ) . $trail;
1061 $wgLinkCache->addImageLinkObj( $nt );
1063 } elseif( $ns == $special ) {
1064 $s .= $sk->makeKnownLinkObj( $nt, $text, "", $trail );
1067 $s .= $sk->makeLinkObj( $nt, $text, "", $trail );
1069 wfProfileOut( $fname );
1073 # Some functions here used by doBlockLevels()
1075 /* private */ function closeParagraph()
1078 if ( 0 != strcmp( "p", $this->mLastSection
) &&
1079 0 != strcmp( "", $this->mLastSection
) ) {
1080 $result = "</" . $this->mLastSection
. ">";
1082 $this->mLastSection
= "";
1083 return $result."\n";
1085 # getCommon() returns the length of the longest common substring
1086 # of both arguments, starting at the beginning of both.
1088 /* private */ function getCommon( $st1, $st2 )
1090 $fl = strlen( $st1 );
1091 $shorter = strlen( $st2 );
1092 if ( $fl < $shorter ) { $shorter = $fl; }
1094 for ( $i = 0; $i < $shorter; ++
$i ) {
1095 if ( $st1{$i} != $st2{$i} ) { break; }
1099 # These next three functions open, continue, and close the list
1100 # element appropriate to the prefix character passed into them.
1102 /* private */ function openList( $char )
1104 $result = $this->closeParagraph();
1106 if ( "*" == $char ) { $result .= "<ul><li>"; }
1107 else if ( "#" == $char ) { $result .= "<ol><li>"; }
1108 else if ( ":" == $char ) { $result .= "<dl><dd>"; }
1109 else if ( ";" == $char ) {
1110 $result .= "<dl><dt>";
1111 $this->mDTopen
= true;
1113 else { $result = "<!-- ERR 1 -->"; }
1118 /* private */ function nextItem( $char )
1120 if ( "*" == $char ||
"#" == $char ) { return "</li><li>"; }
1121 else if ( ":" == $char ||
";" == $char ) {
1123 if ( $this->mDTopen
) { $close = "</dt>"; }
1124 if ( ";" == $char ) {
1125 $this->mDTopen
= true;
1126 return $close . "<dt>";
1128 $this->mDTopen
= false;
1129 return $close . "<dd>";
1132 return "<!-- ERR 2 -->";
1135 /* private */function closeList( $char )
1137 if ( "*" == $char ) { $text = "</li></ul>"; }
1138 else if ( "#" == $char ) { $text = "</li></ol>"; }
1139 else if ( ":" == $char ) {
1140 if ( $this->mDTopen
) {
1141 $this->mDTopen
= false;
1142 $text = "</dt></dl>";
1144 $text = "</dd></dl>";
1147 else { return "<!-- ERR 3 -->"; }
1151 /* private */ function doBlockLevels( $text, $linestart )
1153 $fname = "OutputPage::doBlockLevels";
1154 wfProfileIn( $fname );
1155 # Parsing through the text line by line. The main thing
1156 # happening here is handling of block-level elements p, pre,
1157 # and making lists from lines starting with * # : etc.
1159 $a = explode( "\n", $text );
1160 $text = $lastPref = "";
1161 $this->mDTopen
= $inBlockElem = false;
1163 if ( ! $linestart ) { $text .= array_shift( $a ); }
1164 foreach ( $a as $t ) {
1165 if ( "" != $text ) { $text .= "\n"; }
1168 $opl = strlen( $lastPref );
1169 $npl = strspn( $t, "*#:;" );
1170 $pref = substr( $t, 0, $npl );
1171 $pref2 = str_replace( ";", ":", $pref );
1172 $t = substr( $t, $npl );
1174 if ( 0 != $npl && 0 == strcmp( $lastPref, $pref2 ) ) {
1175 $text .= $this->nextItem( substr( $pref, -1 ) );
1177 if ( ";" == substr( $pref, -1 ) ) {
1178 $cpos = strpos( $t, ":" );
1179 if ( ! ( false === $cpos ) ) {
1180 $term = substr( $t, 0, $cpos );
1181 $text .= $term . $this->nextItem( ":" );
1182 $t = substr( $t, $cpos +
1 );
1185 } else if (0 != $npl ||
0 != $opl) {
1186 $cpl = $this->getCommon( $pref, $lastPref );
1188 while ( $cpl < $opl ) {
1189 $text .= $this->closeList( $lastPref{$opl-1} );
1192 if ( $npl <= $cpl && $cpl > 0 ) {
1193 $text .= $this->nextItem( $pref{$cpl-1} );
1195 while ( $npl > $cpl ) {
1196 $char = substr( $pref, $cpl, 1 );
1197 $text .= $this->openList( $char );
1199 if ( ";" == $char ) {
1200 $cpos = strpos( $t, ":" );
1201 if ( ! ( false === $cpos ) ) {
1202 $term = substr( $t, 0, $cpos );
1203 $text .= $term . $this->nextItem( ":" );
1204 $t = substr( $t, $cpos +
1 );
1211 if ( 0 == $npl ) { # No prefix--go to paragraph mode
1213 "/(<table|<blockquote|<h1|<h2|<h3|<h4|<h5|<h6)/i", $t ) ) {
1214 $text .= $this->closeParagraph();
1215 $inBlockElem = true;
1217 if ( ! $inBlockElem ) {
1218 if ( " " == $t{0} ) {
1219 $newSection = "pre";
1220 # $t = wfEscapeHTML( $t );
1222 else { $newSection = "p"; }
1224 if ( 0 == strcmp( "", trim( $oLine ) ) ) {
1225 $text .= $this->closeParagraph();
1226 $text .= "<" . $newSection . ">";
1227 } else if ( 0 != strcmp( $this->mLastSection
,
1229 $text .= $this->closeParagraph();
1230 if ( 0 != strcmp( "p", $newSection ) ) {
1231 $text .= "<" . $newSection . ">";
1234 $this->mLastSection
= $newSection;
1236 if ( $inBlockElem &&
1237 preg_match( "/(<\\/table|<\\/blockquote|<\\/h1|<\\/h2|<\\/h3|<\\/h4|<\\/h5|<\\/h6)/i", $t ) ) {
1238 $inBlockElem = false;
1244 $text .= $this->closeList( $pref2{$npl-1} );
1247 if ( "" != $this->mLastSection
) {
1248 if ( "p" != $this->mLastSection
) {
1249 $text .= "</" . $this->mLastSection
. ">";
1251 $this->mLastSection
= "";
1253 wfProfileOut( $fname );
1257 /* private */ function replaceVariables( $text )
1260 $fname = "OutputPage::replaceVariables";
1261 wfProfileIn( $fname );
1266 # See Language.php for the definition of each magic word
1267 # As with sigs, this uses the server's local time -- ensure
1268 # this is appropriate for your audience!
1270 $magic[MAG_CURRENTMONTH
] = date( "m" );
1271 $magic[MAG_CURRENTMONTHNAME
] = $wgLang->getMonthName( date("n") );
1272 $magic[MAG_CURRENTMONTHNAMEGEN
] = $wgLang->getMonthNameGen( date("n") );
1273 $magic[MAG_CURRENTDAY
] = date("j");
1274 $magic[MAG_CURRENTDAYNAME
] = $wgLang->getWeekdayName( date("w")+
1 );
1275 $magic[MAG_CURRENTYEAR
] = date( "Y" );
1276 $magic[MAG_CURRENTTIME
] = $wgLang->time( wfTimestampNow(), false );
1278 $this->mContainsOldMagic +
= MagicWord
::replaceMultiple($magic, $text, $text);
1280 $mw =& MagicWord
::get( MAG_NUMBEROFARTICLES
);
1281 if ( $mw->match( $text ) ) {
1282 $v = wfNumberOfArticles();
1283 $text = $mw->replace( $v, $text );
1284 if( $mw->getWasModified() ) { $this->mContainsOldMagic++
; }
1287 # "Variables" with an additional parameter e.g. {{MSG:wikipedia}}
1288 # The callbacks are at the bottom of this file
1289 $mw =& MagicWord
::get( MAG_MSG
);
1290 $text = $mw->substituteCallback( $text, "wfReplaceMsgVar" );
1291 if( $mw->getWasModified() ) { $this->mContainsNewMagic++
; }
1293 $mw =& MagicWord
::get( MAG_MSGNW
);
1294 $text = $mw->substituteCallback( $text, "wfReplaceMsgnwVar" );
1295 if( $mw->getWasModified() ) { $this->mContainsNewMagic++
; }
1297 wfProfileOut( $fname );
1301 # Cleans up HTML, removes dangerous tags and attributes
1302 /* private */ function removeHTMLtags( $text )
1304 $fname = "OutputPage::removeHTMLtags";
1305 wfProfileIn( $fname );
1306 $htmlpairs = array( # Tags that must be closed
1307 "b", "i", "u", "font", "big", "small", "sub", "sup", "h1",
1308 "h2", "h3", "h4", "h5", "h6", "cite", "code", "em", "s",
1309 "strike", "strong", "tt", "var", "div", "center",
1310 "blockquote", "ol", "ul", "dl", "table", "caption", "pre",
1311 "ruby", "rt" , "rb" , "rp"
1313 $htmlsingle = array(
1314 "br", "p", "hr", "li", "dt", "dd"
1316 $htmlnest = array( # Tags that can be nested--??
1317 "table", "tr", "td", "th", "div", "blockquote", "ol", "ul",
1318 "dl", "font", "big", "small", "sub", "sup"
1320 $tabletags = array( # Can only appear inside table
1324 $htmlsingle = array_merge( $tabletags, $htmlsingle );
1325 $htmlelements = array_merge( $htmlsingle, $htmlpairs );
1327 $htmlattrs = $this->getHTMLattrs () ;
1329 # Remove HTML comments
1330 $text = preg_replace( "/<!--.*-->/sU", "", $text );
1332 $bits = explode( "<", $text );
1333 $text = array_shift( $bits );
1334 $tagstack = array(); $tablestack = array();
1336 foreach ( $bits as $x ) {
1337 $prev = error_reporting( E_ALL
& ~
( E_NOTICE | E_WARNING
) );
1338 preg_match( "/^(\\/?)(\\w+)([^>]*)(\\/{0,1}>)([^<]*)$/",
1340 list( $qbar, $slash, $t, $params, $brace, $rest ) = $regs;
1341 error_reporting( $prev );
1344 if ( in_array( $t = strtolower( $t ), $htmlelements ) ) {
1348 if ( ! in_array( $t, $htmlsingle ) &&
1349 ( $ot = array_pop( $tagstack ) ) != $t ) {
1350 array_push( $tagstack, $ot );
1353 if ( $t == "table" ) {
1354 $tagstack = array_pop( $tablestack );
1359 # Keep track for later
1360 if ( in_array( $t, $tabletags ) &&
1361 ! in_array( "table", $tagstack ) ) {
1363 } else if ( in_array( $t, $tagstack ) &&
1364 ! in_array ( $t , $htmlnest ) ) {
1366 } else if ( ! in_array( $t, $htmlsingle ) ) {
1367 if ( $t == "table" ) {
1368 array_push( $tablestack, $tagstack );
1369 $tagstack = array();
1371 array_push( $tagstack, $t );
1373 # Strip non-approved attributes from the tag
1374 $newparams = $this->fixTagAttributes($params);
1378 $rest = str_replace( ">", ">", $rest );
1379 $text .= "<$slash$t $newparams$brace$rest";
1383 $text .= "<" . str_replace( ">", ">", $x);
1385 # Close off any remaining tags
1386 while ( $t = array_pop( $tagstack ) ) {
1388 if ( $t == "table" ) { $tagstack = array_pop( $tablestack ); }
1390 wfProfileOut( $fname );
1396 * This function accomplishes several tasks:
1397 * 1) Auto-number headings if that option is enabled
1398 * 2) Add an [edit] link to sections for logged in users who have enabled the option
1399 * 3) Add a Table of contents on the top for users who have enabled the option
1400 * 4) Auto-anchor headings
1402 * It loops through all headlines, collects the necessary data, then splits up the
1403 * string and re-inserts the newly formatted headlines.
1406 /* private */ function formatHeadings( $text )
1408 global $wgUser,$wgArticle,$wgTitle,$wpPreview;
1409 $nh=$wgUser->getOption( "numberheadings" );
1410 $st=$wgUser->getOption( "showtoc" );
1411 if(!$wgTitle->userCanEdit()) {
1415 $es=$wgUser->getID() && $wgUser->getOption( "editsection" );
1416 $esr=$wgUser->getID() && $wgUser->getOption( "editsectiononrightclick" );
1419 # Inhibit editsection links if requested in the page
1420 $esw =& MagicWord
::get( MAG_NOEDITSECTION
);
1421 if ($esw->matchAndRemove( $text )) {
1424 # if the string __NOTOC__ (not case-sensitive) occurs in the HTML,
1426 $mw =& MagicWord
::get( MAG_NOTOC
);
1427 if ($mw->matchAndRemove( $text ))
1432 # never add the TOC to the Main Page. This is an entry page that should not
1433 # be more than 1-2 screens large anyway
1434 if($wgTitle->getPrefixedText()==wfMsg("mainpage")) {$st=0;}
1436 # We need this to perform operations on the HTML
1437 $sk=$wgUser->getSkin();
1439 # Get all headlines for numbering them and adding funky stuff like [edit]
1441 preg_match_all("/<H([1-6])(.*?>)(.*?)<\/H[1-6]>/i",$text,$matches);
1446 # Ugh .. the TOC should have neat indentation levels which can be
1447 # passed to the skin functions. These are determined here
1448 foreach($matches[3] as $headline) {
1449 if($level) { $prevlevel=$level;}
1450 $level=$matches[1][$c];
1451 if(($nh||
$st) && $prevlevel && $level>$prevlevel) {
1453 $h[$level]=0; // reset when we enter a new level
1454 $toc.=$sk->tocIndent($level-$prevlevel);
1455 $toclevel+
=$level-$prevlevel;
1458 if(($nh||
$st) && $level<$prevlevel) {
1459 $h[$level+
1]=0; // reset when we step back a level
1460 $toc.=$sk->tocUnindent($prevlevel-$level);
1461 $toclevel-=$prevlevel-$level;
1464 $h[$level]++
; // count number of headlines for each level
1467 for($i=1;$i<=$level;$i++
) {
1469 if($dot) {$numbering.=".";}
1476 // The canonized header is a version of the header text safe to use for links
1478 $canonized_headline=preg_replace("/<.*?>/","",$headline); // strip out HTML
1479 $tocline = trim( $canonized_headline );
1480 $canonized_headline=str_replace('"',"",$canonized_headline);
1481 $canonized_headline=str_replace(" ","_",trim($canonized_headline));
1482 $refer[$c]=$canonized_headline;
1483 $refers[$canonized_headline]++
; // count how many in assoc. array so we can track dupes in anchors
1484 $refcount[$c]=$refers[$canonized_headline];
1486 // Prepend the number to the heading text
1489 $tocline=$numbering ." ". $tocline;
1491 // Don't number the heading if it is the only one (looks silly)
1492 if($nh && count($matches[3]) > 1) {
1493 $headline=$numbering . " " . $headline; // the two are different if the line contains a link
1497 // Create the anchor for linking from the TOC to the section
1499 $anchor=$canonized_headline;
1500 if($refcount[$c]>1) {$anchor.="_".$refcount[$c];}
1502 $toc.=$sk->tocLine($anchor,$tocline,$toclevel);
1504 if($es && !isset($wpPreview)) {
1505 $head[$c].=$sk->editSectionLink($c+
1);
1508 // Put it all together
1510 $head[$c].="<h".$level.$matches[2][$c]
1511 ."<a name=\"".$anchor."\">"
1516 // Add the edit section link
1518 if($esr && !isset($wpPreview)) {
1519 $head[$c]=$sk->editSectionScript($c+
1,$head[$c]);
1529 $toc.=$sk->tocUnindent($toclevel);
1530 $toc=$sk->tocTable($toc);
1533 // split up and insert constructed headlines
1535 $blocks=preg_split("/<H[1-6].*?>.*?<\/H[1-6]>/i",$text);
1538 foreach($blocks as $block) {
1539 if(($es) && !isset($wpPreview) && $c>0 && $i==0) {
1540 # This is the [edit] link that appears for the top block of text when
1541 # section editing is enabled
1542 $full.=$sk->editSectionLink(0);
1545 if($st && $toclines>3 && !$i) {
1546 # Let's add a top anchor just in case we want to link to the top of the page
1547 $full="<a name=\"top\"></a>".$full.$toc;
1557 /* private */ function magicISBN( $text )
1561 $a = split( "ISBN ", " $text" );
1562 if ( count ( $a ) < 2 ) return $text;
1563 $text = substr( array_shift( $a ), 1);
1564 $valid = "0123456789-ABCDEFGHIJKLMNOPQRSTUVWXYZ";
1566 foreach ( $a as $x ) {
1567 $isbn = $blank = "" ;
1568 while ( " " == $x{0} ) {
1570 $x = substr( $x, 1 );
1572 while ( strstr( $valid, $x{0} ) != false ) {
1574 $x = substr( $x, 1 );
1576 $num = str_replace( "-", "", $isbn );
1577 $num = str_replace( " ", "", $num );
1580 $text .= "ISBN $blank$x";
1582 $text .= "<a href=\"" . wfLocalUrlE( $wgLang->specialPage(
1583 "Booksources"), "isbn={$num}" ) . "\" class=\"internal\">ISBN $isbn</a>";
1590 /* private */ function magicRFC( $text )
1595 /* private */ function headElement()
1597 global $wgDocType, $wgDTD, $wgUser, $wgLanguageCode, $wgOutputEncoding, $wgLang;
1599 $ret = "<!DOCTYPE HTML PUBLIC \"$wgDocType\"\n \"$wgDTD\">\n";
1601 if ( "" == $this->mHTMLtitle
) {
1602 $this->mHTMLtitle
= $this->mPagetitle
;
1604 $rtl = $wgLang->isRTL() ?
" dir='RTL'" : "";
1605 $ret .= "<html lang=\"$wgLanguageCode\"$rtl><head><title>{$this->mHTMLtitle}</title>\n";
1606 array_push( $this->mMetatags
, array( "http:Content-type", "text/html; charset={$wgOutputEncoding}" ) );
1607 foreach ( $this->mMetatags
as $tag ) {
1608 if ( 0 == strcasecmp( "http:", substr( $tag[0], 0, 5 ) ) ) {
1610 $tag[0] = substr( $tag[0], 5 );
1614 $ret .= "<meta $a=\"{$tag[0]}\" content=\"{$tag[1]}\">\n";
1616 $p = $this->mRobotpolicy
;
1617 if ( "" == $p ) { $p = "index,follow"; }
1618 $ret .= "<meta name=\"robots\" content=\"$p\">\n";
1620 if ( count( $this->mKeywords
) > 0 ) {
1621 $ret .= "<meta name=\"keywords\" content=\"" .
1622 implode( ",", $this->mKeywords
) . "\">\n";
1624 foreach ( $this->mLinktags
as $tag ) {
1626 if ( "" != $tag[0] ) { $ret .= "rel=\"{$tag[0]}\" "; }
1627 if ( "" != $tag[1] ) { $ret .= "rev=\"{$tag[1]}\" "; }
1628 $ret .= "href=\"{$tag[2]}\">\n";
1630 $sk = $wgUser->getSkin();
1631 $ret .= $sk->getHeadScripts();
1632 $ret .= $sk->getUserStyles();
1634 $ret .= "</head>\n";
1638 /* private */ function fillFromParserCache(){
1639 global $wgUser, $wgArticle;
1640 $hash = $wgUser->getPageRenderingHash();
1641 $pageid = intval( $wgArticle->getID() );
1642 $res = wfQuery("SELECT pc_data FROM parsercache WHERE pc_pageid = {$pageid} ".
1643 " AND pc_prefhash = '{$hash}' AND pc_expire > NOW()", DB_WRITE
);
1644 $row = wfFetchObject ( $res );
1646 $data = unserialize( gzuncompress($row->pc_data
) );
1647 $this->addHTML( $data['html'] );
1648 $this->mLanguageLinks
= $data['mLanguageLinks'];
1649 $this->mCategoryLinks
= $data['mCategoryLinks'];
1650 wfProfileOut( $fname );
1657 /* private */ function saveParserCache( $text ){
1658 global $wgUser, $wgArticle;
1659 $hash = $wgUser->getPageRenderingHash();
1660 $pageid = intval( $wgArticle->getID() );
1661 $title = wfStrencode( $wgArticle->mTitle
->getPrefixedDBKey() );
1663 $data['html'] = $text;
1664 $data['mLanguageLinks'] = $this->mLanguageLinks
;
1665 $data['mCategoryLinks'] = $this->mCategoryLinks
;
1666 $ser = addslashes( gzcompress( serialize( $data ) ) );
1667 if( $this->mContainsOldMagic
){
1669 } else if( $this->mContainsNewMagic
){
1675 wfQuery("REPLACE INTO parsercache (pc_prefhash,pc_pageid,pc_title,pc_data, pc_expire) ".
1676 "VALUES('{$hash}', {$pageid}, '{$title}', '{$ser}', ".
1677 "DATE_ADD(NOW(), INTERVAL {$expire}))", DB_WRITE
);
1679 if( rand() %
50 == 0 ){ // more efficient to just do it sometimes
1680 $this->purgeParserCache();
1684 /* static private */ function purgeParserCache(){
1685 wfQuery("DELETE FROM parsercache WHERE pc_expire < NOW() LIMIT 250", DB_WRITE
);
1688 /* static */ function parsercacheClearLinksTo( $pid ){
1689 $pid = intval( $pid );
1690 wfQuery("DELETE parsercache FROM parsercache,links ".
1691 "WHERE pc_title=links.l_from AND l_to={$pid}", DB_WRITE
);
1692 wfQuery("DELETE FROM parsercache WHERE pc_pageid='{$pid}'", DB_WRITE
);
1695 # $title is a prefixed db title, for example like Title->getPrefixedDBkey() returns.
1696 /* static */ function parsercacheClearBrokenLinksTo( $title ){
1697 $title = wfStrencode( $title );
1698 wfQuery("DELETE parsercache FROM parsercache,brokenlinks ".
1699 "WHERE pc_pageid=bl_from AND bl_to='{$title}'", DB_WRITE
);
1703 /* static */ function parsercacheClearPage( $pid ){
1704 $pid = intval( $pid );
1705 wfQuery("DELETE FROM parsercache WHERE pc_pageid='{$pid}'", DB_WRITE
);
1709 # Regex callbacks, used in OutputPage::replaceVariables
1711 # Just get rid of the dangerous stuff
1712 # Necessary because replaceVariables is called after removeHTMLtags,
1713 # and message text can come from any user
1714 function wfReplaceMsgVar( $matches ) {
1716 $text = $wgOut->removeHTMLtags( wfMsg( $matches[1] ) );
1720 # Effective <nowiki></nowiki>
1721 # Not real <nowiki> because this is called after nowiki sections are processed
1722 function wfReplaceMsgnwVar( $matches ) {
1723 $text = wfEscapeWikiText( wfMsg( $matches[1] ) );