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;
18 $this->mHeaders
= $this->mCookies
= $this->mMetatags
=
19 $this->mKeywords
= $this->mLinktags
= array();
20 $this->mHTMLtitle
= $this->mPagetitle
= $this->mBodytext
=
21 $this->mLastSection
= $this->mRedirect
= $this->mLastModified
=
22 $this->mSubtitle
= $this->mDebugtext
= $this->mRobotpolicy
= "";
23 $this->mIsarticle
= $this->mPrintable
= true;
24 $this->mSupressQuickbar
= $this->mDTopen
= $this->mPrintable
= false;
25 $this->mLanguageLinks
= array();
26 $this->mCategoryLinks
= array() ;
27 $this->mAutonumber
= 0;
30 function addHeader( $name, $val ) { array_push( $this->mHeaders
, "$name: $val" ) ; }
31 function addCookie( $name, $val ) { array_push( $this->mCookies
, array( $name, $val ) ); }
32 function redirect( $url ) { $this->mRedirect
= $url; }
34 # To add an http-equiv meta tag, precede the name with "http:"
35 function addMeta( $name, $val ) { array_push( $this->mMetatags
, array( $name, $val ) ); }
36 function addKeyword( $text ) { array_push( $this->mKeywords
, $text ); }
37 function addLink( $rel, $rev, $target ) { array_push( $this->mLinktags
, array( $rel, $rev, $target ) ); }
39 function checkLastModified ( $timestamp )
41 global $wgLang, $wgCachePages, $wgUser;
42 if( !$wgCachePages ) {
43 wfDebug( "CACHE DISABLED\n", false );
46 if( preg_match( '/MSIE ([1-4]|5\.0)/', $_SERVER["HTTP_USER_AGENT"] ) ) {
47 # IE 5.0 has probs with our caching
48 wfDebug( "-- bad client, not caching\n", false );
51 if( $wgUser->getOption( "nocache" ) ) {
52 wfDebug( "USER DISABLED CACHE\n", false );
56 $lastmod = gmdate( "D, j M Y H:i:s", wfTimestamp2Unix(
57 max( $timestamp, $wgUser->mTouched
) ) ) . " GMT";
59 if( $_SERVER["HTTP_IF_MODIFIED_SINCE"] != "" ) {
60 # IE sends sizes after the date for compressed pages:
61 # Wed, 20 Aug 2003 06:51:19 GMT; length=5202
62 # this breaks strtotime().
63 $modsince = preg_replace( '/;.*$/', '', $_SERVER["HTTP_IF_MODIFIED_SINCE"] );
64 $ismodsince = wfUnix2Timestamp( strtotime( $modsince ) );
65 wfDebug( "-- client send If-Modified-Since: " . $modsince . "\n", false );
66 wfDebug( "-- we might send Last-Modified : $lastmod\n", false );
68 if( ($ismodsince >= $timestamp ) and $wgUser->validateCache( $ismodsince ) ) {
69 # Make sure you're in a place you can leave when you call us!
70 header( "HTTP/1.0 304 Not Modified" );
71 header( "Expires: Mon, 15 Jan 2001 00:00:00 GMT" ); # Cachers always validate the page!
72 header( "Cache-Control: private, must-revalidate, max-age=0" );
73 header( "Last-Modified: {$lastmod}" );
74 wfDebug( "CACHED client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
77 wfDebug( "READY client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
78 $this->mLastModified
= $lastmod;
81 wfDebug( "We're confused.\n", false );
82 $this->mLastModified
= $lastmod;
86 function setRobotpolicy( $str ) { $this->mRobotpolicy
= $str; }
87 function setHTMLtitle( $name ) { $this->mHTMLtitle
= $name; }
88 function setPageTitle( $name ) { $this->mPagetitle
= $name; }
89 function getPageTitle() { return $this->mPagetitle
; }
90 function setSubtitle( $str ) { $this->mSubtitle
= $str; }
91 function getSubtitle() { return $this->mSubtitle
; }
92 function setArticleFlag( $v ) { $this->mIsarticle
= $v; }
93 function isArticle() { return $this->mIsarticle
; }
94 function setPrintable() { $this->mPrintable
= true; }
95 function isPrintable() { return $this->mPrintable
; }
97 function getLanguageLinks() {
98 global $wgUseNewInterlanguage, $wgTitle, $wgLanguageCode;
99 global $wgDBconnection, $wgDBname, $wgDBintlname;
101 if ( ! $wgUseNewInterlanguage )
102 return $this->mLanguageLinks
;
104 mysql_select_db( $wgDBintlname, $wgDBconnection ) or die(
105 htmlspecialchars(mysql_error()) );
108 $sql = "SELECT * FROM ilinks WHERE lang_from=\"" .
109 "{$wgLanguageCode}\" AND title_from=\"" . $wgTitle->getDBkey() . "\"";
110 $res = mysql_query( $sql, $wgDBconnection );
112 while ( $q = mysql_fetch_object ( $res ) ) {
113 $list[] = $q->lang_to
. ":" . $q->title_to
;
115 mysql_free_result( $res );
116 mysql_select_db( $wgDBname, $wgDBconnection ) or die(
117 htmlspecialchars(mysql_error()) );
122 function supressQuickbar() { $this->mSupressQuickbar
= true; }
123 function isQuickbarSupressed() { return $this->mSupressQuickbar
; }
125 function addHTML( $text ) { $this->mBodytext
.= $text; }
126 function addHeadtext( $text ) { $this->mHeadtext
.= $text; }
127 function debug( $text ) { $this->mDebugtext
.= $text; }
129 # First pass--just handle <nowiki> sections, pass the rest off
130 # to doWikiPass2() which does all the real work.
133 function addWikiText( $text, $linestart = true )
136 wfProfileIn( "OutputPage::addWikiText" );
137 $unique = "3iyZiyA7iMwg5rhxP0Dcc9oTnj8qD1jm1Sfv4";
138 $unique2 = "4LIQ9nXtiYFPCSfitVwDw7EYwQlL4GeeQ7qSO";
139 $unique3 = "fPaA8gDfdLBqzj68Yjg9Hil3qEF8JGO0uszIp";
150 while ( "" != $text ) {
151 $p = preg_split( "/<\\s*nowiki\\s*>/i", $text, 2 );
153 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $text = ""; }
155 $q = preg_split( "/<\\/\\s*nowiki\\s*>/i", $p[1], 2 );
157 $nwlist[$nwsecs] = wfEscapeHTMLTagsOnly($q[0]);
158 $stripped .= $unique;
164 while ( "" != $stripped ) {
165 $p = preg_split( "/<\\s*math\\s*>/i", $stripped, 2 );
167 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $stripped = ""; }
169 $q = preg_split( "/<\\/\\s*math\\s*>/i", $p[1], 2 );
171 $mathlist[$mathsecs] = renderMath($q[0]);
172 $stripped2 .= $unique2;
177 $stripped2 = $stripped;
180 while ( "" != $stripped2 ) {
181 $p = preg_split( "/<\\s*pre\\s*>/i", $stripped2, 2 );
183 if ( ( count( $p ) < 2 ) ||
( "" == $p[1] ) ) { $stripped2 = ""; }
185 $q = preg_split( "/<\\/\\s*pre\\s*>/i", $p[1], 2 );
187 $prelist[$presecs] = "<pre>". wfEscapeHTMLTagsOnly($q[0]). "</pre>";
188 $stripped3 .= $unique3;
193 $text = $this->doWikiPass2( $stripped3, $linestart );
195 $specialChars = array("\\", "$");
196 $escapedChars = array("\\\\", "\\$");
197 for ( $i = 1; $i <= $presecs; ++
$i ) {
198 $text = preg_replace( "/{$unique3}/", str_replace( $specialChars,
199 $escapedChars, $prelist[$i] ), $text, 1 );
202 for ( $i = 1; $i <= $mathsecs; ++
$i ) {
203 $text = preg_replace( "/{$unique2}/", str_replace( $specialChars,
204 $escapedChars, $mathlist[$i] ), $text, 1 );
207 for ( $i = 1; $i <= $nwsecs; ++
$i ) {
208 $text = preg_replace( "/{$unique}/", str_replace( $specialChars,
209 $escapedChars, $nwlist[$i] ), $text, 1 );
211 $this->addHTML( $text );
215 function sendCacheControl() {
217 if( $this->mLastModified
!= "" ) {
218 wfDebug( "** private caching; {$this->mLastModified} **\n", false );
219 header( "Cache-Control: private, must-revalidate, max-age=0" );
220 header( "Last-modified: {$this->mLastModified}" );
222 # We should put in Accept-Encoding, but IE chokes on anything but
223 # User-Agent in a Vary: header (at least through 6.0)
224 header( "Vary: User-Agent" );
227 wfDebug( "** no caching **\n", false );
228 header( "Cache-Control: no-cache" ); # Experimental - see below
229 header( "Pragma: no-cache" );
230 header( "Last-modified: " . gmdate( "D, j M Y H:i:s" ) . " GMT" );
232 header( "Expires: Mon, 15 Jan 2001 00:00:00 GMT" ); # Cachers always validate the page!
235 # Finally, all the text has been munged and accumulated into
236 # the object, let's actually output it:
240 global $wgUser, $wgLang, $wgDebugComments, $wgCookieExpiration;
241 global $wgInputEncoding, $wgOutputEncoding, $wgLanguageCode;
242 $sk = $wgUser->getSkin();
244 $this->sendCacheControl();
246 header( "Content-type: text/html; charset={$wgOutputEncoding}" );
247 header( "Content-language: {$wgLanguageCode}" );
249 if ( "" != $this->mRedirect
) {
250 header( "Location: {$this->mRedirect}" );
254 $exp = time() +
$wgCookieExpiration;
255 foreach( $this->mCookies
as $name => $val ) {
256 setcookie( $name, $val, $exp, "/" );
259 $sk->outputPage( $this );
265 global $wgInputEncoding, $wgOutputEncoding, $wgLang;
266 if ( 0 == strcmp( $wgInputEncoding, $wgOutputEncoding ) ) {
269 $outs = $wgLang->iconv( $wgInputEncoding, $wgOutputEncoding, $ins );
270 if ( false === $outs ) { $outs = $ins; }
275 function setEncodings()
277 global $HTTP_SERVER_VARS, $wgInputEncoding, $wgOutputEncoding;
278 global $wgUser, $wgLang;
280 $wgInputEncoding = strtolower( $wgInputEncoding );
281 $s = $HTTP_SERVER_VARS['HTTP_ACCEPT_CHARSET'];
283 if( $wgUser->getOption( 'altencoding' ) ) {
284 $wgLang->setAltEncoding();
289 $wgOutputEncoding = strtolower( $wgOutputEncoding );
292 $a = explode( ",", $s );
296 foreach ( $a as $s ) {
297 if ( preg_match( "/(.*);q=(.*)/", $s, $m ) ) {
309 #if ( "*" == $bestset ) { $bestset = "iso-8859-1"; }
310 if ( "*" == $bestset ) { $bestset = $wgOutputEncoding; }
311 $wgOutputEncoding = strtolower( $bestset );
315 $wgOutputEncoding = $wgInputEncoding;
318 function reportTime()
320 global $wgRequestTime, $wgDebugLogFile, $HTTP_SERVER_VARS;
321 global $wgProfiling, $wgProfileStack, $wgUser;
323 list( $usec, $sec ) = explode( " ", microtime() );
324 $now = (float)$sec +
(float)$usec;
326 list( $usec, $sec ) = explode( " ", $wgRequestTime );
327 $start = (float)$sec +
(float)$usec;
328 $elapsed = $now - $start;
330 if ( "" != $wgDebugLogFile ) {
332 if( $wgProfiling and count( $wgProfileStack ) ) {
334 foreach( $wgProfileStack as $ile ) {
335 # "foo::bar 99 0.12345 1 0.23456 2"
336 if( preg_match( '/^(\S+)\s+([0-9]+)\s+([0-9\.]+)\s+([0-9\.]+)\s+([0-9\.]+)\s+([0-9\.]+)/', $ile, $m ) ) {
337 $thisstart = (float)$m[3] +
(float)$m[4] - $start;
338 $thisend = (float)$m[5] +
(float)$m[6] - $start;
339 $thiselapsed = $thisend - $thisstart;
340 $thispercent = $thiselapsed / $elapsed * 100.0;
342 $prof .= sprintf( "\tat %04.3f in %04.3f (%2.1f%%) - %s %s\n",
343 $thisstart, $thiselapsed, $thispercent,
344 str_repeat( "*", $m[2] ), $m[1] );
345 $lasttime = $thistime;
346 #$prof .= "\t(^ $ile)\n";
348 $prof .= "\t?broken? $ile\n";
353 if( $forward = $HTTP_SERVER_VARS['HTTP_X_FORWARDED_FOR'] )
354 $forward = " forwarded for $forward";
355 if( $client = $HTTP_SERVER_VARS['HTTP_CLIENT_IP'] )
356 $forward .= " client IP $client";
357 if( $from = $HTTP_SERVER_VARS['HTTP_FROM'] )
358 $forward .= " from $from";
360 $forward = "\t(proxied via {$HTTP_SERVER_VARS['REMOTE_ADDR']}{$forward})";
361 if($wgUser->getId() == 0)
363 $log = sprintf( "%s\t%04.3f\t%s\n",
364 gmdate( "YmdHis" ), $elapsed,
365 urldecode( $HTTP_SERVER_VARS['REQUEST_URI'] . $forward ) );
366 error_log( $log . $prof, 3, $wgDebugLogFile );
368 $com = sprintf( "<!-- Time since request: %01.2f secs. -->",
373 # Note: these arguments are keys into wfMsg(), not text!
375 function errorpage( $title, $msg )
379 $this->mDebugtext
.= "Original title: " .
380 $wgTitle->getPrefixedText() . "\n";
381 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
382 $this->setPageTitle( wfMsg( $title ) );
383 $this->setRobotpolicy( "noindex,nofollow" );
384 $this->setArticleFlag( false );
386 $this->mBodytext
= "";
387 $this->addHTML( "<p>" . wfMsg( $msg ) . "\n" );
388 $this->returnToMain( false );
394 function sysopRequired()
398 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
399 $this->setPageTitle( wfMsg( "sysoptitle" ) );
400 $this->setRobotpolicy( "noindex,nofollow" );
401 $this->setArticleFlag( false );
402 $this->mBodytext
= "";
404 $sk = $wgUser->getSkin();
405 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
406 $text = str_replace( "$1", $ap, wfMsg( "sysoptext" ) );
407 $this->addHTML( $text );
408 $this->returnToMain();
411 function developerRequired()
415 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
416 $this->setPageTitle( wfMsg( "developertitle" ) );
417 $this->setRobotpolicy( "noindex,nofollow" );
418 $this->setArticleFlag( false );
419 $this->mBodytext
= "";
421 $sk = $wgUser->getSkin();
422 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
423 $text = str_replace( "$1", $ap, wfMsg( "developertext" ) );
424 $this->addHTML( $text );
425 $this->returnToMain();
428 function databaseError( $fname )
430 global $wgUser, $wgCommandLineMode;
432 $this->setPageTitle( wfMsg( "databaseerror" ) );
433 $this->setRobotpolicy( "noindex,nofollow" );
434 $this->setArticleFlag( false );
436 if ( $wgCommandLineMode ) {
437 $msg = wfMsg( "dberrortextcl" );
439 $msg = wfMsg( "dberrortextcl" );
441 $msg = str_replace( "$1", htmlspecialchars( wfLastDBquery() ), $msg );
442 $msg = str_replace( "$2", htmlspecialchars( $fname ), $msg );
443 $msg = str_replace( "$3", wfLastErrno(), $msg );
444 $msg = str_replace( "$4", htmlspecialchars( wfLastError() ), $msg );
446 if ( $wgCommandLineMode ) {
450 $sk = $wgUser->getSkin();
451 $shlink = $sk->makeKnownLink( wfMsg( "searchhelppage" ),
452 wfMsg( "searchingwikipedia" ) );
453 $msg = str_replace( "$5", $shlink, $msg );
455 $this->mBodytext
= $msg;
460 function readOnlyPage( $source = "" )
462 global $wgUser, $wgReadOnlyFile;
464 $this->setPageTitle( wfMsg( "readonly" ) );
465 $this->setRobotpolicy( "noindex,nofollow" );
466 $this->setArticleFlag( false );
468 $reason = implode( "", file( $wgReadOnlyFile ) );
469 $text = str_replace( "$1", $reason, wfMsg( "readonlytext" ) );
472 $rows = $wgUser->getOption( "rows" );
473 $cols = $wgUser->getOption( "cols" );
474 $text .= "</p>\n<textarea cols='$cols' rows='$rows' readonly>" .
475 htmlspecialchars( $source ) . "\n</textarea>";
478 $this->addHTML( $text );
479 $this->returnToMain( false );
482 function fatalError( $message )
484 $this->setPageTitle( wfMsg( "internalerror" ) );
485 $this->setRobotpolicy( "noindex,nofollow" );
486 $this->setArticleFlag( false );
488 $this->mBodytext
= $message;
493 function unexpectedValueError( $name, $val )
495 $msg = str_replace( "$1", $name, wfMsg( "unexpected" ) );
496 $msg = str_replace( "$2", $val, $msg );
497 $this->fatalError( $msg );
500 function fileCopyError( $old, $new )
502 $msg = str_replace( "$1", $old, wfMsg( "filecopyerror" ) );
503 $msg = str_replace( "$2", $new, $msg );
504 $this->fatalError( $msg );
507 function fileRenameError( $old, $new )
509 $msg = str_replace( "$1", $old, wfMsg( "filerenameerror" ) );
510 $msg = str_replace( "$2", $new, $msg );
511 $this->fatalError( $msg );
514 function fileDeleteError( $name )
516 $msg = str_replace( "$1", $name, wfMsg( "filedeleteerror" ) );
517 $this->fatalError( $msg );
520 function fileNotFoundError( $name )
522 $msg = str_replace( "$1", $name, wfMsg( "filenotfound" ) );
523 $this->fatalError( $msg );
526 function returnToMain( $auto = true )
528 global $wgUser, $wgOut, $returnto;
530 $sk = $wgUser->getSkin();
531 if ( "" == $returnto ) {
532 $returnto = wfMsg( "mainpage" );
534 $link = $sk->makeKnownLink( $returnto, "" );
536 $r = str_replace( "$1", $link, wfMsg( "returnto" ) );
538 $wgOut->addMeta( "http:Refresh", "10;url=" .
539 wfLocalUrlE( wfUrlencode( $returnto ) ) );
541 $wgOut->addHTML( "\n<p>$r\n" );
545 function categoryMagic ()
547 global $wgTitle , $wgUseCategoryMagic ;
548 if ( !isset ( $wgUseCategoryMagic ) ||
!$wgUseCategoryMagic ) return ;
549 $id = $wgTitle->getArticleID() ;
550 $cat = ucfirst ( wfMsg ( "category" ) ) ;
551 $ti = $wgTitle->getText() ;
552 $ti = explode ( ":" , $ti , 2 ) ;
553 if ( $cat != $ti[0] ) return "" ;
554 $r = "<br break=all>\n" ;
556 $articles = array() ;
557 $parents = array () ;
558 $children = array() ;
562 $sk = $wgUser->getSkin() ;
563 $sql = "SELECT l_from FROM links WHERE l_to={$id}" ;
564 $res = wfQuery ( $sql, DB_READ
) ;
565 while ( $x = wfFetchObject ( $res ) )
568 # $t->newFromDBkey ( $x->l_from ) ;
569 # $t = $t->getText() ;
571 $y = explode ( ":" , $t , 2 ) ;
572 if ( count ( $y ) == 2 && $y[0] == $cat )
574 array_push ( $children , $sk->makeLink ( $t , $y[1] ) ) ;
576 else array_push ( $articles , $sk->makeLink ( $t ) ) ;
578 wfFreeResult ( $res ) ;
581 if ( count ( $children ) > 0 )
583 asort ( $children ) ;
584 $r .= "<h2>".wfMsg("subcategories")."</h2>\n" ;
585 $r .= implode ( ", " , $children ) ;
589 if ( count ( $articles ) > 0 )
591 asort ( $articles ) ;
592 $h = str_replace ( "$1" , $ti[1] , wfMsg("category_header") ) ;
593 $r .= "<h2>{$h}</h2>\n" ;
594 $r .= implode ( ", " , $articles ) ;
601 function getHTMLattrs ()
603 $htmlattrs = array( # Allowed attributes--no scripting, etc.
604 "title", "align", "lang", "dir", "width", "height",
605 "bgcolor", "clear", /* BR */ "noshade", /* HR */
606 "cite", /* BLOCKQUOTE, Q */ "size", "face", "color",
607 /* FONT */ "type", "start", "value", "compact",
608 /* For various lists, mostly deprecated but safe */
609 "summary", "width", "border", "frame", "rules",
610 "cellspacing", "cellpadding", "valign", "char",
611 "charoff", "colgroup", "col", "span", "abbr", "axis",
612 "headers", "scope", "rowspan", "colspan", /* Tables */
613 "id", "class", "name", "style" /* For CSS */
618 function fixTableTags ( $t )
620 if ( trim ( $t ) == "" ) return "" ; # Saves runtime ;-)
621 $htmlattrs = $this->getHTMLattrs() ;
623 # Strip non-approved attributes from the tag
625 "/(\\w+)(\\s*=\\s*([^\\s\">]+|\"[^\">]*\"))?/e",
626 "(in_array(strtolower(\"\$1\"),\$htmlattrs)?(\"\$1\".((\"x\$3\" != \"x\")?\"=\$3\":'')):'')",
632 function doTableStuff ( $t )
634 $t = explode ( "\n" , $t ) ;
635 $td = array () ; # Is currently a td tag open?
636 $ltd = array () ; # Was it TD or TH?
637 $tr = array () ; # Is currently a tr tag open?
638 $ltr = array () ; # tr attributes
639 foreach ( $t AS $k => $x )
642 $fc = substr ( $x , 0 , 1 ) ;
643 if ( "{|" == substr ( $x , 0 , 2 ) )
645 $t[$k] = "<table " . $this->fixTableTags ( substr ( $x , 3 ) ) . ">" ;
646 array_push ( $td , false ) ;
647 array_push ( $ltd , "" ) ;
648 array_push ( $tr , false ) ;
649 array_push ( $ltr , "" ) ;
651 else if ( count ( $td ) == 0 ) { } # Don't do any of the following
652 else if ( "|}" == substr ( $x , 0 , 2 ) )
655 $l = array_pop ( $ltd ) ;
656 if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
657 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
661 /* else if ( "|_" == substr ( $x , 0 , 2 ) ) # Caption
663 $z = trim ( substr ( $x , 2 ) ) ;
664 $t[$k] = "<caption>{$z}</caption>\n" ;
666 else if ( "|-" == substr ( $x , 0 , 2 ) ) # Allows for |---------------
668 $x = substr ( $x , 1 ) ;
669 while ( $x != "" && substr ( $x , 0 , 1 ) == '-' ) $x = substr ( $x , 1 ) ;
671 $l = array_pop ( $ltd ) ;
672 if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
673 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
676 array_push ( $tr , false ) ;
677 array_push ( $td , false ) ;
678 array_push ( $ltd , "" ) ;
679 array_push ( $ltr , $this->fixTableTags ( $x ) ) ;
681 else if ( "|" == $fc ||
"!" == $fc ||
"|+" == substr ( $x , 0 , 2 ) ) # Caption
683 if ( "|+" == substr ( $x , 0 , 2 ) )
686 $x = substr ( $x , 1 ) ;
688 $after = substr ( $x , 1 ) ;
689 if ( $fc == "!" ) $after = str_replace ( "!!" , "||" , $after ) ;
690 $after = explode ( "||" , $after ) ;
692 foreach ( $after AS $theline )
695 $tra = array_pop ( $ltr ) ;
696 if ( !array_pop ( $tr ) ) $z = "<tr {$tra}>\n" ;
697 array_push ( $tr , true ) ;
698 array_push ( $ltr , "" ) ;
700 $l = array_pop ( $ltd ) ;
701 if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
702 if ( $fc == "|" ) $l = "TD" ;
703 else if ( $fc == "!" ) $l = "TH" ;
704 else if ( $fc == "+" ) $l = "CAPTION" ;
706 array_push ( $ltd , $l ) ;
707 $y = explode ( "|" , $theline , 2 ) ;
708 if ( count ( $y ) == 1 ) $y = "{$z}<{$l}>{$y[0]}" ;
709 else $y = $y = "{$z}<{$l} ".$this->fixTableTags($y[0]).">{$y[1]}" ;
711 array_push ( $td , true ) ;
716 # Closing open td, tr && table
717 while ( count ( $td ) > 0 )
719 if ( array_pop ( $td ) ) $t[] = "</td>" ;
720 if ( array_pop ( $tr ) ) $t[] = "</tr>" ;
724 $t = implode ( "\n" , $t ) ;
725 # $t = $this->removeHTMLtags( $t );
729 # Well, OK, it's actually about 14 passes. But since all the
730 # hard lifting is done inside PHP's regex code, it probably
731 # wouldn't speed things up much to add a real parser.
733 function doWikiPass2( $text, $linestart )
735 global $wgUser, $wgLang, $wgUseDynamicDates;
736 wfProfileIn( "OutputPage::doWikiPass2" );
738 $text = $this->removeHTMLtags( $text );
739 $text = $this->replaceVariables( $text );
741 $text = preg_replace( "/(^|\n)-----*/", "\\1<hr>", $text );
742 $text = str_replace ( "<HR>", "<hr>", $text );
744 $text = $this->doAllQuotes( $text );
745 $text = $this->doHeadings( $text );
746 $text = $this->doBlockLevels( $text, $linestart );
748 if($wgUseDynamicDates) {
749 $text = $wgLang->replaceDates( $text );
752 $text = $this->replaceExternalLinks( $text );
753 $text = $this->replaceInternalLinks ( $text );
754 $text = $this->doTableStuff ( $text ) ;
756 $text = $this->magicISBN( $text );
757 $text = $this->magicRFC( $text );
758 $text = $this->formatHeadings( $text );
760 $sk = $wgUser->getSkin();
761 $text = $sk->transformContent( $text );
762 $text .= $this->categoryMagic () ;
768 /* private */ function doAllQuotes( $text )
771 $lines = explode( "\r\n", $text );
772 foreach ( $lines as $line ) {
773 $outtext .= $this->doQuotes ( "", $line, "" ) . "\r\n";
778 /* private */ function doQuotes( $pre, $text, $mode )
780 if ( preg_match( "/^(.*)''(.*)$/sU", $text, $m ) ) {
781 $m1_strong = ($m[1] == "") ?
"" : "<strong>{$m[1]}</strong>";
782 $m1_em = ($m[1] == "") ?
"" : "<em>{$m[1]}</em>";
783 if ( substr ($m[2], 0, 1) == "'" ) {
784 $m[2] = substr ($m[2], 1);
786 return $this->doQuotes ( $m[1], $m[2], ($m[1] == "") ?
"both" : "emstrong" );
787 } else if ($mode == "strong") {
788 return $m1_strong . $this->doQuotes ( "", $m[2], "" );
789 } else if (($mode == "emstrong") ||
($mode == "both")) {
790 return $this->doQuotes ( "", $pre.$m1_strong.$m[2], "em" );
791 } else if ($mode == "strongem") {
792 return "<strong>{$pre}{$m1_em}</strong>" . $this->doQuotes ( "", $m[2], "em" );
794 return $m[1] . $this->doQuotes ( "", $m[2], "strong" );
797 if ($mode == "strong") {
798 return $this->doQuotes ( $m[1], $m[2], ($m[1] == "") ?
"both" : "strongem" );
799 } else if ($mode == "em") {
800 return $m1_em . $this->doQuotes ( "", $m[2], "" );
801 } else if ($mode == "emstrong") {
802 return "<em>{$pre}{$m1_strong}</em>" . $this->doQuotes ( "", $m[2], "strong" );
803 } else if (($mode == "strongem") ||
($mode == "both")) {
804 return $this->doQuotes ( "", $pre.$m1_em.$m[2], "strong" );
806 return $m[1] . $this->doQuotes ( "", $m[2], "em" );
810 $text_strong = ($text == "") ?
"" : "<strong>{$text}</strong>";
811 $text_em = ($text == "") ?
"" : "<em>{$text}</em>";
814 } else if ($mode == "em") {
815 return $pre . $text_em;
816 } else if ($mode == "strong") {
817 return $pre . $text_strong;
818 } else if ($mode == "strongem") {
819 return (($pre == "") && ($text == "")) ?
"" : "<strong>{$pre}{$text_em}</strong>";
821 return (($pre == "") && ($text == "")) ?
"" : "<em>{$pre}{$text_strong}</em>";
826 /* private */ function doHeadings( $text )
828 for ( $i = 6; $i >= 1; --$i ) {
829 $h = substr( "======", 0, $i );
830 $text = preg_replace( "/^{$h}([^=]+){$h}(\\s|$)/m",
831 "<h{$i}>\\1</h{$i}>\\2", $text );
836 # Note: we have to do external links before the internal ones,
837 # and otherwise take great care in the order of things here, so
838 # that we don't end up interpreting some URLs twice.
840 /* private */ function replaceExternalLinks( $text )
842 wfProfileIn( "OutputPage::replaceExternalLinks" );
843 $text = $this->subReplaceExternalLinks( $text, "http", true );
844 $text = $this->subReplaceExternalLinks( $text, "https", true );
845 $text = $this->subReplaceExternalLinks( $text, "ftp", false );
846 $text = $this->subReplaceExternalLinks( $text, "gopher", false );
847 $text = $this->subReplaceExternalLinks( $text, "news", false );
848 $text = $this->subReplaceExternalLinks( $text, "mailto", false );
853 /* private */ function subReplaceExternalLinks( $s, $protocol, $autonumber )
855 global $wgUser, $printable;
856 global $wgAllowExternalImages;
859 $unique = "4jzAfzB8hNvf4sqyO9Edd8pSmk9rE2in0Tgw3";
860 $uc = "A-Za-z0-9_\\/~%\\-+&*#?!=()@\\x80-\\xFF";
862 # this is the list of separators that should be ignored if they
863 # are the last character of an URL but that should be included
864 # if they occur within the URL, e.g. "go to www.foo.com, where .."
865 # in this case, the last comma should not become part of the URL,
866 # but in "www.foo.com/123,2342,32.htm" it should.
868 $fnc = "A-Za-z0-9_.,~%\\-+&;#*?!=()@\\x80-\\xFF";
869 $images = "gif|png|jpg|jpeg";
871 # PLEASE NOTE: The curly braces { } are not part of the regex,
872 # they are interpreted as part of the string (used to tell PHP
873 # that the content of the string should be inserted there).
874 $e1 = "/(^|[^\\[])({$protocol}:)([{$uc}{$sep}]+)\\/([{$fnc}]+)\\." .
875 "((?i){$images})([^{$uc}]|$)/";
877 $e2 = "/(^|[^\\[])({$protocol}:)(([".$uc."]|[".$sep."][".$uc."])+)([^". $uc . $sep. "]|[".$sep."]|$)/";
878 $sk = $wgUser->getSkin();
880 if ( $autonumber and $wgAllowExternalImages) { # Use img tags only for HTTP urls
881 $s = preg_replace( $e1, "\\1" . $sk->makeImage( "{$unique}:\\3" .
882 "/\\4.\\5", "\\4.\\5" ) . "\\6", $s );
884 $s = preg_replace( $e2, "\\1" . "<a href=\"{$unique}:\\3\"" .
885 $sk->getExternalLinkAttributes( "{$unique}:\\3", wfEscapeHTML(
886 "{$unique}:\\3" ) ) . ">" . wfEscapeHTML( "{$unique}:\\3" ) .
888 $s = str_replace( $unique, $protocol, $s );
890 $a = explode( "[{$protocol}:", " " . $s );
891 $s = array_shift( $a );
892 $s = substr( $s, 1 );
894 $e1 = "/^([{$uc}"."{$sep}]+)](.*)\$/sD";
895 $e2 = "/^([{$uc}"."{$sep}]+)\\s+([^\\]]+)](.*)\$/sD";
897 foreach ( $a as $line ) {
898 if ( preg_match( $e1, $line, $m ) ) {
899 $link = "{$protocol}:{$m[1]}";
901 if ( $autonumber ) { $text = "[" . ++
$this->mAutonumber
. "]"; }
902 else { $text = wfEscapeHTML( $link ); }
903 } else if ( preg_match( $e2, $line, $m ) ) {
904 $link = "{$protocol}:{$m[1]}";
908 $s .= "[{$protocol}:" . $line;
911 if ( $printable == "yes") $paren = " (<i>" . htmlspecialchars ( $link ) . "</i>)";
913 $la = $sk->getExternalLinkAttributes( $link, $text );
914 $s .= "<a href='{$link}'{$la}>{$text}</a>{$paren}{$trail}";
920 /* private */ function replaceInternalLinks( $s )
922 global $wgTitle, $wgUser, $wgLang;
923 global $wgLinkCache, $wgInterwikiMagic, $wgUseCategoryMagic;
924 global $wgNamespacesWithSubpages, $wgLanguageCode;
925 wfProfileIn( $fname = "OutputPage::replaceInternalLinks" );
927 wfProfileIn( "$fname-setup" );
928 $tc = Title
::legalChars() . "#";
929 $sk = $wgUser->getSkin();
931 $a = explode( "[[", " " . $s );
932 $s = array_shift( $a );
933 $s = substr( $s, 1 );
935 $e1 = "/^([{$tc}]+)\\|([^]]+)]](.*)\$/sD";
936 $e2 = "/^([{$tc}]+)]](.*)\$/sD";
939 foreach ( $a as $line ) {
940 wfProfileIn( "$fname-loop" );
941 if ( preg_match( $e1, $line, $m ) ) { # page with alternate text
946 } else if ( preg_match( $e2, $line, $m ) ) { # page with normal text
952 else { # Invalid form; output directly
957 if(substr($m[1],0,1)=="/") { # subpage
958 if(substr($m[1],-1,1)=="/") { # / at end means we don't want the slash to be shown
959 $m[1]=substr($m[1],1,strlen($m[1])-2);
963 $noslash=substr($m[1],1);
965 if($wgNamespacesWithSubpages[$wgTitle->getNamespace()]) { # subpages allowed here
966 $link = $wgTitle->getPrefixedText(). "/" . trim($noslash);
969 } # this might be changed for ugliness reasons
971 $link = $noslash; # no subpage allowed, use standard link
973 } else { # no subpage
977 if ( preg_match( "/^((?:i|x|[a-z]{2,3})(?:-[a-z0-9]+)?|[A-Za-z\\x80-\\xff]+):(.*)\$/", $link, $m ) ) {
978 $pre = strtolower( $m[1] );
980 if ( $wgLang->getNsIndex( $pre ) ==
981 Namespace::getImage() ) {
982 $nt = Title
::newFromText( $suf );
983 $name = $nt->getDBkey();
984 if ( "" == $text ) { $text = $nt->GetText(); }
986 $wgLinkCache->addImageLink( $name );
987 $s .= $sk->makeImageLink( $name,
988 wfImageUrl( $name ), $text );
990 } else if ( "media" == $pre ) {
991 $nt = Title
::newFromText( $suf );
992 $name = $nt->getDBkey();
993 if ( "" == $text ) { $text = $nt->GetText(); }
995 $wgLinkCache->addImageLink( $name );
996 $s .= $sk->makeMediaLink( $name,
997 wfImageUrl( $name ), $text );
999 } else if ( isset($wgUseCategoryMagic) && $wgUseCategoryMagic && $pre == wfMsg ( "category" ) ) {
1000 $l = $sk->makeLink ( $pre.":".ucfirst($m[2]) , ucfirst ( $m[2] ) ) ;
1001 array_push ( $this->mCategoryLinks
, $l ) ;
1004 $l = $wgLang->getLanguageName( $pre );
1005 if ( "" == $l or !$wgInterwikiMagic or
1006 Namespace::isTalk( $wgTitle->getNamespace() ) ) {
1007 if ( "" == $text ) { $text = $link; }
1008 $s .= $sk->makeLink( $link, $text, "", $trail );
1009 } else if ( $pre != $wgLanguageCode ) {
1010 array_push( $this->mLanguageLinks
, "$pre:$suf" );
1014 # } else if ( 0 == strcmp( "##", substr( $link, 0, 2 ) ) ) {
1015 # $link = substr( $link, 2 );
1016 # $s .= "<a name=\"{$link}\">{$text}</a>{$trail}";
1018 if ( "" == $text ) { $text = $link; }
1019 $s .= $sk->makeLink( $link, $text, "", $trail );
1027 # Some functions here used by doBlockLevels()
1029 /* private */ function closeParagraph()
1032 if ( 0 != strcmp( "p", $this->mLastSection
) &&
1033 0 != strcmp( "", $this->mLastSection
) ) {
1034 $result = "</" . $this->mLastSection
. ">";
1036 $this->mLastSection
= "";
1039 # getCommon() returns the length of the longest common substring
1040 # of both arguments, starting at the beginning of both.
1042 /* private */ function getCommon( $st1, $st2 )
1044 $fl = strlen( $st1 );
1045 $shorter = strlen( $st2 );
1046 if ( $fl < $shorter ) { $shorter = $fl; }
1048 for ( $i = 0; $i < $shorter; ++
$i ) {
1049 if ( $st1{$i} != $st2{$i} ) { break; }
1053 # These next three functions open, continue, and close the list
1054 # element appropriate to the prefix character passed into them.
1056 /* private */ function openList( $char )
1058 $result = $this->closeParagraph();
1060 if ( "*" == $char ) { $result .= "<ul><li>"; }
1061 else if ( "#" == $char ) { $result .= "<ol><li>"; }
1062 else if ( ":" == $char ) { $result .= "<dl><dd>"; }
1063 else if ( ";" == $char ) {
1064 $result .= "<dl><dt>";
1065 $this->mDTopen
= true;
1067 else { $result = "<!-- ERR 1 -->"; }
1072 /* private */ function nextItem( $char )
1074 if ( "*" == $char ||
"#" == $char ) { return "</li><li>"; }
1075 else if ( ":" == $char ||
";" == $char ) {
1077 if ( $this->mDTopen
) { $close = "</dt>"; }
1078 if ( ";" == $char ) {
1079 $this->mDTopen
= true;
1080 return $close . "<dt>";
1082 $this->mDTopen
= false;
1083 return $close . "<dd>";
1086 return "<!-- ERR 2 -->";
1089 /* private */function closeList( $char )
1091 if ( "*" == $char ) { return "</li></ul>"; }
1092 else if ( "#" == $char ) { return "</li></ol>"; }
1093 else if ( ":" == $char ) {
1094 if ( $this->mDTopen
) {
1095 $this->mDTopen
= false;
1096 return "</dt></dl>";
1098 return "</dd></dl>";
1101 return "<!-- ERR 3 -->";
1104 /* private */ function doBlockLevels( $text, $linestart )
1106 wfProfileIn( "OutputPage::doBlockLevels" );
1107 # Parsing through the text line by line. The main thing
1108 # happening here is handling of block-level elements p, pre,
1109 # and making lists from lines starting with * # : etc.
1111 $a = explode( "\n", $text );
1112 $text = $lastPref = "";
1113 $this->mDTopen
= $inBlockElem = false;
1115 if ( ! $linestart ) { $text .= array_shift( $a ); }
1116 foreach ( $a as $t ) {
1117 if ( "" != $text ) { $text .= "\n"; }
1120 $opl = strlen( $lastPref );
1121 $npl = strspn( $t, "*#:;" );
1122 $pref = substr( $t, 0, $npl );
1123 $pref2 = str_replace( ";", ":", $pref );
1124 $t = substr( $t, $npl );
1126 if ( 0 != $npl && 0 == strcmp( $lastPref, $pref2 ) ) {
1127 $text .= $this->nextItem( substr( $pref, -1 ) );
1129 if ( ";" == substr( $pref, -1 ) ) {
1130 $cpos = strpos( $t, ":" );
1131 if ( ! ( false === $cpos ) ) {
1132 $term = substr( $t, 0, $cpos );
1133 $text .= $term . $this->nextItem( ":" );
1134 $t = substr( $t, $cpos +
1 );
1137 } else if (0 != $npl ||
0 != $opl) {
1138 $cpl = $this->getCommon( $pref, $lastPref );
1140 while ( $cpl < $opl ) {
1141 $text .= $this->closeList( $lastPref{$opl-1} );
1144 if ( $npl <= $cpl && $cpl > 0 ) {
1145 $text .= $this->nextItem( $pref{$cpl-1} );
1147 while ( $npl > $cpl ) {
1148 $char = substr( $pref, $cpl, 1 );
1149 $text .= $this->openList( $char );
1151 if ( ";" == $char ) {
1152 $cpos = strpos( $t, ":" );
1153 if ( ! ( false === $cpos ) ) {
1154 $term = substr( $t, 0, $cpos );
1155 $text .= $term . $this->nextItem( ":" );
1156 $t = substr( $t, $cpos +
1 );
1163 if ( 0 == $npl ) { # No prefix--go to paragraph mode
1165 "/(<table|<blockquote|<h1|<h2|<h3|<h4|<h5|<h6)/i", $t ) ) {
1166 $text .= $this->closeParagraph();
1167 $inBlockElem = true;
1169 if ( ! $inBlockElem ) {
1170 if ( " " == $t{0} ) {
1171 $newSection = "pre";
1172 # $t = wfEscapeHTML( $t );
1174 else { $newSection = "p"; }
1176 if ( 0 == strcmp( "", trim( $oLine ) ) ) {
1177 $text .= $this->closeParagraph();
1178 $text .= "<" . $newSection . ">";
1179 } else if ( 0 != strcmp( $this->mLastSection
,
1181 $text .= $this->closeParagraph();
1182 if ( 0 != strcmp( "p", $newSection ) ) {
1183 $text .= "<" . $newSection . ">";
1186 $this->mLastSection
= $newSection;
1188 if ( $inBlockElem &&
1189 preg_match( "/(<\\/table|<\\/blockquote|<\\/h1|<\\/h2|<\\/h3|<\\/h4|<\\/h5|<\\/h6)/i", $t ) ) {
1190 $inBlockElem = false;
1196 $text .= $this->closeList( $pref2{$npl-1} );
1199 if ( "" != $this->mLastSection
) {
1200 if ( "p" != $this->mLastSection
) {
1201 $text .= "</" . $this->mLastSection
. ">";
1203 $this->mLastSection
= "";
1209 /* private */ function replaceVariables( $text )
1212 wfProfileIn( "OutputPage:replaceVariables" );
1214 /* As with sigs, use server's local time --
1215 ensure this is appropriate for your audience! */
1217 $mw =& MagicWord
::get( MAG_CURRENTMONTH
);
1218 $text = $mw->replace( $v, $text );
1220 $v = $wgLang->getMonthName( date( "n" ) );
1221 $mw =& MagicWord
::get( MAG_CURRENTMONTHNAME
);
1222 $text = $mw->replace( $v, $text );
1224 $v = $wgLang->getMonthNameGen( date( "n" ) );
1225 $mw =& MagicWord
::get( MAG_CURRENTMONTHNAMEGEN
);
1226 $text = $mw->replace( $v, $text );
1229 $mw = MagicWord
::get( MAG_CURRENTDAY
);
1230 $text = $mw->replace( $v, $text );
1232 $v = $wgLang->getWeekdayName( date( "w" )+
1 );
1233 $mw =& MagicWord
::get( MAG_CURRENTDAYNAME
);
1234 $text = $mw->replace( $v, $text );
1237 $mw =& MagicWord
::get( MAG_CURRENTYEAR
);
1238 $text = $mw->replace( $v, $text );
1240 $v = $wgLang->time( wfTimestampNow(), false );
1241 $mw =& MagicWord
::get( MAG_CURRENTTIME
);
1242 $text = $mw->replace( $v, $text );
1244 $mw =& MagicWord
::get( MAG_NUMBEROFARTICLES
);
1245 if ( $mw->match( $text ) ) {
1246 $v = wfNumberOfArticles();
1247 $text = $mw->replace( $v, $text );
1253 /* private */ function removeHTMLtags( $text )
1255 wfProfileIn( "OutputPage::removeHTMLtags" );
1256 $htmlpairs = array( # Tags that must be closed
1257 "b", "i", "u", "font", "big", "small", "sub", "sup", "h1",
1258 "h2", "h3", "h4", "h5", "h6", "cite", "code", "em", "s",
1259 "strike", "strong", "tt", "var", "div", "center",
1260 "blockquote", "ol", "ul", "dl", "table", "caption", "pre",
1261 "ruby", "rt" , "rb" , "rp"
1263 $htmlsingle = array(
1264 "br", "p", "hr", "li", "dt", "dd"
1266 $htmlnest = array( # Tags that can be nested--??
1267 "table", "tr", "td", "th", "div", "blockquote", "ol", "ul",
1268 "dl", "font", "big", "small", "sub", "sup"
1270 $tabletags = array( # Can only appear inside table
1274 $htmlsingle = array_merge( $tabletags, $htmlsingle );
1275 $htmlelements = array_merge( $htmlsingle, $htmlpairs );
1277 $htmlattrs = $this->getHTMLattrs () ;
1279 # Remove HTML comments
1280 $text = preg_replace( "/<!--.*-->/sU", "", $text );
1282 $bits = explode( "<", $text );
1283 $text = array_shift( $bits );
1284 $tagstack = array(); $tablestack = array();
1286 foreach ( $bits as $x ) {
1287 $prev = error_reporting( E_ALL
& ~
( E_NOTICE | E_WARNING
) );
1288 preg_match( "/^(\\/?)(\\w+)([^>]*)(\\/{0,1}>)([^<]*)$/",
1290 list( $qbar, $slash, $t, $params, $brace, $rest ) = $regs;
1291 error_reporting( $prev );
1294 if ( in_array( $t = strtolower( $t ), $htmlelements ) ) {
1298 if ( ! in_array( $t, $htmlsingle ) &&
1299 ( $ot = array_pop( $tagstack ) ) != $t ) {
1300 array_push( $tagstack, $ot );
1303 if ( $t == "table" ) {
1304 $tagstack = array_pop( $tablestack );
1309 # Keep track for later
1310 if ( in_array( $t, $tabletags ) &&
1311 ! in_array( "table", $tagstack ) ) {
1313 } else if ( in_array( $t, $tagstack ) &&
1314 ! in_array ( $t , $htmlnest ) ) {
1316 } else if ( ! in_array( $t, $htmlsingle ) ) {
1317 if ( $t == "table" ) {
1318 array_push( $tablestack, $tagstack );
1319 $tagstack = array();
1321 array_push( $tagstack, $t );
1323 # Strip non-approved attributes from the tag
1324 $newparams = preg_replace(
1325 "/(\\w+)(\\s*=\\s*([^\\s\">]+|\"[^\">]*\"))?/e",
1326 "(in_array(strtolower(\"\$1\"),\$htmlattrs)?(\"\$1\".((\"x\$3\" != \"x\")?\"=\$3\":'')):'')",
1330 $rest = str_replace( ">", ">", $rest );
1331 $text .= "<$slash$t$newparams$brace$rest";
1335 $text .= "<" . str_replace( ">", ">", $x);
1337 # Close off any remaining tags
1338 while ( $t = array_pop( $tagstack ) ) {
1340 if ( $t == "table" ) { $tagstack = array_pop( $tablestack ); }
1349 * This function accomplishes several tasks:
1350 * 1) Auto-number headings if that option is enabled
1351 * 2) Add an [edit] link to sections for logged in users who have enabled the option
1352 * 3) Add a Table of contents on the top for users who have enabled the option
1353 * 4) Auto-anchor headings
1355 * It loops through all headlines, collects the necessary data, then splits up the
1356 * string and re-inserts the newly formatted headlines.
1359 /* private */ function formatHeadings( $text )
1361 global $wgUser,$wgArticle,$wgTitle,$wpPreview;
1362 $nh=$wgUser->getOption( "numberheadings" );
1363 $st=$wgUser->getOption( "showtoc" );
1364 if(!$wgTitle->userCanEdit()) {
1368 $es=$wgUser->getID() && $wgUser->getOption( "editsection" );
1369 $esr=$wgUser->getID() && $wgUser->getOption( "editsectiononrightclick" );
1372 # if the string __NOTOC__ (not case-sensitive) occurs in the HTML,
1374 $mw =& MagicWord
::get( MAG_NOTOC
);
1375 if ($mw->matchAndRemove( $text ))
1380 # never add the TOC to the Main Page. This is an entry page that should not
1381 # be more than 1-2 screens large anyway
1382 if($wgTitle->getPrefixedText()==wfMsg("mainpage")) {$st=0;}
1384 # We need this to perform operations on the HTML
1385 $sk=$wgUser->getSkin();
1387 # Get all headlines for numbering them and adding funky stuff like [edit]
1389 preg_match_all("/<H([1-6])(.*?>)(.*?)<\/H[1-6]>/i",$text,$matches);
1394 # Ugh .. the TOC should have neat indentation levels which can be
1395 # passed to the skin functions. These are determined here
1396 foreach($matches[3] as $headline) {
1397 if($level) { $prevlevel=$level;}
1398 $level=$matches[1][$c];
1399 if(($nh||
$st) && $prevlevel && $level>$prevlevel) {
1401 $h[$level]=0; // reset when we enter a new level
1402 $toc.=$sk->tocIndent($level-$prevlevel);
1403 $toclevel+
=$level-$prevlevel;
1406 if(($nh||
$st) && $level<$prevlevel) {
1407 $h[$level+
1]=0; // reset when we step back a level
1408 $toc.=$sk->tocUnindent($prevlevel-$level);
1409 $toclevel-=$prevlevel-$level;
1412 $h[$level]++
; // count number of headlines for each level
1415 for($i=1;$i<=$level;$i++
) {
1417 if($dot) {$numbering.=".";}
1425 $canonized_headline=preg_replace("/<.*?>/","",$headline); // strip out HTML
1426 $tocline=$canonized_headline;
1427 $canonized_headline=str_replace('"',"",$canonized_headline);
1428 $canonized_headline=str_replace(" ","_",trim($canonized_headline));
1429 $refer[$c]=$canonized_headline;
1430 $refers[$canonized_headline]++
; // count how many in assoc. array so we can track dupes in anchors
1431 $refcount[$c]=$refers[$canonized_headline];
1433 $tocline=$numbering ." ". $tocline;
1435 $headline=$numbering . " " . $headline; // the two are different if the line contains a link
1438 $anchor=$canonized_headline;
1439 if($refcount[$c]>1) {$anchor.="_".$refcount[$c];}
1441 $toc.=$sk->tocLine($anchor,$tocline,$toclevel);
1443 if($es && !isset($wpPreview)) {
1444 $head[$c].=$sk->editSectionLink($c+
1);
1446 $head[$c].="<H".$level.$matches[2][$c]
1447 ."<a name=\"".$anchor."\">"
1451 if($esr && !isset($wpPreview)) {
1452 $head[$c]=$sk->editSectionScript($c+
1,$head[$c]);
1461 $toc.=$sk->tocUnindent($toclevel);
1462 $toc=$sk->tocTable($toc);
1465 // split up and insert constructed headlines
1467 $blocks=preg_split("/<H[1-6].*?>.*?<\/H[1-6]>/i",$text);
1471 foreach($blocks as $block) {
1472 if(($es) && !isset($wpPreview) && $c>0 && $i==0) {
1473 # This is the [edit] link that appears for the top block of text when
1474 # section editing is enabled
1475 $full.=$sk->editSectionLink(0);
1478 if($st && $toclines>3 && !$i) {
1479 # Let's add a top anchor just in case we want to link to the top of the page
1480 $full="<a name=\"top\"></a>".$full.$toc;
1489 /* private */ function magicISBN( $text )
1493 $a = split( "ISBN ", " $text" );
1494 if ( count ( $a ) < 2 ) return $text;
1495 $text = substr( array_shift( $a ), 1);
1496 $valid = "0123456789-ABCDEFGHIJKLMNOPQRSTUVWXYZ";
1498 foreach ( $a as $x ) {
1499 $isbn = $blank = "" ;
1500 while ( " " == $x{0} ) {
1502 $x = substr( $x, 1 );
1504 while ( strstr( $valid, $x{0} ) != false ) {
1506 $x = substr( $x, 1 );
1508 $num = str_replace( "-", "", $isbn );
1509 $num = str_replace( " ", "", $num );
1512 $text .= "ISBN $blank$x";
1514 $text .= "<a href=\"" . wfLocalUrlE( $wgLang->specialPage(
1515 "Booksources"), "isbn={$num}" ) . "\" CLASS=\"internal\">ISBN $isbn</a>";
1522 /* private */ function magicRFC( $text )
1527 /* private */ function headElement()
1529 global $wgDocType, $wgDTD, $wgUser, $wgLanguageCode, $wgOutputEncoding, $wgLang;
1531 $ret = "<!DOCTYPE HTML PUBLIC \"$wgDocType\"\n \"$wgDTD\">\n";
1533 if ( "" == $this->mHTMLtitle
) {
1534 $this->mHTMLtitle
= $this->mPagetitle
;
1536 $rtl = $wgLang->isRTL() ?
" dir='RTL'" : "";
1537 $ret .= "<html lang=\"$wgLanguageCode\"$rtl><head><title>{$this->mHTMLtitle}</title>\n";
1538 array_push( $this->mMetatags
, array( "http:Content-type", "text/html; charset={$wgOutputEncoding}" ) );
1539 foreach ( $this->mMetatags
as $tag ) {
1540 if ( 0 == strcasecmp( "http:", substr( $tag[0], 0, 5 ) ) ) {
1542 $tag[0] = substr( $tag[0], 5 );
1546 $ret .= "<meta $a=\"{$tag[0]}\" content=\"{$tag[1]}\">\n";
1548 $p = $this->mRobotpolicy
;
1549 if ( "" == $p ) { $p = "index,follow"; }
1550 $ret .= "<meta name=\"robots\" content=\"$p\">\n";
1552 if ( count( $this->mKeywords
) > 0 ) {
1553 $ret .= "<meta name=\"keywords\" content=\"" .
1554 implode( ",", $this->mKeywords
) . "\">\n";
1556 foreach ( $this->mLinktags
as $tag ) {
1558 if ( "" != $tag[0] ) { $ret .= "rel=\"{$tag[0]}\" "; }
1559 if ( "" != $tag[1] ) { $ret .= "rev=\"{$tag[1]}\" "; }
1560 $ret .= "href=\"{$tag[2]}\">\n";
1562 $sk = $wgUser->getSkin();
1563 $ret .= $sk->getHeadScripts();
1564 $ret .= $sk->getUserStyles();
1566 $ret .= "</head>\n";