includes/OutputPage.php

   1 <?
   2 # See design.doc
   3
   4 if($wgUseTeX) include_once( "Math.php" );
   5
   6 class OutputPage {
   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;
  12
  13         var $mDTopen, $mLastSection; # Used for processing DL, PRE
  14         var $mLanguageLinks, $mSupressQuickbar;
  15         var $mOnloadHandler;
  16         var $mDoNothing;
  17         var $mContainsOldMagic, $mContainsNewMagic;
  18         var $mIsArticleRelated;
  19
  20         function OutputPage()
  21         {
  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;
  35         }
  36
  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; }
  40
  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 ) ); }
  45
  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 )
  51         {
  52                 global $wgLang, $wgCachePages, $wgUser;
  53                 if( !$wgCachePages ) {
  54                         wfDebug( "CACHE DISABLED\n", false );
  55                         return;
  56                 }
  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 );
  60                         return;
  61                 }
  62                 if( $wgUser->getOption( "nocache" ) ) {
  63                         wfDebug( "USER DISABLED CACHE\n", false );
  64                         return;
  65                 }
  66
  67                 $lastmod = gmdate( "D, j M Y H:i:s", wfTimestamp2Unix(
  68                         max( $timestamp, $wgUser->mTouched ) ) ) . " GMT";
  69
  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 );
  78
  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 );
  86                                 $this->disable();
  87                                 return true;
  88                         } else {
  89                                 wfDebug( "READY  client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
  90                                 $this->mLastModified = $lastmod;
  91                         }
  92                 } else {
  93                         wfDebug( "We're confused.\n", false );
  94                         $this->mLastModified = $lastmod;
  95                 }
  96         }
  97
  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; }
 110
 111         function setArticleRelated( $v )
 112         {
 113                 $this->mIsArticleRelated = $v;
 114                 if ( !$v ) {
 115                         $this->mIsarticle = false;
 116                 }
 117         }
 118         function setArticleFlag( $v ) {
 119                 $this->mIsarticle = $v;
 120                 if ( $v ) {
 121                         $this->mIsArticleRelated = $v;
 122                 }
 123         }
 124
 125         function isArticleRelated( $v )
 126         {
 127                 return $this->mIsArticleRelated;
 128         }
 129
 130         function getLanguageLinks() {
 131                 global $wgTitle, $wgLanguageCode;
 132                 global $wgDBconnection, $wgDBname;
 133                 return $this->mLanguageLinks;
 134         }
 135         function supressQuickbar() { $this->mSupressQuickbar = true; }
 136         function isQuickbarSupressed() { return $this->mSupressQuickbar; }
 137
 138         function addHTML( $text ) { $this->mBodytext .= $text; }
 139         function addHeadtext( $text ) { $this->mHeadtext .= $text; }
 140         function debug( $text ) { $this->mDebugtext .= $text; }
 141
 142         # First pass--just handle <nowiki> sections, pass the rest off
 143         # to doWikiPass2() which does all the real work.
 144         #
 145         function addWikiText( $text, $linestart = true )
 146         {
 147                 global $wgUseTeX, $wgArticle, $wgUser, $action;
 148                 $fname = "OutputPage::addWikiText";
 149                 wfProfileIn( $fname );
 150                 $unique  = "3iyZiyA7iMwg5rhxP0Dcc9oTnj8qD1jm1Sfv4";
 151                 $unique2 = "4LIQ9nXtiYFPCSfitVwDw7EYwQlL4GeeQ7qSO";
 152                 $unique3 = "fPaA8gDfdLBqzj68Yjg9Hil3qEF8JGO0uszIp";
 153                 $nwlist = array();
 154                 $nwsecs = 0;
 155                 $mathlist = array();
 156                 $mathsecs = 0;
 157                 $prelist = array ();
 158                 $presecs = 0;
 159                 $stripped = "";
 160                 $stripped2 = "";
 161                 $stripped3 = "";
 162
 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 );
 167
 168                 global $wgEnableParserCache;
 169                 $use_parser_cache =
 170                         $wgEnableParserCache && $action == "view" &&
 171                         intval($wgUser->getOption( "stubthreshold" )) == 0 &&
 172                         isset($wgArticle) && $wgArticle->getID() > 0;
 173
 174                 if( $use_parser_cache ){
 175                         if( $this->fillFromParserCache() ){
 176                                 wfProfileOut( $fname );
 177                                 return;
 178                         }
 179                 }
 180
 181                 while ( "" != $text ) {
 182                         $p = preg_split( "/<\\s*nowiki\\s*>/i", $text, 2 );
 183                         $stripped .= $p[0];
 184                         if ( ( count( $p ) < 2 ) || ( "" == $p[1] ) ) { $text = ""; }
 185                         else {
 186                                 $q = preg_split( "/<\\/\\s*nowiki\\s*>/i", $p[1], 2 );
 187                                 ++$nwsecs;
 188                                 $nwlist[$nwsecs] = wfEscapeHTMLTagsOnly($q[0]);
 189                                 $stripped .= $unique . $nwsecs . "s";
 190                                 $text = $q[1];
 191                         }
 192                 }
 193
 194                 if( $wgUseTeX ) {
 195                         while ( "" != $stripped ) {
 196                                 $p = preg_split( "/<\\s*math\\s*>/i", $stripped, 2 );
 197                                 $stripped2 .= $p[0];
 198                                 if ( ( count( $p ) < 2 ) || ( "" == $p[1] ) ) { $stripped = ""; }
 199                                 else {
 200                                         $q = preg_split( "/<\\/\\s*math\\s*>/i", $p[1], 2 );
 201                                         ++$mathsecs;
 202                                         $mathlist[$mathsecs] = renderMath($q[0]);
 203                                         $stripped2 .= $unique2 . $mathsecs . "s";
 204                                         $stripped = $q[1];
 205                                 }
 206                         }
 207                 } else {
 208                         $stripped2 = $stripped;
 209                 }
 210
 211                 while ( "" != $stripped2 ) {
 212                         $p = preg_split( "/<\\s*pre\\s*>/i", $stripped2, 2 );
 213                         $stripped3 .= $p[0];
 214                         if ( ( count( $p ) < 2 ) || ( "" == $p[1] ) ) { $stripped2 = ""; }
 215                         else {
 216                                 $q = preg_split( "/<\\/\\s*pre\\s*>/i", $p[1], 2 );
 217                                 ++$presecs;
 218                                 $prelist[$presecs] = "<pre>". wfEscapeHTMLTagsOnly($q[0]). "</pre>\n";
 219                                 $stripped3 .= $unique3 . $presecs . "s";
 220                                 $stripped2 = $q[1];
 221                         }
 222                 }
 223
 224                 $text = $this->doWikiPass2( $stripped3, $linestart );
 225
 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 );
 231                 }
 232
 233                 for ( $i = 1; $i <= $mathsecs; ++$i ) {
 234                         $text = preg_replace( "/{$unique2}{$i}s/", str_replace( $specialChars,
 235                                 $escapedChars, $mathlist[$i] ), $text );
 236                 }
 237
 238                 for ( $i = 1; $i <= $nwsecs; ++$i ) {
 239                         $text = preg_replace( "/{$unique}{$i}s/", str_replace( $specialChars,
 240                                 $escapedChars, $nwlist[$i] ), $text );
 241                 }
 242                 $this->addHTML( $text );
 243
 244                 if($use_parser_cache ){
 245                         $this->saveParserCache( $text );
 246                 }
 247                 wfProfileOut( $fname );
 248         }
 249
 250         function sendCacheControl() {
 251                 global $wgUseGzip;
 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}" );
 256                         if( $wgUseGzip ) {
 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" );
 260                         }
 261                 } else {
 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" );
 266                 }
 267                 header( "Expires: Mon, 15 Jan 2001 00:00:00 GMT" ); # Cachers always validate the page!
 268         }
 269
 270         # Finally, all the text has been munged and accumulated into
 271         # the object, let's actually output it:
 272         #
 273         function output()
 274         {
 275                 global $wgUser, $wgLang, $wgDebugComments, $wgCookieExpiration;
 276                 global $wgInputEncoding, $wgOutputEncoding, $wgLanguageCode;
 277                 if( $this->mDoNothing ){
 278                         return;
 279                 }
 280                 $fname = "OutputPage::output";
 281                 wfProfileIn( $fname );
 282
 283                 $sk = $wgUser->getSkin();
 284
 285                 $this->sendCacheControl();
 286
 287                 header( "Content-type: text/html; charset={$wgOutputEncoding}" );
 288                 header( "Content-language: {$wgLanguageCode}" );
 289
 290                 if ( "" != $this->mRedirect ) {
 291                         if( substr( $this->mRedirect, 0, 4 ) != "http" ) {
 292                                 # Standards require redirect URLs to be absolute
 293                                 global $wgServer;
 294                                 $this->mRedirect = $wgServer . $this->mRedirect;
 295                         }
 296                         header( "Location: {$this->mRedirect}" );
 297                         return;
 298                 }
 299
 300                 $exp = time() + $wgCookieExpiration;
 301                 foreach( $this->mCookies as $name => $val ) {
 302                         setcookie( $name, $val, $exp, "/" );
 303                 }
 304
 305                 $sk->outputPage( $this );
 306                 # flush();
 307         }
 308
 309         function out( $ins )
 310         {
 311                 global $wgInputEncoding, $wgOutputEncoding, $wgLang;
 312                 if ( 0 == strcmp( $wgInputEncoding, $wgOutputEncoding ) ) {
 313                         $outs = $ins;
 314                 } else {
 315                         $outs = $wgLang->iconv( $wgInputEncoding, $wgOutputEncoding, $ins );
 316                         if ( false === $outs ) { $outs = $ins; }
 317                 }
 318                 print $outs;
 319         }
 320
 321         function setEncodings()
 322         {
 323                 global $wgInputEncoding, $wgOutputEncoding;
 324                 global $wgUser, $wgLang;
 325
 326                 $wgInputEncoding = strtolower( $wgInputEncoding );
 327
 328                 if( $wgUser->getOption( 'altencoding' ) ) {
 329                         $wgLang->setAltEncoding();
 330                         return;
 331                 }
 332
 333                 if ( empty( $_SERVER['HTTP_ACCEPT_CHARSET'] ) ) {
 334                         $wgOutputEncoding = strtolower( $wgOutputEncoding );
 335                         return;
 336                 }
 337
 338                 /*
 339                 # This code is unused anyway!
 340                 # Commenting out. --bv 2003-11-15
 341
 342                 $a = explode( ",", $_SERVER['HTTP_ACCEPT_CHARSET'] );
 343                 $best = 0.0;
 344                 $bestset = "*";
 345
 346                 foreach ( $a as $s ) {
 347                         if ( preg_match( "/(.*);q=(.*)/", $s, $m ) ) {
 348                                 $set = $m[1];
 349                                 $q = (float)($m[2]);
 350                         } else {
 351                                 $set = $s;
 352                                 $q = 1.0;
 353                         }
 354                         if ( $q > $best ) {
 355                                 $bestset = $set;
 356                                 $best = $q;
 357                         }
 358                 }
 359                 #if ( "*" == $bestset ) { $bestset = "iso-8859-1"; }
 360                 if ( "*" == $bestset ) { $bestset = $wgOutputEncoding; }
 361                 $wgOutputEncoding = strtolower( $bestset );
 362
 363 # Disable for now
 364 #
 365                 */
 366                 $wgOutputEncoding = $wgInputEncoding;
 367         }
 368
 369         # Returns a HTML comment with the elapsed time since request.
 370         # This method has no side effects.
 371         function reportTime()
 372         {
 373                 global $wgRequestTime;
 374
 375                 list( $usec, $sec ) = explode( " ", microtime() );
 376                 $now = (float)$sec + (float)$usec;
 377
 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. -->",
 382                   $elapsed );
 383                 return $com;
 384         }
 385
 386         # Note: these arguments are keys into wfMsg(), not text!
 387         #
 388         function errorpage( $title, $msg )
 389         {
 390                 global $wgTitle;
 391
 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 );
 398
 399                 $this->mBodytext = "";
 400                 $this->addHTML( "<p>" . wfMsg( $msg ) . "\n" );
 401                 $this->returnToMain( false );
 402
 403                 $this->output();
 404                 wfAbruptExit();
 405         }
 406
 407         function sysopRequired()
 408         {
 409                 global $wgUser;
 410
 411                 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
 412                 $this->setPageTitle( wfMsg( "sysoptitle" ) );
 413                 $this->setRobotpolicy( "noindex,nofollow" );
 414                 $this->setArticleRelated( false );
 415                 $this->mBodytext = "";
 416
 417                 $sk = $wgUser->getSkin();
 418                 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
 419                 $this->addHTML( wfMsg( "sysoptext", $ap ) );
 420                 $this->returnToMain();
 421         }
 422
 423         function developerRequired()
 424         {
 425                 global $wgUser;
 426
 427                 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
 428                 $this->setPageTitle( wfMsg( "developertitle" ) );
 429                 $this->setRobotpolicy( "noindex,nofollow" );
 430                 $this->setArticleRelated( false );
 431                 $this->mBodytext = "";
 432
 433                 $sk = $wgUser->getSkin();
 434                 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
 435                 $this->addHTML( wfMsg( "developertext", $ap ) );
 436                 $this->returnToMain();
 437         }
 438
 439         function databaseError( $fname )
 440         {
 441                 global $wgUser, $wgCommandLineMode;
 442
 443                 $this->setPageTitle( wfMsgNoDB( "databaseerror" ) );
 444                 $this->setRobotpolicy( "noindex,nofollow" );
 445                 $this->setArticleRelated( false );
 446
 447                 if ( $wgCommandLineMode ) {
 448                         $msg = wfMsgNoDB( "dberrortextcl" );
 449                 } else {
 450                         $msg = wfMsgNoDB( "dberrortext" );
 451                 }
 452
 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 );
 457
 458                 if ( $wgCommandLineMode ) {
 459                         print "$msg\n";
 460                         wfAbruptExit();
 461                 }
 462                 $sk = $wgUser->getSkin();
 463                 $shlink = $sk->makeKnownLink( wfMsgNoDB( "searchhelppage" ),
 464                   wfMsgNoDB( "searchingwikipedia" ) );
 465                 $msg = str_replace( "$5", $shlink, $msg );
 466
 467                 $this->mBodytext = $msg;
 468                 $this->output();
 469                 wfAbruptExit();
 470         }
 471
 472         function readOnlyPage( $source = "", $protected = false )
 473         {
 474                 global $wgUser, $wgReadOnlyFile;
 475
 476                 $this->setRobotpolicy( "noindex,nofollow" );
 477                 $this->setArticleRelated( false );
 478
 479                 if( $protected ) {
 480                         $this->setPageTitle( wfMsg( "viewsource" ) );
 481                         $this->addWikiText( wfMsg( "protectedtext" ) );
 482                 } else {
 483                         $this->setPageTitle( wfMsg( "readonly" ) );
 484                         $reason = file_get_contents( $wgReadOnlyFile );
 485                         $this->addHTML( wfMsg( "readonlytext", $reason ) );
 486                 }
 487
 488                 if($source) {
 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 );
 494                 }
 495
 496                 $this->returnToMain( false );
 497         }
 498
 499         function fatalError( $message )
 500         {
 501                 $this->setPageTitle( wfMsg( "internalerror" ) );
 502                 $this->setRobotpolicy( "noindex,nofollow" );
 503                 $this->setArticleRelated( false );
 504
 505                 $this->mBodytext = $message;
 506                 $this->output();
 507                 wfAbruptExit();
 508         }
 509
 510         function unexpectedValueError( $name, $val )
 511         {
 512                 $this->fatalError( wfMsg( "unexpected", $name, $val ) );
 513         }
 514
 515         function fileCopyError( $old, $new )
 516         {
 517                 $this->fatalError( wfMsg( "filecopyerror", $old, $new ) );
 518         }
 519
 520         function fileRenameError( $old, $new )
 521         {
 522                 $this->fatalError( wfMsg( "filerenameerror", $old, $new ) );
 523         }
 524
 525         function fileDeleteError( $name )
 526         {
 527                 $this->fatalError( wfMsg( "filedeleteerror", $name ) );
 528         }
 529
 530         function fileNotFoundError( $name )
 531         {
 532                 $this->fatalError( wfMsg( "filenotfound", $name ) );
 533         }
 534
 535         function returnToMain( $auto = true )
 536         {
 537                 global $wgUser, $wgOut, $returnto;
 538
 539                 $sk = $wgUser->getSkin();
 540                 if ( "" == $returnto ) {
 541                         $returnto = wfMsg( "mainpage" );
 542                 }
 543                 $link = $sk->makeKnownLink( $returnto, "" );
 544
 545                 $r = wfMsg( "returnto", $link );
 546                 if ( $auto ) {
 547                         $wgOut->addMeta( "http:Refresh", "10;url=" .
 548                           wfLocalUrlE( wfUrlencode( $returnto ) ) );
 549                 }
 550                 $wgOut->addHTML( "\n<p>$r\n" );
 551         }
 552
 553
 554         function categoryMagic ()
 555         {
 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" ;
 564
 565                 $articles = array() ;
 566                 $parents = array () ;
 567                 $children = array() ;
 568
 569
 570                 global $wgUser ;
 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 ) )
 575                 {
 576                 #  $t = new Title ;
 577                 #  $t->newFromDBkey ( $x->l_from ) ;
 578                 #  $t = $t->getText() ;
 579                         $t = $x->l_from ;
 580                         $y = explode ( ":" , $t , 2 ) ;
 581                         if ( count ( $y ) == 2 && $y[0] == $cat ) {
 582                                 array_push ( $children , $sk->makeLink ( $t , $y[1] ) ) ;
 583                         } else {
 584                                 array_push ( $articles , $sk->makeLink ( $t ) ) ;
 585                         }
 586                 }
 587                 wfFreeResult ( $res ) ;
 588
 589                 # Children
 590                 if ( count ( $children ) > 0 )
 591                 {
 592                         asort ( $children ) ;
 593                         $r .= "<h2>".wfMsg("subcategories")."</h2>\n" ;
 594                         $r .= implode ( ", " , $children ) ;
 595                 }
 596
 597                 # Articles
 598                 if ( count ( $articles ) > 0 )
 599                 {
 600                         asort ( $articles ) ;
 601                         $h =  wfMsg( "category_header", $ti[1] );
 602                         $r .= "<h2>{$h}</h2>\n" ;
 603                         $r .= implode ( ", " , $articles ) ;
 604                 }
 605
 606
 607                 return $r ;
 608         }
 609
 610 function getHTMLattrs ()
 611 {
 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 */
 623                 );
 624 return $htmlattrs ;
 625 }
 626
 627 function fixTagAttributes ( $t )
 628 {
 629         if ( trim ( $t ) == "" ) return "" ; # Saves runtime ;-)
 630         $htmlattrs = $this->getHTMLattrs() ;
 631
 632         # Strip non-approved attributes from the tag
 633         $t = preg_replace(
 634                 "/(\\w+)(\\s*=\\s*([^\\s\">]+|\"[^\">]*\"))?/e",
 635                 "(in_array(strtolower(\"\$1\"),\$htmlattrs)?(\"\$1\".((\"x\$3\" != \"x\")?\"=\$3\":'')):'')",
 636                 $t);
 637         # Strip javascript "expression" from stylesheets. Brute force approach:
 638         # If anythin offensive is found, all attributes of the HTML tag are dropped
 639
 640         if( preg_match(
 641                 "/style\\s*=.*(expression|tps*:\/\/|url\\s*\().*/is",
 642                 wfMungeToUtf8( $t ) ) )
 643         {
 644                 $t="";
 645         }
 646
 647         return trim ( $t ) ;
 648 }
 649
 650 function doTableStuff ( $t )
 651 {
 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 )
 658     {
 659       $x = rtrim ( $x ) ;
 660       $fc = substr ( $x , 0 , 1 ) ;
 661       if ( "{|" == substr ( $x , 0 , 2 ) )
 662         {
 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 , "" ) ;
 668         }
 669       else if ( count ( $td ) == 0 ) { } # Don't do any of the following
 670       else if ( "|}" == substr ( $x , 0 , 2 ) )
 671         {
 672           $z = "</table>\n" ;
 673           $l = array_pop ( $ltd ) ;
 674           if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
 675           if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
 676           array_pop ( $ltr ) ;
 677           $t[$k] = $z ;
 678         }
 679 /*      else if ( "|_" == substr ( $x , 0 , 2 ) ) # Caption
 680         {
 681         $z = trim ( substr ( $x , 2 ) ) ;
 682         $t[$k] = "<caption>{$z}</caption>\n" ;
 683         }*/
 684       else if ( "|-" == substr ( $x , 0 , 2 ) ) # Allows for |---------------
 685         {
 686           $x = substr ( $x , 1 ) ;
 687           while ( $x != "" && substr ( $x , 0 , 1 ) == '-' ) $x = substr ( $x , 1 ) ;
 688           $z = "" ;
 689           $l = array_pop ( $ltd ) ;
 690           if ( array_pop ( $tr ) ) $z = "</tr>" . $z ;
 691           if ( array_pop ( $td ) ) $z = "</{$l}>" . $z ;
 692           array_pop ( $ltr ) ;
 693           $t[$k] = $z ;
 694           array_push ( $tr , false ) ;
 695           array_push ( $td , false ) ;
 696           array_push ( $ltd , "" ) ;
 697           array_push ( $ltr , $this->fixTagAttributes ( $x ) ) ;
 698         }
 699       else if ( "|" == $fc || "!" == $fc || "|+" == substr ( $x , 0 , 2 ) ) # Caption
 700         {
 701           if ( "|+" == substr ( $x , 0 , 2 ) )
 702               {
 703               $fc = "+" ;
 704               $x = substr ( $x , 1 ) ;
 705               }
 706           $after = substr ( $x , 1 ) ;
 707           if ( $fc == "!" ) $after = str_replace ( "!!" , "||" , $after ) ;
 708           $after = explode ( "||" , $after ) ;
 709           $t[$k] = "" ;
 710           foreach ( $after AS $theline )
 711              {
 712           $z = "" ;
 713           $tra = array_pop ( $ltr ) ;
 714           if ( !array_pop ( $tr ) ) $z = "<tr {$tra}>\n" ;
 715           array_push ( $tr , true ) ;
 716           array_push ( $ltr , "" ) ;
 717
 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" ;
 723           else $l = "" ;
 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]}" ;
 728           $t[$k] .= $y ;
 729           array_push ( $td , true ) ;
 730              }
 731         }
 732     }
 733
 734 # Closing open td, tr && table
 735 while ( count ( $td ) > 0 )
 736 {
 737 if ( array_pop ( $td ) ) $t[] = "</td>" ;
 738 if ( array_pop ( $tr ) ) $t[] = "</tr>" ;
 739 $t[] = "</table>" ;
 740 }
 741
 742   $t = implode ( "\n" , $t ) ;
 743 #               $t = $this->removeHTMLtags( $t );
 744   return $t ;
 745 }
 746
 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.
 750         #
 751         function doWikiPass2( $text, $linestart )
 752         {
 753                 global $wgUser, $wgLang, $wgUseDynamicDates;
 754                 $fname = "OutputPage::doWikiPass2";
 755                 wfProfileIn( $fname );
 756
 757                 $text = $this->removeHTMLtags( $text );
 758                 $text = $this->replaceVariables( $text );
 759
 760                 $text = preg_replace( "/(^|\n)-----*/", "\\1<hr>", $text );
 761                 $text = str_replace ( "<HR>", "<hr>", $text );
 762
 763                 $text = $this->doAllQuotes( $text );
 764                 $text = $this->doHeadings( $text );
 765                 $text = $this->doBlockLevels( $text, $linestart );
 766
 767                 if($wgUseDynamicDates) {
 768                         global $wgDateFormatter;
 769                         $text = $wgDateFormatter->reformat( $wgUser->getOption("date"), $text );
 770                 }
 771
 772                 $text = $this->replaceExternalLinks( $text );
 773                 $text = $this->replaceInternalLinks ( $text );
 774                 $text = $this->doTableStuff ( $text ) ;
 775
 776                 $text = $this->magicISBN( $text );
 777                 $text = $this->magicRFC( $text );
 778                 $text = $this->formatHeadings( $text );
 779
 780                 $sk = $wgUser->getSkin();
 781                 $text = $sk->transformContent( $text );
 782                 $text .= $this->categoryMagic () ;
 783
 784                 wfProfileOut( $fname );
 785                 return $text;
 786         }
 787
 788         /* private */ function doAllQuotes( $text )
 789         {
 790                 $outtext = "";
 791                 $lines = explode( "\r\n", $text );
 792                 foreach ( $lines as $line ) {
 793                         $outtext .= $this->doQuotes ( "", $line, "" ) . "\r\n";
 794                 }
 795                 return $outtext;
 796         }
 797
 798         /* private */ function doQuotes( $pre, $text, $mode )
 799         {
 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);
 805                                 if ($mode == "em") {
 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" );
 813                                 } else {
 814                                         return $m[1] . $this->doQuotes ( "", $m[2], "strong" );
 815                                 }
 816                         } else {
 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" );
 825                                 } else {
 826                                         return $m[1] . $this->doQuotes ( "", $m[2], "em" );
 827                                 }
 828                         }
 829                 } else {
 830                         $text_strong = ($text == "") ? "" : "<strong>{$text}</strong>";
 831                         $text_em = ($text == "") ? "" : "<em>{$text}</em>";
 832                         if ($mode == "") {
 833                                 return $pre . $text;
 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>";
 840                         } else {
 841                                 return (($pre == "") && ($text == "")) ? "" : "<em>{$pre}{$text_strong}</em>";
 842                         }
 843                 }
 844         }
 845
 846         /* private */ function doHeadings( $text )
 847         {
 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 );
 852                 }
 853                 return $text;
 854         }
 855
 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.
 859
 860         /* private */ function replaceExternalLinks( $text )
 861         {
 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 );
 871                 return $text;
 872         }
 873
 874         /* private */ function subReplaceExternalLinks( $s, $protocol, $autonumber )
 875         {
 876                 global $wgUser, $printable;
 877                 global $wgAllowExternalImages;
 878
 879
 880                 $unique = "4jzAfzB8hNvf4sqyO9Edd8pSmk9rE2in0Tgw3";
 881                 $uc = "A-Za-z0-9_\\/~%\\-+&*#?!=()@\\x80-\\xFF";
 882
 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.
 888                 $sep = ",;\.:";
 889                 $fnc = "A-Za-z0-9_.,~%\\-+&;#*?!=()@\\x80-\\xFF";
 890                 $images = "gif|png|jpg|jpeg";
 891
 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}]|$)/";
 897
 898                 $e2 = "/(^|[^\\[])({$protocol}:)(([".$uc."]|[".$sep."][".$uc."])+)([^". $uc . $sep. "]|[".$sep."]|$)/";
 899                 $sk = $wgUser->getSkin();
 900
 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 );
 904                 }
 905                 $s = preg_replace( $e2, "\\1" . "<a href=\"{$unique}:\\3\"" .
 906                   $sk->getExternalLinkAttributes( "{$unique}:\\3", wfEscapeHTML(
 907                   "{$unique}:\\3" ) ) . ">" . wfEscapeHTML( "{$unique}:\\3" ) .
 908                   "</a>\\5", $s );
 909                 $s = str_replace( $unique, $protocol, $s );
 910
 911                 $a = explode( "[{$protocol}:", " " . $s );
 912                 $s = array_shift( $a );
 913                 $s = substr( $s, 1 );
 914
 915                 $e1 = "/^([{$uc}"."{$sep}]+)](.*)\$/sD";
 916                 $e2 = "/^([{$uc}"."{$sep}]+)\\s+([^\\]]+)](.*)\$/sD";
 917
 918                 foreach ( $a as $line ) {
 919                         if ( preg_match( $e1, $line, $m ) ) {
 920                                 $link = "{$protocol}:{$m[1]}";
 921                                 $trail = $m[2];
 922                                 if ( $autonumber ) { $text = "[" . ++$this->mAutonumber . "]"; }
 923                                 else { $text = wfEscapeHTML( $link ); }
 924                         } else if ( preg_match( $e2, $line, $m ) ) {
 925                                 $link = "{$protocol}:{$m[1]}";
 926                                 $text = $m[2];
 927                                 $trail = $m[3];
 928                         } else {
 929                                 $s .= "[{$protocol}:" . $line;
 930                                 continue;
 931                         }
 932                         if ( $printable == "yes") $paren = " (<i>" . htmlspecialchars ( $link ) . "</i>)";
 933                         else $paren = "";
 934                         $la = $sk->getExternalLinkAttributes( $link, $text );
 935                         $s .= "<a href='{$link}'{$la}>{$text}</a>{$paren}{$trail}";
 936
 937                 }
 938                 return $s;
 939         }
 940
 941         /* private */ function replaceInternalLinks( $s )
 942         {
 943                 global $wgTitle, $wgUser, $wgLang;
 944                 global $wgLinkCache, $wgInterwikiMagic, $wgUseCategoryMagic;
 945                 global $wgNamespacesWithSubpages, $wgLanguageCode;
 946                 wfProfileIn( $fname = "OutputPage::replaceInternalLinks" );
 947
 948                 wfProfileIn( "$fname-setup" );
 949                 $tc = Title::legalChars() . "#";
 950                 $sk = $wgUser->getSkin();
 951
 952                 $a = explode( "[[", " " . $s );
 953                 $s = array_shift( $a );
 954                 $s = substr( $s, 1 );
 955
 956                 $e1 = "/^([{$tc}]+)(?:\\|([^]]+))?]](.*)\$/sD";
 957
 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" );
 964
 965                 foreach ( $a as $line ) {
 966                         if ( preg_match( $e1, $line, $m ) ) { # page with normal text or alt
 967                                 $text = $m[2];
 968                                 $trail = $m[3];
 969                         } else { # Invalid form; output directly
 970                                 $s .= "[[" . $line ;
 971                                 continue;
 972                         }
 973
 974                         /* Valid link forms:
 975                         Foobar -- normal
 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
 979                         */
 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);
 985                                         $noslash=$m[1];
 986                                 } else {
 987                                         $noslash=substr($m[1],1);
 988                                 }
 989                                 if($wgNamespacesWithSubpages[$wgTitle->getNamespace()]) { # subpages allowed here
 990                                         $link = $wgTitle->getPrefixedText(). "/" . trim($noslash);
 991                                         if( "" == $text ) {
 992                                                 $text= $m[1];
 993                                         } # this might be changed for ugliness reasons
 994                                 } else {
 995                                         $link = $noslash; # no subpage allowed, use standard link
 996                                 }
 997                         } elseif( $noforce ) { # no subpage
 998                                 $link = $m[1];
 999                         } else {
1000                                 $link = substr( $m[1], 1 );
1001                         }
1002                         if( "" == $text )
1003                                 $text = $link;
1004
1005                         $nt = Title::newFromText( $link );
1006                         if( !$nt ) {
1007                                 $s .= "[[" . $line;
1008                                 continue;
1009                         }
1010                         $ns = $nt->getNamespace();
1011                         $iw = $nt->getInterWiki();
1012                         if( $noforce ) {
1013                                 if( $iw && $wgInterwikiMagic && $nottalk && $wgLang->getLanguageName( $iw ) ) {
1014                                         array_push( $this->mLanguageLinks, $nt->getPrefixedText() );
1015                                         $s .= $trail;
1016 /* CHECK MERGE @@@
1017                                 } else if ( "media" == $pre ) {
1018                                         $nt = Title::newFromText( $suf );
1019                                         $name = $nt->getDBkey();
1020                                         if ( "" == $text ) { $text = $nt->GetText(); }
1021
1022                                         $wgLinkCache->addImageLink( $name );
1023                                         $s .= $sk->makeMediaLink( $name,
1024                                           wfImageUrl( $name ), $text );
1025                                         $s .= $trail;
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 ) ;
1029                                         $s .= $trail ;
1030                                 } else {
1031                                         $l = $wgLang->getLanguageName( $pre );
1032                                         if ( "" == $l or !$wgInterwikiMagic or Namespace::isTalk( $wgTitle->getNamespace() ) ) {
1033                                                 if ( "" == $text ) {
1034                                                         $text = $link;
1035                                                 }
1036                                                 $s .= $sk->makeLink( $link, $text, "", $trail );
1037                                         } else if ( $pre != $wgLanguageCode ) {
1038                                                 array_push( $this->mLanguageLinks, "$pre:$suf" );
1039                                                 $s .= $trail;
1040                                         }
1041 */
1042                                         continue;
1043                                 }
1044                                 if( $ns == $image ) {
1045                                         $s .= $sk->makeImageLinkObj( $nt, $text ) . $trail;
1046                                         $wgLinkCache->addImageLinkObj( $nt );
1047                                         continue;
1048                                 }
1049 /* CHECK MERGE @@@
1050 #                       } else if ( 0 == strcmp( "##", substr( $link, 0, 2 ) ) ) {
1051 #                               $link = substr( $link, 2 );
1052 #                               $s .= "<a name=\"{$link}\">{$text}</a>{$trail}";
1053                         } else {
1054                                 if ( "" == $text ) { $text = $link; }
1055                                 # Hotspot:
1056                                 $s .= $sk->makeLink( $link, $text, "", $trail );
1057 */
1058                         }
1059                         if( $ns == $media ) {
1060                                 $s .= $sk->makeMediaLinkObj( $nt, $text ) . $trail;
1061                                 $wgLinkCache->addImageLinkObj( $nt );
1062                                 continue;
1063                         } elseif( $ns == $special ) {
1064                                 $s .= $sk->makeKnownLinkObj( $nt, $text, "", $trail );
1065                                 continue;
1066                         }
1067                         $s .= $sk->makeLinkObj( $nt, $text, "", $trail );
1068                 }
1069                 wfProfileOut( $fname );
1070                 return $s;
1071         }
1072
1073         # Some functions here used by doBlockLevels()
1074         #
1075         /* private */ function closeParagraph()
1076         {
1077                 $result = "";
1078                 if ( 0 != strcmp( "p", $this->mLastSection ) &&
1079                   0 != strcmp( "", $this->mLastSection ) ) {
1080                         $result = "</" . $this->mLastSection  . ">";
1081                 }
1082                 $this->mLastSection = "";
1083                 return $result."\n";
1084         }
1085         # getCommon() returns the length of the longest common substring
1086         # of both arguments, starting at the beginning of both.
1087         #
1088         /* private */ function getCommon( $st1, $st2 )
1089         {
1090                 $fl = strlen( $st1 );
1091                 $shorter = strlen( $st2 );
1092                 if ( $fl < $shorter ) { $shorter = $fl; }
1093
1094                 for ( $i = 0; $i < $shorter; ++$i ) {
1095                         if ( $st1{$i} != $st2{$i} ) { break; }
1096                 }
1097                 return $i;
1098         }
1099         # These next three functions open, continue, and close the list
1100         # element appropriate to the prefix character passed into them.
1101         #
1102         /* private */ function openList( $char )
1103     {
1104                 $result = $this->closeParagraph();
1105
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;
1112                 }
1113                 else { $result = "<!-- ERR 1 -->"; }
1114
1115                 return $result;
1116         }
1117
1118         /* private */ function nextItem( $char )
1119         {
1120                 if ( "*" == $char || "#" == $char ) { return "</li><li>"; }
1121                 else if ( ":" == $char || ";" == $char ) {
1122                         $close = "</dd>";
1123                         if ( $this->mDTopen ) { $close = "</dt>"; }
1124                         if ( ";" == $char ) {
1125                                 $this->mDTopen = true;
1126                                 return $close . "<dt>";
1127                         } else {
1128                                 $this->mDTopen = false;
1129                                 return $close . "<dd>";
1130                         }
1131                 }
1132                 return "<!-- ERR 2 -->";
1133         }
1134
1135         /* private */function closeList( $char )
1136         {
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>";
1143                         } else {
1144                                 $text = "</dd></dl>";
1145                         }
1146                 }
1147                 else {  return "<!-- ERR 3 -->"; }
1148                 return $text."\n";
1149         }
1150
1151         /* private */ function doBlockLevels( $text, $linestart )
1152         {
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.
1158                 #
1159                 $a = explode( "\n", $text );
1160                 $text = $lastPref = "";
1161                 $this->mDTopen = $inBlockElem = false;
1162
1163                 if ( ! $linestart ) { $text .= array_shift( $a ); }
1164                 foreach ( $a as $t ) {
1165                         if ( "" != $text ) { $text .= "\n"; }
1166
1167                         $oLine = $t;
1168                         $opl = strlen( $lastPref );
1169                         $npl = strspn( $t, "*#:;" );
1170                         $pref = substr( $t, 0, $npl );
1171                         $pref2 = str_replace( ";", ":", $pref );
1172                         $t = substr( $t, $npl );
1173
1174                         if ( 0 != $npl && 0 == strcmp( $lastPref, $pref2 ) ) {
1175                                 $text .= $this->nextItem( substr( $pref, -1 ) );
1176
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 );
1183                                         }
1184                                 }
1185                         } else if (0 != $npl || 0 != $opl) {
1186                                 $cpl = $this->getCommon( $pref, $lastPref );
1187
1188                                 while ( $cpl < $opl ) {
1189                                         $text .= $this->closeList( $lastPref{$opl-1} );
1190                                         --$opl;
1191                                 }
1192                                 if ( $npl <= $cpl && $cpl > 0 ) {
1193                                         $text .= $this->nextItem( $pref{$cpl-1} );
1194                                 }
1195                                 while ( $npl > $cpl ) {
1196                                         $char = substr( $pref, $cpl, 1 );
1197                                         $text .= $this->openList( $char );
1198
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 );
1205                                                 }
1206                                         }
1207                                         ++$cpl;
1208                                 }
1209                                 $lastPref = $pref2;
1210                         }
1211                         if ( 0 == $npl ) { # No prefix--go to paragraph mode
1212                                 if ( preg_match(
1213                                   "/(<table|<blockquote|<h1|<h2|<h3|<h4|<h5|<h6)/i", $t ) ) {
1214                                         $text .= $this->closeParagraph();
1215                                         $inBlockElem = true;
1216                                 }
1217                                 if ( ! $inBlockElem ) {
1218                                         if ( " " == $t{0} ) {
1219                                                 $newSection = "pre";
1220                                                 # $t = wfEscapeHTML( $t );
1221                                         }
1222                                         else { $newSection = "p"; }
1223
1224                                         if ( 0 == strcmp( "", trim( $oLine ) ) ) {
1225                                                 $text .= $this->closeParagraph();
1226                                                 $text .= "<" . $newSection . ">";
1227                                         } else if ( 0 != strcmp( $this->mLastSection,
1228                                           $newSection ) ) {
1229                                                 $text .= $this->closeParagraph();
1230                                                 if ( 0 != strcmp( "p", $newSection ) ) {
1231                                                         $text .= "<" . $newSection . ">";
1232                                                 }
1233                                         }
1234                                         $this->mLastSection = $newSection;
1235                                 }
1236                                 if ( $inBlockElem &&
1237                                   preg_match( "/(<\\/table|<\\/blockquote|<\\/h1|<\\/h2|<\\/h3|<\\/h4|<\\/h5|<\\/h6)/i", $t ) ) {
1238                                         $inBlockElem = false;
1239                                 }
1240                         }
1241                         $text .= $t;
1242                 }
1243                 while ( $npl ) {
1244                         $text .= $this->closeList( $pref2{$npl-1} );
1245                         --$npl;
1246                 }
1247                 if ( "" != $this->mLastSection ) {
1248                         if ( "p" != $this->mLastSection ) {
1249                                 $text .= "</" . $this->mLastSection . ">";
1250                         }
1251                         $this->mLastSection = "";
1252                 }
1253                 wfProfileOut( $fname );
1254                 return $text;
1255         }
1256
1257         /* private */ function replaceVariables( $text )
1258         {
1259                 global $wgLang;
1260                 $fname = "OutputPage::replaceVariables";
1261                 wfProfileIn( $fname );
1262
1263                 $magic = array();
1264
1265                 # Basic variables
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!
1269
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 );
1277
1278                 $this->mContainsOldMagic += MagicWord::replaceMultiple($magic, $text, $text);
1279
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++; }
1285                 }
1286
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++; }
1292
1293                 $mw =& MagicWord::get( MAG_MSGNW );
1294                 $text = $mw->substituteCallback( $text, "wfReplaceMsgnwVar" );
1295                 if( $mw->getWasModified() ) { $this->mContainsNewMagic++; }
1296
1297                 wfProfileOut( $fname );
1298                 return $text;
1299         }
1300
1301         # Cleans up HTML, removes dangerous tags and attributes
1302         /* private */ function removeHTMLtags( $text )
1303         {
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"
1312                 );
1313                 $htmlsingle = array(
1314                         "br", "p", "hr", "li", "dt", "dd"
1315                 );
1316                 $htmlnest = array( # Tags that can be nested--??
1317                         "table", "tr", "td", "th", "div", "blockquote", "ol", "ul",
1318                         "dl", "font", "big", "small", "sub", "sup"
1319                 );
1320                 $tabletags = array( # Can only appear inside table
1321                         "td", "th", "tr"
1322                 );
1323
1324                 $htmlsingle = array_merge( $tabletags, $htmlsingle );
1325                 $htmlelements = array_merge( $htmlsingle, $htmlpairs );
1326
1327                 $htmlattrs = $this->getHTMLattrs () ;
1328
1329                 # Remove HTML comments
1330                 $text = preg_replace( "/<!--.*-->/sU", "", $text );
1331
1332                 $bits = explode( "<", $text );
1333                 $text = array_shift( $bits );
1334                 $tagstack = array(); $tablestack = array();
1335
1336                 foreach ( $bits as $x ) {
1337                         $prev = error_reporting( E_ALL & ~( E_NOTICE | E_WARNING ) );
1338                         preg_match( "/^(\\/?)(\\w+)([^>]*)(\\/{0,1}>)([^<]*)$/",
1339                           $x, $regs );
1340                         list( $qbar, $slash, $t, $params, $brace, $rest ) = $regs;
1341                         error_reporting( $prev );
1342
1343                         $badtag = 0 ;
1344                         if ( in_array( $t = strtolower( $t ), $htmlelements ) ) {
1345                                 # Check our stack
1346                                 if ( $slash ) {
1347                                         # Closing a tag...
1348                                         if ( ! in_array( $t, $htmlsingle ) &&
1349                                           ( $ot = array_pop( $tagstack ) ) != $t ) {
1350                                                 array_push( $tagstack, $ot );
1351                                                 $badtag = 1;
1352                                         } else {
1353                                                 if ( $t == "table" ) {
1354                                                         $tagstack = array_pop( $tablestack );
1355                                                 }
1356                                                 $newparams = "";
1357                                         }
1358                                 } else {
1359                                         # Keep track for later
1360                                         if ( in_array( $t, $tabletags ) &&
1361                                           ! in_array( "table", $tagstack ) ) {
1362                                                 $badtag = 1;
1363                                         } else if ( in_array( $t, $tagstack ) &&
1364                                           ! in_array ( $t , $htmlnest ) ) {
1365                                                 $badtag = 1 ;
1366                                         } else if ( ! in_array( $t, $htmlsingle ) ) {
1367                                                 if ( $t == "table" ) {
1368                                                         array_push( $tablestack, $tagstack );
1369                                                         $tagstack = array();
1370                                                 }
1371                                                 array_push( $tagstack, $t );
1372                                         }
1373                                         # Strip non-approved attributes from the tag
1374                                         $newparams = $this->fixTagAttributes($params);
1375
1376                                 }
1377                                 if ( ! $badtag ) {
1378                                         $rest = str_replace( ">", "&gt;", $rest );
1379                                         $text .= "<$slash$t $newparams$brace$rest";
1380                                         continue;
1381                                 }
1382                         }
1383                         $text .= "&lt;" . str_replace( ">", "&gt;", $x);
1384                 }
1385                 # Close off any remaining tags
1386                 while ( $t = array_pop( $tagstack ) ) {
1387                         $text .= "</$t>\n";
1388                         if ( $t == "table" ) { $tagstack = array_pop( $tablestack ); }
1389                 }
1390                 wfProfileOut( $fname );
1391                 return $text;
1392         }
1393
1394 /*
1395  *
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
1401  *
1402  * It loops through all headlines, collects the necessary data, then splits up the
1403  * string and re-inserts the newly formatted headlines.
1404  *
1405  * */
1406         /* private */ function formatHeadings( $text )
1407         {
1408                 global $wgUser,$wgArticle,$wgTitle,$wpPreview;
1409                 $nh=$wgUser->getOption( "numberheadings" );
1410                 $st=$wgUser->getOption( "showtoc" );
1411                 if(!$wgTitle->userCanEdit()) {
1412                         $es=0;
1413                         $esr=0;
1414                 } else {
1415                         $es=$wgUser->getID() && $wgUser->getOption( "editsection" );
1416                         $esr=$wgUser->getID() && $wgUser->getOption( "editsectiononrightclick" );
1417                 }
1418
1419                 # Inhibit editsection links if requested in the page
1420                 $esw =& MagicWord::get( MAG_NOEDITSECTION );
1421                 if ($esw->matchAndRemove( $text )) {
1422                         $es=0;
1423                 }
1424                 # if the string __NOTOC__ (not case-sensitive) occurs in the HTML,
1425                 # do not add TOC
1426                 $mw =& MagicWord::get( MAG_NOTOC );
1427                 if ($mw->matchAndRemove( $text ))
1428                 {
1429                         $st = 0;
1430                 }
1431
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;}
1435
1436                 # We need this to perform operations on the HTML
1437                 $sk=$wgUser->getSkin();
1438
1439                 # Get all headlines for numbering them and adding funky stuff like [edit]
1440                 # links
1441                 preg_match_all("/<H([1-6])(.*?>)(.*?)<\/H[1-6]>/i",$text,$matches);
1442
1443                 # headline counter
1444                 $c=0;
1445
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) {
1452
1453                                 $h[$level]=0; // reset when we enter a new level
1454                                 $toc.=$sk->tocIndent($level-$prevlevel);
1455                                 $toclevel+=$level-$prevlevel;
1456
1457                         }
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;
1462
1463                         }
1464                         $h[$level]++; // count number of headlines for each level
1465
1466                         if($nh||$st) {
1467                                 for($i=1;$i<=$level;$i++) {
1468                                         if($h[$i]) {
1469                                                 if($dot) {$numbering.=".";}
1470                                                 $numbering.=$h[$i];
1471                                                 $dot=1;
1472                                         }
1473                                 }
1474                         }
1475
1476                         // The canonized header is a version of the header text safe to use for links
1477
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];
1485
1486             // Prepend the number to the heading text
1487
1488                         if($nh||$st) {
1489                                 $tocline=$numbering ." ". $tocline;
1490
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
1494                                 }
1495                         }
1496
1497                         // Create the anchor for linking from the TOC to the section
1498
1499                         $anchor=$canonized_headline;
1500                         if($refcount[$c]>1) {$anchor.="_".$refcount[$c];}
1501                         if($st) {
1502                                 $toc.=$sk->tocLine($anchor,$tocline,$toclevel);
1503                         }
1504                         if($es && !isset($wpPreview)) {
1505                                 $head[$c].=$sk->editSectionLink($c+1);
1506                         }
1507
1508                         // Put it all together
1509
1510                         $head[$c].="<h".$level.$matches[2][$c]
1511                          ."<a name=\"".$anchor."\">"
1512                          .$headline
1513                          ."</a>"
1514                          ."</h".$level.">";
1515
1516                         // Add the edit section link
1517
1518                         if($esr && !isset($wpPreview)) {
1519                                 $head[$c]=$sk->editSectionScript($c+1,$head[$c]);
1520                         }
1521
1522                         $numbering="";
1523                         $c++;
1524                         $dot=0;
1525                 }
1526
1527                 if($st) {
1528                         $toclines=$c;
1529                         $toc.=$sk->tocUnindent($toclevel);
1530                         $toc=$sk->tocTable($toc);
1531                 }
1532
1533                 // split up and insert constructed headlines
1534
1535                 $blocks=preg_split("/<H[1-6].*?>.*?<\/H[1-6]>/i",$text);
1536                 $i=0;
1537
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);
1543                         }
1544                         $full.=$block;
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;
1548                         }
1549
1550                         $full.=$head[$i];
1551                         $i++;
1552                 }
1553
1554                 return $full;
1555         }
1556
1557         /* private */ function magicISBN( $text )
1558         {
1559                 global $wgLang;
1560
1561                 $a = split( "ISBN ", " $text" );
1562                 if ( count ( $a ) < 2 ) return $text;
1563                 $text = substr( array_shift( $a ), 1);
1564                 $valid = "0123456789-ABCDEFGHIJKLMNOPQRSTUVWXYZ";
1565
1566                 foreach ( $a as $x ) {
1567                         $isbn = $blank = "" ;
1568                         while ( " " == $x{0} ) {
1569                                 $blank .= " ";
1570                                 $x = substr( $x, 1 );
1571                         }
1572                         while ( strstr( $valid, $x{0} ) != false ) {
1573                                 $isbn .= $x{0};
1574                                 $x = substr( $x, 1 );
1575                         }
1576                         $num = str_replace( "-", "", $isbn );
1577                         $num = str_replace( " ", "", $num );
1578
1579                         if ( "" == $num ) {
1580                                 $text .= "ISBN $blank$x";
1581                         } else {
1582                                 $text .= "<a href=\"" . wfLocalUrlE( $wgLang->specialPage(
1583                                   "Booksources"), "isbn={$num}" ) . "\" class=\"internal\">ISBN $isbn</a>";
1584                                 $text .= $x;
1585                         }
1586                 }
1587                 return $text;
1588         }
1589
1590         /* private */ function magicRFC( $text )
1591         {
1592                 return $text;
1593         }
1594
1595         /* private */ function headElement()
1596         {
1597                 global $wgDocType, $wgDTD, $wgUser, $wgLanguageCode, $wgOutputEncoding, $wgLang;
1598
1599                 $ret = "<!DOCTYPE HTML PUBLIC \"$wgDocType\"\n        \"$wgDTD\">\n";
1600
1601                 if ( "" == $this->mHTMLtitle ) {
1602                         $this->mHTMLtitle = $this->mPagetitle;
1603                 }
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 ) ) ) {
1609                                 $a = "http-equiv";
1610                                 $tag[0] = substr( $tag[0], 5 );
1611                         } else {
1612                                 $a = "name";
1613                         }
1614                         $ret .= "<meta $a=\"{$tag[0]}\" content=\"{$tag[1]}\">\n";
1615                 }
1616                 $p = $this->mRobotpolicy;
1617                 if ( "" == $p ) { $p = "index,follow"; }
1618                 $ret .= "<meta name=\"robots\" content=\"$p\">\n";
1619
1620                 if ( count( $this->mKeywords ) > 0 ) {
1621                         $ret .= "<meta name=\"keywords\" content=\"" .
1622                           implode( ",", $this->mKeywords ) . "\">\n";
1623                 }
1624                 foreach ( $this->mLinktags as $tag ) {
1625                         $ret .= "<link ";
1626                         if ( "" != $tag[0] ) { $ret .= "rel=\"{$tag[0]}\" "; }
1627                         if ( "" != $tag[1] ) { $ret .= "rev=\"{$tag[1]}\" "; }
1628                         $ret .= "href=\"{$tag[2]}\">\n";
1629                 }
1630                 $sk = $wgUser->getSkin();
1631                 $ret .= $sk->getHeadScripts();
1632                 $ret .= $sk->getUserStyles();
1633
1634                 $ret .= "</head>\n";
1635                 return $ret;
1636         }
1637
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 );
1645                 if( $row ){
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 );
1651                         return true;
1652                 } else {
1653                         return false;
1654                 }
1655         }
1656
1657         /* private */ function saveParserCache( $text ){
1658                 global $wgUser, $wgArticle;
1659                 $hash = $wgUser->getPageRenderingHash();
1660                 $pageid = intval( $wgArticle->getID() );
1661                 $title = wfStrencode( $wgArticle->mTitle->getPrefixedDBKey() );
1662                 $data = array();
1663                 $data['html'] = $text;
1664                 $data['mLanguageLinks'] = $this->mLanguageLinks;
1665                 $data['mCategoryLinks'] = $this->mCategoryLinks;
1666                 $ser = addslashes( gzcompress( serialize( $data ) ) );
1667                 if( $this->mContainsOldMagic ){
1668                         $expire = "1 HOUR";
1669                 } else if( $this->mContainsNewMagic ){
1670                         $expire = "1 DAY";
1671                 } else {
1672                         $expire = "7 DAY";
1673                 }
1674
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);
1678
1679                 if( rand() % 50 == 0 ){ // more efficient to just do it sometimes
1680                         $this->purgeParserCache();
1681                 }
1682         }
1683
1684         /* static private */ function purgeParserCache(){
1685                 wfQuery("DELETE FROM parsercache WHERE pc_expire < NOW() LIMIT 250", DB_WRITE);
1686         }
1687
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);
1693         }
1694
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);
1700         }
1701
1702         # $pid is a page id
1703         /* static */ function parsercacheClearPage( $pid ){
1704                 $pid = intval( $pid );
1705                 wfQuery("DELETE FROM parsercache WHERE pc_pageid='{$pid}'", DB_WRITE);
1706         }
1707 }
1708
1709 # Regex callbacks, used in OutputPage::replaceVariables
1710
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 ) {
1715         global $wgOut;
1716         $text = $wgOut->removeHTMLtags( wfMsg( $matches[1] ) );
1717         return $text;
1718 }
1719
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] ) );
1724         return $text;
1725 }
1726
1727 ?>