fixes #22501 follow up r61101 remove superfluous, buggy code that was over-rideing...
[lhc/web/wiklou.git] / includes / parser / Parser.php
index a5e721d..298aa3d 100644 (file)
@@ -15,7 +15,7 @@
  * (which in turn the browser understands, and can display).
  *
  * <pre>
- * There are five main entry points into the Parser class:
+ * There are six main entry points into the Parser class:
  * parse()
  *   produces HTML output
  * preSaveTransform().
@@ -26,6 +26,8 @@
  *   Cleans a signature before saving it to preferences
  * extractSections()
  *   Extracts sections from an article for section editing
+ * getTransclusionText()
+ *   Extracts the text of a template with only <includeonly>, etc., parsed
  *
  * Globals used:
  *    objects:   $wgLang, $wgContLang
@@ -82,6 +84,7 @@ class Parser
        const OT_WIKI = 2;
        const OT_PREPROCESS = 3;
        const OT_MSG = 3;
+       const OT_INCLUDES = 4;
 
        // Marker Suffix needs to be accessible staticly.
        const MARKER_SUFFIX = "-QINU\x7f";
@@ -91,8 +94,9 @@ class Parser
         */
        # Persistent:
        var $mTagHooks, $mTransparentTagHooks, $mFunctionHooks, $mFunctionSynonyms, $mVariables,
-               $mImageParams, $mImageParamsMagicArray, $mStripList, $mMarkerIndex, $mPreprocessor,
-               $mExtLinkBracketedRegex, $mUrlProtocols, $mDefaultStripList, $mVarCache, $mConf;
+               $mSubstWords, $mImageParams, $mImageParamsMagicArray, $mStripList, $mMarkerIndex,
+               $mPreprocessor, $mExtLinkBracketedRegex, $mUrlProtocols, $mDefaultStripList,
+               $mVarCache, $mConf, $mFunctionTagHooks;
 
 
        # Cleared with clearState():
@@ -103,7 +107,6 @@ class Parser
        var $mTplExpandCache; // empty-frame expansion cache
        var $mTplRedirCache, $mTplDomCache, $mHeadings, $mDoubleUnderscores;
        var $mExpensiveFunctionCount; // number of expensive parser function calls
-       var $mFileCache;
 
        # Temporary
        # These are variables reset at least once per parse regardless of $clearState
@@ -127,8 +130,9 @@ class Parser
                $this->mTagHooks = array();
                $this->mTransparentTagHooks = array();
                $this->mFunctionHooks = array();
+               $this->mFunctionTagHooks = array();
                $this->mFunctionSynonyms = array( 0 => array(), 1 => array() );
-               $this->mDefaultStripList = $this->mStripList = array( 'nowiki', 'gallery' );
+               $this->mDefaultStripList = $this->mStripList = array();
                $this->mUrlProtocols = wfUrlProtocols();
                $this->mExtLinkBracketedRegex = '/\[(\b(' . wfUrlProtocols() . ')'.
                        '[^][<>"\\x00-\\x20\\x7F]+) *([^\]\\x0a\\x0d]*?)\]/S';
@@ -171,8 +175,8 @@ class Parser
 
                wfProfileIn( __METHOD__ );
 
-               $this->setHook( 'pre', array( $this, 'renderPreTag' ) );
                CoreParserFunctions::register( $this );
+               CoreTagHooks::register( $this );
                $this->initialiseVariables();
 
                wfRunHooks( 'ParserFirstCallInit', array( &$this ) );
@@ -200,6 +204,7 @@ class Parser
                $this->mLinkHolders = new LinkHolderArray( $this );
                $this->mLinkID = 0;
                $this->mRevisionTimestamp = $this->mRevisionId = null;
+               $this->mVarCache = array();
 
                /**
                 * Prefix for temporary replacement strings for the multipass parser.
@@ -230,7 +235,6 @@ class Parser
                $this->mHeadings = array();
                $this->mDoubleUnderscores = array();
                $this->mExpensiveFunctionCount = 0;
-               $this->mFileCache = array();
 
                # Fix cloning
                if ( isset( $this->mPreprocessor ) && $this->mPreprocessor->parser !== $this ) {
@@ -255,9 +259,10 @@ class Parser
         * Set the context title
         */
        function setTitle( $t ) {
-               if ( !$t || $t instanceof FakeTitle ) {
-                       $t = Title::newFromText( 'NO TITLE' );
-               }
+               if ( !$t || $t instanceof FakeTitle ) {
+                       $t = Title::newFromText( 'NO TITLE' );
+               }
+
                if ( strval( $t->getFragment() ) !== '' ) {
                        # Strip the fragment to avoid various odd effects
                        $this->mTitle = clone $t;
@@ -274,7 +279,7 @@ class Parser
         */
        function uniqPrefix() {
                if( !isset( $this->mUniqPrefix ) ) {
-                       // @fixme this is probably *horribly wrong*
+                       // @todo Fixme: this is probably *horribly wrong*
                        // LanguageConverter seems to want $wgParser's uniqPrefix, however
                        // if this is called for a parser cache hit, the parser may not
                        // have ever been initialized in the first place.
@@ -303,7 +308,7 @@ class Parser
                 * to internalParse() which does all the real work.
                 */
 
-               global $wgUseTidy, $wgAlwaysUseTidy, $wgContLang;
+               global $wgUseTidy, $wgAlwaysUseTidy, $wgContLang, $wgDisableLangConversion;
                $fname = __METHOD__.'-' . wfGetCaller();
                wfProfileIn( __METHOD__ );
                wfProfileIn( $fname );
@@ -313,7 +318,8 @@ class Parser
                }
 
                $this->mOptions = $options;
-               $this->setTitle( $title );
+               $this->setTitle( $title ); // Page title has to be set for the pre-processor
+
                $oldRevisionId = $this->mRevisionId;
                $oldRevisionTimestamp = $this->mRevisionTimestamp;
                if( $revid !== null ) {
@@ -325,6 +331,7 @@ class Parser
                # No more strip!
                wfRunHooks( 'ParserAfterStrip', array( &$this, &$text, &$this->mStripState ) );
                $text = $this->internalParse( $text );
+
                $text = $this->mStripState->unstripGeneral( $text );
 
                # Clean up special characters, only run once, next-to-last before doBlockLevels
@@ -342,34 +349,51 @@ class Parser
 
                $this->replaceLinkHolders( $text );
 
-               # the position of the parserConvert() call should not be changed. it
-               # assumes that the links are all replaced and the only thing left
-               # is the <nowiki> mark.
-               # Side-effects: this calls $this->mOutput->setTitleText()
-               $text = $wgContLang->parserConvert( $text, $this );
+               // The position of the convert() call should not be changed. it
+               // assumes that the links are all replaced and the only thing left
+               // is the <nowiki> mark.
+               if ( !( $wgDisableLangConversion
+                               || isset( $this->mDoubleUnderscores['nocontentconvert'] )
+                               || $this->mTitle->isTalkPage()
+                               || $this->mTitle->isConversionTable() ) ) {
+                       $text = $wgContLang->convert( $text );
+               }
+
+               // A title may have been set in a conversion rule.
+               // Note that if a user tries to set a title in a conversion
+               // rule but content conversion was not done, then the parser
+               // won't pick it up.  This is probably expected behavior.
+               if ( $wgContLang->getConvRuleTitle() ) {
+                       $this->mOutput->setTitleText( $wgContLang->getConvRuleTitle() );
+               }
 
                $text = $this->mStripState->unstripNoWiki( $text );
 
                wfRunHooks( 'ParserBeforeTidy', array( &$this, &$text ) );
 
-//!JF Move to its own function
-
-               $uniq_prefix = $this->mUniqPrefix;
-               $matches = array();
-               $elements = array_keys( $this->mTransparentTagHooks );
-               $text = self::extractTagsAndParams( $elements, $text, $matches, $uniq_prefix );
-
-               foreach( $matches as $marker => $data ) {
-                       list( $element, $content, $params, $tag ) = $data;
-                       $tagName = strtolower( $element );
-                       if( isset( $this->mTransparentTagHooks[$tagName] ) ) {
-                               $output = call_user_func_array( $this->mTransparentTagHooks[$tagName],
-                                       array( $content, $params, $this ) );
-                       } else {
-                               $output = $tag;
+               if ( $this->mTransparentTagHooks ) {
+                       //!JF Move to its own function
+                       $uniq_prefix = $this->mUniqPrefix;
+                       $matches = array();
+                       $elements = array_keys( $this->mTransparentTagHooks );
+                       $text = self::extractTagsAndParams( $elements, $text, $matches, $uniq_prefix );
+
+                       foreach( $matches as $marker => $data ) {
+                               list( $element, $content, $params, $tag ) = $data;
+                               $tagName = strtolower( $element );
+                               if( isset( $this->mTransparentTagHooks[$tagName] ) ) {
+                                       $output = call_user_func_array( $this->mTransparentTagHooks[$tagName],
+                                               array( $content, $params, $this ) );
+                               } else {
+                                       $output = $tag;
+                               }
+                               $this->mStripState->general->setPair( $marker, $output );
                        }
-                       $this->mStripState->general->setPair( $marker, $output );
                }
+
+               # This was originally inserted for transparent tag hooks (now deprecated)
+               # but some extensions (notably <poem>) rely on the extra unstripGeneral()
+               # after unstripNoWiki() so they can modify the contents of <nowiki> tags.
                $text = $this->mStripState->unstripGeneral( $text );
 
                $text = Sanitizer::normalizeCharReferences( $text );
@@ -425,6 +449,7 @@ class Parser
                        $text .= "\n<!-- \n$limitReport-->\n";
                }
                $this->mOutput->setText( $text );
+
                $this->mRevisionId = $oldRevisionId;
                $this->mRevisionTimestamp = $oldRevisionTimestamp;
                wfProfileOut( $fname );
@@ -436,12 +461,17 @@ class Parser
        /**
         * Recursive parser entry point that can be called from an extension tag
         * hook.
+        *
+        * If $frame is not provided, then template variables (e.g., {{{1}}}) within $text are not expanded
+        *
+        * @param $text String: text extension wants to have parsed
+        * @param PPFrame $frame: The frame to use for expanding any template variables
         */
-       function recursiveTagParse( $text ) {
+       function recursiveTagParse( $text, $frame=false ) {
                wfProfileIn( __METHOD__ );
                wfRunHooks( 'ParserBeforeStrip', array( &$this, &$text, &$this->mStripState ) );
                wfRunHooks( 'ParserAfterStrip', array( &$this, &$text, &$this->mStripState ) );
-               $text = $this->internalParse( $text );
+               $text = $this->internalParse( $text, false, $frame );
                wfProfileOut( __METHOD__ );
                return $text;
        }
@@ -467,6 +497,26 @@ class Parser
                return $text;
        }
 
+       /**
+        * Get the wikitext of a page as though it was transcluded.
+        *
+        * Specifically <includeonly> etc. are parsed, redirects are followed, comments
+        * are removed, but templates arguments and parser functions are untouched.
+        *
+        * This is not called by the parser itself, see braceSubstitution for its transclusion. 
+        */
+       public function getTransclusionText( $title, $options ) {
+               // Must initialize first
+               $this->clearState();
+               $this->setOutputType( self::OT_INCLUDES );
+               $this->mOptions = $options;
+               $this->setTitle( new FakeTitle ); 
+
+               list( $text, $title ) = $this->getTemplateDom( $title );
+               $flags = PPFrame::NO_ARGS | PPFrame::NO_TEMPLATES;
+               return $this->getPreprocessor()->newFrame()->expand( $text, $flags );
+       }
+
        /**
         * Get a random string
         *
@@ -529,9 +579,9 @@ class Parser
                $matches = array();
 
                $taglist = implode( '|', $elements );
-               $start = "/<($taglist)(\\s+[^>]*?|\\s*?)(\/?>)|<(!--)/i";
+               $start = "/<($taglist)(\\s+[^>]*?|\\s*?)(\/?" . ">)|<(!--)/i";
 
-               while ( '' != $text ) {
+               while ( $text != '' ) {
                        $p = preg_split( $start, $text, 2, PREG_SPLIT_DELIM_CAPTURE );
                        $stripped .= $p[0];
                        if( count( $p ) < 5 ) {
@@ -589,15 +639,7 @@ class Parser
         * Get a list of strippable XML-like elements
         */
        function getStripList() {
-               global $wgRawHtml;
-               $elements = $this->mStripList;
-               if( $wgRawHtml ) {
-                       $elements[] = 'html';
-               }
-               if( $this->mOptions->getUseTeX() ) {
-                       $elements[] = 'math';
-               }
-               return $elements;
+               return $this->mStripList;
        }
 
        /**
@@ -648,14 +690,14 @@ class Parser
                $this->mStripState->general->setPair( $rnd, $text );
                return $rnd;
        }
-       
+
        /**
         * Interface with html tidy
         * @deprecated Use MWTidy::tidy()
         */
        public static function tidy( $text ) {
                wfDeprecated( __METHOD__ );
-               return MWTidy::tidy( $text );   
+               return MWTidy::tidy( $text );
        }
 
        /**
@@ -693,11 +735,11 @@ class Parser
                                $attributes = Sanitizer::fixTagAttributes ( $attributes , 'table' );
 
                                $outLine = str_repeat( '<dl><dd>' , $indent_level ) . "<table{$attributes}>";
-                               array_push ( $td_history , false );
-                               array_push ( $last_tag_history , '' );
-                               array_push ( $tr_history , false );
-                               array_push ( $tr_attributes , '' );
-                               array_push ( $has_opened_tr , false );
+                               array_push( $td_history , false );
+                               array_push( $last_tag_history , '' );
+                               array_push( $tr_history , false );
+                               array_push( $tr_attributes , '' );
+                               array_push( $has_opened_tr , false );
                        } else if ( count ( $td_history ) == 0 ) {
                                // Don't do any of the following
                                $out .= $outLine."\n";
@@ -726,9 +768,9 @@ class Parser
 
                                // Whats after the tag is now only attributes
                                $attributes = $this->mStripState->unstripBoth( $line );
-                               $attributes = Sanitizer::fixTagAttributes ( $attributes , 'tr' );
-                               array_pop ( $tr_attributes );
-                               array_push ( $tr_attributes , $attributes );
+                               $attributes = Sanitizer::fixTagAttributes( $attributes, 'tr' );
+                               array_pop( $tr_attributes );
+                               array_push( $tr_attributes, $attributes );
 
                                $line = '';
                                $last_tag = array_pop ( $last_tag_history );
@@ -862,17 +904,33 @@ class Parser
         *
         * @private
         */
-       function internalParse( $text ) {
-               $isMain = true;
+       function internalParse( $text, $isMain = true, $frame=false ) {
                wfProfileIn( __METHOD__ );
 
+               $origText = $text;
+
                # Hook to suspend the parser in this state
                if ( !wfRunHooks( 'ParserBeforeInternalParse', array( &$this, &$text, &$this->mStripState ) ) ) {
                        wfProfileOut( __METHOD__ );
                        return $text ;
                }
 
-               $text = $this->replaceVariables( $text );
+               // if $frame is provided, then use $frame for replacing any variables
+               if ($frame) {
+                       // use frame depth to infer how include/noinclude tags should be handled
+                       // depth=0 means this is the top-level document; otherwise it's an included document
+                       if( !$frame->depth )
+                               $flag = 0;
+                       else
+                               $flag = Parser::PTD_FOR_INCLUSION;
+                       $dom = $this->preprocessToDom( $text, $flag );
+                       $text = $frame->expand( $dom );
+               }
+               // if $frame is not provided, then use old-style replaceVariables
+               else {
+                       $text = $this->replaceVariables( $text );
+               }
+
                $text = Sanitizer::removeHTMLtags( $text, array( &$this, 'attributeStripCallback' ), false, array_keys( $this->mTransparentTagHooks ) );
                wfRunHooks( 'InternalParseBeforeLinks', array( &$this, &$text, &$this->mStripState ) );
 
@@ -885,6 +943,7 @@ class Parser
                $text = preg_replace( '/(^|\n)-----*/', '\\1<hr />', $text );
 
                $text = $this->doDoubleUnderscore( $text );
+
                $text = $this->doHeadings( $text );
                if( $this->mOptions->getUseDynamicDates() ) {
                        $df = DateFormatter::getInstance();
@@ -899,7 +958,7 @@ class Parser
                $text = str_replace($this->mUniqPrefix.'NOPARSE', '', $text);
 
                $text = $this->doMagicLinks( $text );
-               $text = $this->formatHeadings( $text, $isMain );
+               $text = $this->formatHeadings( $text, $origText, $isMain );
 
                wfProfileOut( __METHOD__ );
                return $text;
@@ -908,7 +967,7 @@ class Parser
        /**
         * Replace special strings like "ISBN xxx" and "RFC xxx" with
         * magic external links.
-        * 
+        *
         * DML
         * @private
         */
@@ -918,7 +977,7 @@ class Parser
                $urlChar = self::EXT_LINK_URL_CLASS;
                $text = preg_replace_callback(
                        '!(?:                           # Start cases
-                               (<a.*?</a>) |               # m[1]: Skip link text 
+                               (<a.*?</a>) |               # m[1]: Skip link text
                                (<.*?>) |                   # m[2]: Skip stuff inside HTML elements' . "
                                (\\b(?:$prots)$urlChar+) |  # m[3]: Free external links" . '
                                (?:RFC|PMID)\s+([0-9]+) |   # m[4]: RFC or PMID, capture number
@@ -944,13 +1003,16 @@ class Parser
                        return $this->makeFreeExternalLink( $m[0] );
                } elseif ( isset( $m[4] ) && $m[4] !== '' ) {
                        # RFC or PMID
+                       $CssClass = '';
                        if ( substr( $m[0], 0, 3 ) === 'RFC' ) {
                                $keyword = 'RFC';
                                $urlmsg = 'rfcurl';
+                               $CssClass = 'mw-magiclink-rfc';
                                $id = $m[4];
                        } elseif ( substr( $m[0], 0, 4 ) === 'PMID' ) {
                                $keyword = 'PMID';
                                $urlmsg = 'pubmedurl';
+                               $CssClass = 'mw-magiclink-pmid';
                                $id = $m[4];
                        } else {
                                throw new MWException( __METHOD__.': unrecognised match type "' .
@@ -958,7 +1020,7 @@ class Parser
                        }
                        $url = wfMsg( $urlmsg, $id);
                        $sk = $this->mOptions->getSkin();
-                       $la = $sk->getExternalLinkAttributes( $url, $keyword.$id );
+                       $la = $sk->getExternalLinkAttributes( "external $CssClass" );
                        return "<a href=\"{$url}\"{$la}>{$keyword} {$id}</a>";
                } elseif ( isset( $m[5] ) && $m[5] !== '' ) {
                        # ISBN
@@ -971,7 +1033,7 @@ class Parser
                        $titleObj = SpecialPage::getTitleFor( 'Booksources', $num );
                        return'<a href="' .
                                $titleObj->escapeLocalUrl() .
-                               "\" class=\"internal\">ISBN $isbn</a>";
+                               "\" class=\"internal mw-magiclink-isbn\">ISBN $isbn</a>";
                } else {
                        return $m[0];
                }
@@ -1017,7 +1079,7 @@ class Parser
                $text = $this->maybeMakeExternalImage( $url );
                if ( $text === false ) {
                        # Not an image, make a link
-                       $text = $sk->makeExternalLink( $url, $wgContLang->markNoConversion($url), true, 'free', 
+                       $text = $sk->makeExternalLink( $url, $wgContLang->markNoConversion($url), true, 'free',
                                $this->getExternalLinkAttribs( $url ) );
                        # Register it in the output object...
                        # Replace unnecessary URL escape codes with their equivalent characters
@@ -1457,10 +1519,10 @@ class Parser
                wfProfileIn( __METHOD__.'-setup' );
                static $tc = FALSE, $e1, $e1_img;
                # the % is needed to support urlencoded titles as well
-               if ( !$tc ) { 
+               if ( !$tc ) {
                        $tc = Title::legalChars() . '#%';
                        # Match a link having the form [[namespace:link|alternate]]trail
-                       $e1 = "/^([{$tc}]+)(?:\\|(.+?))?]](.*)\$/sD";
+                       $e1 = "/^([{$tc}]*)(\\|.*?)?]](.*)\$/sD";
                        # Match cases where there is no "]]", which might still be images
                        $e1_img = "/^([{$tc}]+)\\|(.*)\$/sD";
                }
@@ -1540,7 +1602,15 @@ class Parser
 
                        wfProfileIn( __METHOD__."-e1" );
                        if ( preg_match( $e1, $line, $m ) ) { # page with normal text or alt
-                               $text = $m[2];
+
+                               if( $m[2] === '' ) {
+                                       $text = '';
+                               } elseif( $m[2] === '|' ) { 
+                                       $text = $this->getPipeTrickText( $m[1] );
+                               } else {
+                                       $text = substr( $m[2], 1 );
+                               }
+
                                # If we get a ] at the beginning of $m[3] that means we have a link that's something like:
                                # [[Image:Foo.jpg|[http://example.com desc]]] <- having three ] in a row fucks up,
                                # the real problem is with the $e1 regex
@@ -1557,18 +1627,20 @@ class Parser
                                        $text .= ']'; # so that replaceExternalLinks($text) works later
                                        $m[3] = substr( $m[3], 1 );
                                }
+
+                               # Handle pipe-trick for [[|<blah>]]
+                               $lnk = $m[1] === '' ? $this->getPipeTrickLink( $text ) : $m[1];
                                # fix up urlencoded title texts
-                               if( strpos( $m[1], '%' ) !== false ) {
+                               if( strpos( $lnk, '%' ) !== false ) {
                                        # Should anchors '#' also be rejected?
-                                       $m[1] = str_replace( array('<', '>'), array('&lt;', '&gt;'), urldecode($m[1]) );
+                                       $lnk = str_replace( array('<', '>'), array('&lt;', '&gt;'), urldecode($lnk) );
                                }
+
                                $trail = $m[3];
                        } elseif( preg_match($e1_img, $line, $m) ) { # Invalid, but might be an image with a link in its caption
                                $might_be_img = true;
                                $text = $m[2];
-                               if ( strpos( $m[1], '%' ) !== false ) {
-                                       $m[1] = urldecode($m[1]);
-                               }
+                               $lnk = strpos( $m[1], '%' ) === false ? $m[1] : urldecode( $m[1] );
                                $trail = "";
                        } else { # Invalid form; output directly
                                $s .= $prefix . '[[' . $line ;
@@ -1581,29 +1653,29 @@ class Parser
                        # Don't allow internal links to pages containing
                        # PROTO: where PROTO is a valid URL protocol; these
                        # should be external links.
-                       if (preg_match('/^\b(?:' . wfUrlProtocols() . ')/', $m[1])) {
+                       if ( preg_match( '/^\b(?:' . wfUrlProtocols() . ')/', $lnk ) ) {
                                $s .= $prefix . '[[' . $line ;
                                wfProfileOut( __METHOD__."-misc" );
                                continue;
                        }
 
                        # Make subpage if necessary
-                       if( $useSubpages ) {
-                               $link = $this->maybeDoSubpageLink( $m[1], $text );
+                       if ( $useSubpages ) {
+                               $link = $this->maybeDoSubpageLink( $lnk, $text );
                        } else {
-                               $link = $m[1];
+                               $link = $lnk;
                        }
 
-                       $noforce = (substr($m[1], 0, 1) !== ':');
+                       $noforce = (substr( $lnk, 0, 1 ) !== ':');
                        if (!$noforce) {
                                # Strip off leading ':'
-                               $link = substr($link, 1);
+                               $link = substr( $link, 1 );
                        }
 
                        wfProfileOut( __METHOD__."-misc" );
                        wfProfileIn( __METHOD__."-title" );
-                       $nt = Title::newFromText( $this->mStripState->unstripNoWiki($link) );
-                       if( $nt === NULL ) {
+                       $nt = Title::newFromText( $this->mStripState->unstripNoWiki( $link ) );
+                       if ( $nt === null ) {
                                $s .= $prefix . '[[' . $line;
                                wfProfileOut( __METHOD__."-title" );
                                continue;
@@ -1613,9 +1685,9 @@ class Parser
                        $iw = $nt->getInterWiki();
                        wfProfileOut( __METHOD__."-title" );
 
-                       if ($might_be_img) { # if this is actually an invalid link
+                       if ( $might_be_img ) { # if this is actually an invalid link
                                wfProfileIn( __METHOD__."-might_be_img" );
-                               if ($ns == NS_FILE && $noforce) { #but might be an image
+                               if ( $ns == NS_FILE && $noforce ) { #but might be an image
                                        $found = false;
                                        while ( true ) {
                                                #look at the next 'line' to see if we can close it there
@@ -1658,15 +1730,15 @@ class Parser
                                wfProfileOut( __METHOD__."-might_be_img" );
                        }
 
-                       $wasblank = ( '' == $text );
-                       if( $wasblank ) $text = $link;
+                       $wasblank = ( $text  == '' );
+                       if ( $wasblank ) $text = $link;
 
                        # Link not escaped by : , create the various objects
-                       if( $noforce ) {
+                       if ( $noforce ) {
 
                                # Interwikis
                                wfProfileIn( __METHOD__."-interwiki" );
-                               if( $iw && $this->mOptions->getInterwikiMagic() && $nottalk && $wgContLang->getLanguageName( $iw ) ) {
+                               if ( $iw && $this->mOptions->getInterwikiMagic() && $nottalk && $wgContLang->getLanguageName( $iw ) ) {
                                        $this->mOutput->addLanguageLink( $nt->getFullText() );
                                        $s = rtrim($s . $prefix);
                                        $s .= trim($trail, "\n") == '' ? '': $prefix . $trail;
@@ -1678,14 +1750,23 @@ class Parser
                                if ( $ns == NS_FILE ) {
                                        wfProfileIn( __METHOD__."-image" );
                                        if ( !wfIsBadImage( $nt->getDBkey(), $this->mTitle ) ) {
-                                               # recursively parse links inside the image caption
-                                               # actually, this will parse them in any other parameters, too,
-                                               # but it might be hard to fix that, and it doesn't matter ATM
-                                               $text = $this->replaceExternalLinks($text);
-                                               $holders->merge( $this->replaceInternalLinks2( $text ) );
-
+                                               if ( $wasblank ) {
+                                                       # if no parameters were passed, $text
+                                                       # becomes something like "File:Foo.png",
+                                                       # which we don't want to pass on to the
+                                                       # image generator
+                                                       $text = '';
+                                               } else {
+                                                       # recursively parse links inside the image caption
+                                                       # actually, this will parse them in any other parameters, too,
+                                                       # but it might be hard to fix that, and it doesn't matter ATM
+                                                       $text = $this->replaceExternalLinks($text);
+                                                       $holders->merge( $this->replaceInternalLinks2( $text ) );
+                                               }
                                                # cloak any absolute URLs inside the image markup, so replaceExternalLinks() won't touch them
                                                $s .= $prefix . $this->armorLinks( $this->makeImage( $nt, $text, $holders ) ) . $trail;
+                                       } else {
+                                               $s .= $prefix . $trail;
                                        }
                                        $this->mOutput->addImage( $nt->getDBkey() );
                                        wfProfileOut( __METHOD__."-image" );
@@ -1830,75 +1911,26 @@ class Parser
         * @private
         */
        function maybeDoSubpageLink($target, &$text) {
-               # Valid link forms:
-               # Foobar -- normal
-               # :Foobar -- override special treatment of prefix (images, language links)
-               # /Foobar -- convert to CurrentPage/Foobar
-               # /Foobar/ -- convert to CurrentPage/Foobar, strip the initial / from text
-               # ../ -- convert to CurrentPage, from CurrentPage/CurrentSubPage
-               # ../Foobar -- convert to CurrentPage/Foobar, from CurrentPage/CurrentSubPage
-
-               wfProfileIn( __METHOD__ );
-               $ret = $target; # default return value is no change
-
-               # Some namespaces don't allow subpages,
-               # so only perform processing if subpages are allowed
-               if( $this->areSubpagesAllowed() ) {
-                       $hash = strpos( $target, '#' );
-                       if( $hash !== false ) {
-                               $suffix = substr( $target, $hash );
-                               $target = substr( $target, 0, $hash );
-                       } else {
-                               $suffix = '';
-                       }
-                       # bug 7425
-                       $target = trim( $target );
-                       # Look at the first character
-                       if( $target != '' && $target{0} === '/' ) {
-                               # / at end means we don't want the slash to be shown
-                               $m = array();
-                               $trailingSlashes = preg_match_all( '%(/+)$%', $target, $m );
-                               if( $trailingSlashes ) {
-                                       $noslash = $target = substr( $target, 1, -strlen($m[0][0]) );
-                               } else {
-                                       $noslash = substr( $target, 1 );
-                               }
+               return Linker::normalizeSubpageLink( $this->mTitle, $target, $text );
+       }
 
-                               $ret = $this->mTitle->getPrefixedText(). '/' . trim($noslash) . $suffix;
-                               if( '' === $text ) {
-                                       $text = $target . $suffix;
-                               } # this might be changed for ugliness reasons
-                       } else {
-                               # check for .. subpage backlinks
-                               $dotdotcount = 0;
-                               $nodotdot = $target;
-                               while( strncmp( $nodotdot, "../", 3 ) == 0 ) {
-                                       ++$dotdotcount;
-                                       $nodotdot = substr( $nodotdot, 3 );
-                               }
-                               if($dotdotcount > 0) {
-                                       $exploded = explode( '/', $this->mTitle->GetPrefixedText() );
-                                       if( count( $exploded ) > $dotdotcount ) { # not allowed to go below top level page
-                                               $ret = implode( '/', array_slice( $exploded, 0, -$dotdotcount ) );
-                                               # / at the end means don't show full path
-                                               if( substr( $nodotdot, -1, 1 ) === '/' ) {
-                                                       $nodotdot = substr( $nodotdot, 0, -1 );
-                                                       if( '' === $text ) {
-                                                               $text = $nodotdot . $suffix;
-                                                       }
-                                               }
-                                               $nodotdot = trim( $nodotdot );
-                                               if( $nodotdot != '' ) {
-                                                       $ret .= '/' . $nodotdot;
-                                               }
-                                               $ret .= $suffix;
-                                       }
-                               }
-                       }
-               }
+       /**
+        * From the [[title|]] return link-text as though the used typed [[title|link-text]]
+        * @param string $link from [[$link|]]
+        * @return string $text for [[$link|$text]]
+        */
+       function getPipeTrickText( $link ) {
+               return Linker::getPipeTrickText( $link );
+       }
 
-               wfProfileOut( __METHOD__ );
-               return $ret;
+       /**
+        * From the [[|link-text]] return the title as though the user typed [[title|link-text]]
+        * @param string $text from [[|$text]]
+        * @param Title $title to resolve the link against
+        * @return string $link for [[$link|$text]]
+        */
+       function getPipeTrickLink( $text ) {
+               return Linker::getPipeTrickLink( $text, $this->mTitle );
        }
 
        /**#@+
@@ -1907,7 +1939,7 @@ class Parser
         */
        /* private */ function closeParagraph() {
                $result = '';
-               if ( '' != $this->mLastSection ) {
+               if ( $this->mLastSection != '' ) {
                        $result = '</' . $this->mLastSection  . ">\n";
                }
                $this->mInPre = false;
@@ -1934,9 +1966,9 @@ class Parser
                $result = $this->closeParagraph();
 
                if ( '*' === $char ) { $result .= '<ul><li>'; }
-               else if ( '#' === $char ) { $result .= '<ol><li>'; }
-               else if ( ':' === $char ) { $result .= '<dl><dd>'; }
-               else if ( ';' === $char ) {
+               elseif ( '#' === $char ) { $result .= '<ol><li>'; }
+               elseif ( ':' === $char ) { $result .= '<dl><dd>'; }
+               elseif ( ';' === $char ) {
                        $result .= '<dl><dt>';
                        $this->mDTopen = true;
                }
@@ -1947,7 +1979,7 @@ class Parser
 
        /* private */ function nextItem( $char ) {
                if ( '*' === $char || '#' === $char ) { return '</li><li>'; }
-               else if ( ':' === $char || ';' === $char ) {
+               elseif ( ':' === $char || ';' === $char ) {
                        $close = '</dd>';
                        if ( $this->mDTopen ) { $close = '</dt>'; }
                        if ( ';' === $char ) {
@@ -1963,8 +1995,8 @@ class Parser
 
        /* private */ function closeList( $char ) {
                if ( '*' === $char ) { $text = '</li></ul>'; }
-               else if ( '#' === $char ) { $text = '</li></ol>'; }
-               else if ( ':' === $char ) {
+               elseif ( '#' === $char ) { $text = '</li></ol>'; }
+               elseif ( ':' === $char ) {
                        if ( $this->mDTopen ) {
                                $this->mDTopen = false;
                                $text = '</dt></dl>';
@@ -1980,6 +2012,7 @@ class Parser
        /**
         * Make lists from lines starting with ':', '*', '#', etc. (DBL)
         *
+        * @param $linestart bool whether or not this is at the start of a line.
         * @private
         * @return string the lists rendered as HTML
         */
@@ -2004,16 +2037,24 @@ class Parser
                                $linestart = true;
                                continue;
                        }
+                       // * = ul
+                       // # = ol
+                       // ; = dt
+                       // : = dd
 
                        $lastPrefixLength = strlen( $lastPrefix );
                        $preCloseMatch = preg_match('/<\\/pre/i', $oLine );
                        $preOpenMatch = preg_match('/<pre/i', $oLine );
+                       // If not in a <pre> element, scan for and figure out what prefixes are there.
                        if ( !$this->mInPre ) {
                                # Multiple prefixes may abut each other for nested lists.
                                $prefixLength = strspn( $oLine, '*#:;' );
                                $prefix = substr( $oLine, 0, $prefixLength );
 
                                # eh?
+                               // ; and : are both from definition-lists, so they're equivalent
+                               //  for the purposes of determining whether or not we need to open/close
+                               //  elements.
                                $prefix2 = str_replace( ';', ':', $prefix );
                                $t = substr( $oLine, $prefixLength );
                                $this->mInPre = (bool)$preOpenMatch;
@@ -2042,17 +2083,24 @@ class Parser
                                        }
                                }
                        } elseif( $prefixLength || $lastPrefixLength ) {
+                               // We need to open or close prefixes, or both.
+
                                # Either open or close a level...
                                $commonPrefixLength = $this->getCommon( $prefix, $lastPrefix );
                                $paragraphStack = false;
 
+                               // Close all the prefixes which aren't shared.
                                while( $commonPrefixLength < $lastPrefixLength ) {
                                        $output .= $this->closeList( $lastPrefix[$lastPrefixLength-1] );
                                        --$lastPrefixLength;
                                }
+
+                               // Continue the current prefix if appropriate.
                                if ( $prefixLength <= $commonPrefixLength && $commonPrefixLength > 0 ) {
                                        $output .= $this->nextItem( $prefix[$commonPrefixLength-1] );
                                }
+
+                               // Open prefixes where appropriate.
                                while ( $prefixLength > $commonPrefixLength ) {
                                        $char = substr( $prefix, $commonPrefixLength, 1 );
                                        $output .= $this->openList( $char );
@@ -2068,6 +2116,8 @@ class Parser
                                }
                                $lastPrefix = $prefix2;
                        }
+
+                       // If we have no prefixes, go to paragraph mode.
                        if( 0 == $prefixLength ) {
                                wfProfileIn( __METHOD__."-paragraph" );
                                # No prefix (not in list)--go to paragraph mode
@@ -2099,7 +2149,7 @@ class Parser
                                                $t = substr( $t, 1 );
                                        } else {
                                                // paragraph
-                                               if ( '' == trim($t) ) {
+                                               if ( trim($t) == '' ) {
                                                        if ( $paragraphStack ) {
                                                                $output .= $paragraphStack.'<br />';
                                                                $paragraphStack = false;
@@ -2139,7 +2189,7 @@ class Parser
                        $output .= $this->closeList( $prefix2[$prefixLength-1] );
                        --$prefixLength;
                }
-               if ( '' != $this->mLastSection ) {
+               if ( $this->mLastSection != '' ) {
                        $output .= '</' . $this->mLastSection . '>';
                        $this->mLastSection = '';
                }
@@ -2316,8 +2366,9 @@ class Parser
         *
         * @private
         */
-       function getVariableValue( $index ) {
-               global $wgContLang, $wgSitename, $wgServer, $wgServerName, $wgScriptPath;
+       function getVariableValue( $index, $frame=false ) {
+               global $wgContLang, $wgSitename, $wgServer, $wgServerName;
+               global $wgScriptPath, $wgStylePath;
 
                /**
                 * Some of these require message or data lookups and can be
@@ -2335,11 +2386,10 @@ class Parser
                # Use the time zone
                global $wgLocaltimezone;
                if ( isset( $wgLocaltimezone ) ) {
-                       $oldtz = getenv( 'TZ' );
-                       putenv( 'TZ='.$wgLocaltimezone );
+                       $oldtz = date_default_timezone_get();
+                       date_default_timezone_set( $wgLocaltimezone );
                }
 
-               wfSuppressWarnings(); // E_STRICT system time bitching
                $localTimestamp = date( 'YmdHis', $ts );
                $localMonth = date( 'm', $ts );
                $localMonth1 = date( 'n', $ts );
@@ -2351,179 +2401,248 @@ class Parser
                $localYear = date( 'Y', $ts );
                $localHour = date( 'H', $ts );
                if ( isset( $wgLocaltimezone ) ) {
-                       putenv( 'TZ='.$oldtz );
+                       date_default_timezone_set( $oldtz );
                }
-               wfRestoreWarnings();
 
                switch ( $index ) {
                        case 'currentmonth':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'm', $ts ) );
+                               $value = $wgContLang->formatNum( gmdate( 'm', $ts ) );
+                               break;
                        case 'currentmonth1':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'n', $ts ) );
+                               $value = $wgContLang->formatNum( gmdate( 'n', $ts ) );
+                               break;
                        case 'currentmonthname':
-                               return $this->mVarCache[$index] = $wgContLang->getMonthName( gmdate( 'n', $ts ) );
+                               $value = $wgContLang->getMonthName( gmdate( 'n', $ts ) );
+                               break;
                        case 'currentmonthnamegen':
-                               return $this->mVarCache[$index] = $wgContLang->getMonthNameGen( gmdate( 'n', $ts ) );
+                               $value = $wgContLang->getMonthNameGen( gmdate( 'n', $ts ) );
+                               break;
                        case 'currentmonthabbrev':
-                               return $this->mVarCache[$index] = $wgContLang->getMonthAbbreviation( gmdate( 'n', $ts ) );
+                               $value = $wgContLang->getMonthAbbreviation( gmdate( 'n', $ts ) );
+                               break;
                        case 'currentday':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'j', $ts ) );
+                               $value = $wgContLang->formatNum( gmdate( 'j', $ts ) );
+                               break;
                        case 'currentday2':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'd', $ts ) );
+                               $value = $wgContLang->formatNum( gmdate( 'd', $ts ) );
+                               break;
                        case 'localmonth':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localMonth );
+                               $value = $wgContLang->formatNum( $localMonth );
+                               break;
                        case 'localmonth1':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localMonth1 );
+                               $value = $wgContLang->formatNum( $localMonth1 );
+                               break;
                        case 'localmonthname':
-                               return $this->mVarCache[$index] = $wgContLang->getMonthName( $localMonthName );
+                               $value = $wgContLang->getMonthName( $localMonthName );
+                               break;
                        case 'localmonthnamegen':
-                               return $this->mVarCache[$index] = $wgContLang->getMonthNameGen( $localMonthName );
+                               $value = $wgContLang->getMonthNameGen( $localMonthName );
+                               break;
                        case 'localmonthabbrev':
-                               return $this->mVarCache[$index] = $wgContLang->getMonthAbbreviation( $localMonthName );
+                               $value = $wgContLang->getMonthAbbreviation( $localMonthName );
+                               break;
                        case 'localday':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localDay );
+                               $value = $wgContLang->formatNum( $localDay );
+                               break;
                        case 'localday2':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localDay2 );
+                               $value = $wgContLang->formatNum( $localDay2 );
+                               break;
                        case 'pagename':
-                               return wfEscapeWikiText( $this->mTitle->getText() );
+                               $value = wfEscapeWikiText( $this->mTitle->getText() );
+                               break;
                        case 'pagenamee':
-                               return $this->mTitle->getPartialURL();
+                               $value = $this->mTitle->getPartialURL();
+                               break;
                        case 'fullpagename':
-                               return wfEscapeWikiText( $this->mTitle->getPrefixedText() );
+                               $value = wfEscapeWikiText( $this->mTitle->getPrefixedText() );
+                               break;
                        case 'fullpagenamee':
-                               return $this->mTitle->getPrefixedURL();
+                               $value = $this->mTitle->getPrefixedURL();
+                               break;
                        case 'subpagename':
-                               return wfEscapeWikiText( $this->mTitle->getSubpageText() );
+                               $value = wfEscapeWikiText( $this->mTitle->getSubpageText() );
+                               break;
                        case 'subpagenamee':
-                               return $this->mTitle->getSubpageUrlForm();
+                               $value = $this->mTitle->getSubpageUrlForm();
+                               break;
                        case 'basepagename':
-                               return wfEscapeWikiText( $this->mTitle->getBaseText() );
+                               $value = wfEscapeWikiText( $this->mTitle->getBaseText() );
+                               break;
                        case 'basepagenamee':
-                               return wfUrlEncode( str_replace( ' ', '_', $this->mTitle->getBaseText() ) );
+                               $value = wfUrlEncode( str_replace( ' ', '_', $this->mTitle->getBaseText() ) );
+                               break;
                        case 'talkpagename':
                                if( $this->mTitle->canTalk() ) {
                                        $talkPage = $this->mTitle->getTalkPage();
-                                       return wfEscapeWikiText( $talkPage->getPrefixedText() );
+                                       $value = wfEscapeWikiText( $talkPage->getPrefixedText() );
                                } else {
-                                       return '';
+                                       $value = '';
                                }
+                               break;
                        case 'talkpagenamee':
                                if( $this->mTitle->canTalk() ) {
                                        $talkPage = $this->mTitle->getTalkPage();
-                                       return $talkPage->getPrefixedUrl();
+                                       $value = $talkPage->getPrefixedUrl();
                                } else {
-                                       return '';
+                                       $value = '';
                                }
+                               break;
                        case 'subjectpagename':
                                $subjPage = $this->mTitle->getSubjectPage();
-                               return wfEscapeWikiText( $subjPage->getPrefixedText() );
+                               $value = wfEscapeWikiText( $subjPage->getPrefixedText() );
+                               break;
                        case 'subjectpagenamee':
                                $subjPage = $this->mTitle->getSubjectPage();
-                               return $subjPage->getPrefixedUrl();
+                               $value = $subjPage->getPrefixedUrl();
+                               break;
+                       case 'pipetrick':
+                               $text = $this->mTitle->getText();
+                               $value = $this->getPipeTrickText( $text );
+                               break;
+                       case 'pipetricke':
+                               $text = $this->mTitle->getText();
+                               $value = wfUrlEncode( str_replace( ' ', '_', $this->getPipeTrickText( $text ) ) );
+                               break;
                        case 'revisionid':
                                // Let the edit saving system know we should parse the page
                                // *after* a revision ID has been assigned.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONID}} used, setting vary-revision...\n" );
-                               return $this->mRevisionId;
+                               $value = $this->mRevisionId;
+                               break;
                        case 'revisionday':
                                // Let the edit saving system know we should parse the page
                                // *after* a revision ID has been assigned. This is for null edits.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONDAY}} used, setting vary-revision...\n" );
-                               return intval( substr( $this->getRevisionTimestamp(), 6, 2 ) );
+                               $value = intval( substr( $this->getRevisionTimestamp(), 6, 2 ) );
+                               break;
                        case 'revisionday2':
                                // Let the edit saving system know we should parse the page
                                // *after* a revision ID has been assigned. This is for null edits.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONDAY2}} used, setting vary-revision...\n" );
-                               return substr( $this->getRevisionTimestamp(), 6, 2 );
+                               $value = substr( $this->getRevisionTimestamp(), 6, 2 );
+                               break;
                        case 'revisionmonth':
                                // Let the edit saving system know we should parse the page
                                // *after* a revision ID has been assigned. This is for null edits.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONMONTH}} used, setting vary-revision...\n" );
-                               return intval( substr( $this->getRevisionTimestamp(), 4, 2 ) );
+                               $value = intval( substr( $this->getRevisionTimestamp(), 4, 2 ) );
+                               break;
                        case 'revisionyear':
                                // Let the edit saving system know we should parse the page
                                // *after* a revision ID has been assigned. This is for null edits.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONYEAR}} used, setting vary-revision...\n" );
-                               return substr( $this->getRevisionTimestamp(), 0, 4 );
+                               $value = substr( $this->getRevisionTimestamp(), 0, 4 );
+                               break;
                        case 'revisiontimestamp':
                                // Let the edit saving system know we should parse the page
                                // *after* a revision ID has been assigned. This is for null edits.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONTIMESTAMP}} used, setting vary-revision...\n" );
-                               return $this->getRevisionTimestamp();
+                               $value = $this->getRevisionTimestamp();
+                               break;
                        case 'revisionuser':
                                 // Let the edit saving system know we should parse the page
                                 // *after* a revision ID has been assigned. This is for null edits.
                                $this->mOutput->setFlag( 'vary-revision' );
                                wfDebug( __METHOD__ . ": {{REVISIONUSER}} used, setting vary-revision...\n" );
-                               return $this->getRevisionUser();
+                               $value = $this->getRevisionUser();
+                               break;
                        case 'namespace':
-                               return str_replace('_',' ',$wgContLang->getNsText( $this->mTitle->getNamespace() ) );
+                               $value = str_replace('_',' ',$wgContLang->getNsText( $this->mTitle->getNamespace() ) );
+                               break;
                        case 'namespacee':
-                               return wfUrlencode( $wgContLang->getNsText( $this->mTitle->getNamespace() ) );
+                               $value = wfUrlencode( $wgContLang->getNsText( $this->mTitle->getNamespace() ) );
+                               break;
                        case 'talkspace':
-                               return $this->mTitle->canTalk() ? str_replace('_',' ',$this->mTitle->getTalkNsText()) : '';
+                               $value = $this->mTitle->canTalk() ? str_replace('_',' ',$this->mTitle->getTalkNsText()) : '';
+                               break;
                        case 'talkspacee':
-                               return $this->mTitle->canTalk() ? wfUrlencode( $this->mTitle->getTalkNsText() ) : '';
+                               $value = $this->mTitle->canTalk() ? wfUrlencode( $this->mTitle->getTalkNsText() ) : '';
+                               break;
                        case 'subjectspace':
-                               return $this->mTitle->getSubjectNsText();
+                               $value = $this->mTitle->getSubjectNsText();
+                               break;
                        case 'subjectspacee':
-                               return( wfUrlencode( $this->mTitle->getSubjectNsText() ) );
+                               $value = ( wfUrlencode( $this->mTitle->getSubjectNsText() ) );
+                               break;
                        case 'currentdayname':
-                               return $this->mVarCache[$index] = $wgContLang->getWeekdayName( gmdate( 'w', $ts ) + 1 );
+                               $value = $wgContLang->getWeekdayName( gmdate( 'w', $ts ) + 1 );
+                               break;
                        case 'currentyear':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'Y', $ts ), true );
+                               $value = $wgContLang->formatNum( gmdate( 'Y', $ts ), true );
+                               break;
                        case 'currenttime':
-                               return $this->mVarCache[$index] = $wgContLang->time( wfTimestamp( TS_MW, $ts ), false, false );
+                               $value = $wgContLang->time( wfTimestamp( TS_MW, $ts ), false, false );
+                               break;
                        case 'currenthour':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'H', $ts ), true );
+                               $value = $wgContLang->formatNum( gmdate( 'H', $ts ), true );
+                               break;
                        case 'currentweek':
                                // @bug 4594 PHP5 has it zero padded, PHP4 does not, cast to
                                // int to remove the padding
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( (int)gmdate( 'W', $ts ) );
+                               $value = $wgContLang->formatNum( (int)gmdate( 'W', $ts ) );
+                               break;
                        case 'currentdow':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( gmdate( 'w', $ts ) );
+                               $value = $wgContLang->formatNum( gmdate( 'w', $ts ) );
+                               break;
                        case 'localdayname':
-                               return $this->mVarCache[$index] = $wgContLang->getWeekdayName( $localDayOfWeek + 1 );
+                               $value = $wgContLang->getWeekdayName( $localDayOfWeek + 1 );
+                               break;
                        case 'localyear':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localYear, true );
+                               $value = $wgContLang->formatNum( $localYear, true );
+                               break;
                        case 'localtime':
-                               return $this->mVarCache[$index] = $wgContLang->time( $localTimestamp, false, false );
+                               $value = $wgContLang->time( $localTimestamp, false, false );
+                               break;
                        case 'localhour':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localHour, true );
+                               $value = $wgContLang->formatNum( $localHour, true );
+                               break;
                        case 'localweek':
                                // @bug 4594 PHP5 has it zero padded, PHP4 does not, cast to
                                // int to remove the padding
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( (int)$localWeek );
+                               $value = $wgContLang->formatNum( (int)$localWeek );
+                               break;
                        case 'localdow':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( $localDayOfWeek );
+                               $value = $wgContLang->formatNum( $localDayOfWeek );
+                               break;
                        case 'numberofarticles':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::articles() );
+                               $value = $wgContLang->formatNum( SiteStats::articles() );
+                               break;
                        case 'numberoffiles':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::images() );
+                               $value = $wgContLang->formatNum( SiteStats::images() );
+                               break;
                        case 'numberofusers':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::users() );
+                               $value = $wgContLang->formatNum( SiteStats::users() );
+                               break;
                        case 'numberofactiveusers':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::activeUsers() );
+                               $value = $wgContLang->formatNum( SiteStats::activeUsers() );
+                               break;
                        case 'numberofpages':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::pages() );
+                               $value = $wgContLang->formatNum( SiteStats::pages() );
+                               break;
                        case 'numberofadmins':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::numberingroup('sysop') );
+                               $value = $wgContLang->formatNum( SiteStats::numberingroup('sysop') );
+                               break;
                        case 'numberofedits':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::edits() );
+                               $value = $wgContLang->formatNum( SiteStats::edits() );
+                               break;
                        case 'numberofviews':
-                               return $this->mVarCache[$index] = $wgContLang->formatNum( SiteStats::views() );
+                               $value = $wgContLang->formatNum( SiteStats::views() );
+                               break;
                        case 'currenttimestamp':
-                               return $this->mVarCache[$index] = wfTimestamp( TS_MW, $ts );
+                               $value = wfTimestamp( TS_MW, $ts );
+                               break;
                        case 'localtimestamp':
-                               return $this->mVarCache[$index] = $localTimestamp;
+                               $value = $localTimestamp;
+                               break;
                        case 'currentversion':
-                               return $this->mVarCache[$index] = SpecialVersion::getVersion();
+                               $value = SpecialVersion::getVersion();
+                               break;
                        case 'sitename':
                                return $wgSitename;
                        case 'server':
@@ -2532,6 +2651,8 @@ class Parser
                                return $wgServerName;
                        case 'scriptpath':
                                return $wgScriptPath;
+                       case 'stylepath':
+                               return $wgStylePath;
                        case 'directionmark':
                                return $wgContLang->getDirMark();
                        case 'contentlanguage':
@@ -2539,23 +2660,30 @@ class Parser
                                return $wgContLanguageCode;
                        default:
                                $ret = null;
-                               if ( wfRunHooks( 'ParserGetVariableValueSwitch', array( &$this, &$this->mVarCache, &$index, &$ret ) ) )
+                               if ( wfRunHooks( 'ParserGetVariableValueSwitch', array( &$this, &$this->mVarCache, &$index, &$ret, &$frame ) ) )
                                        return $ret;
                                else
                                        return null;
                }
+
+               if ( $index )
+                       $this->mVarCache[$index] = $value;
+
+               return $value;
        }
 
        /**
-        * initialise the magic variables (like CURRENTMONTHNAME)
+        * initialise the magic variables (like CURRENTMONTHNAME) and substitution modifiers 
         *
         * @private
         */
        function initialiseVariables() {
                wfProfileIn( __METHOD__ );
                $variableIDs = MagicWord::getVariableIDs();
+               $substIDs = MagicWord::getSubstIDs();
 
                $this->mVariables = new MagicWordArray( $variableIDs );
+               $this->mSubstWords = new MagicWordArray( $substIDs );
                wfProfileOut( __METHOD__ );
        }
 
@@ -2613,7 +2741,7 @@ class Parser
         *  self::OT_HTML: all templates and extension tags
         *
         * @param string $tex The text to transform
-        * @param PPFrame $frame Object describing the arguments passed to the template. 
+        * @param PPFrame $frame Object describing the arguments passed to the template.
         *        Arguments may also be provided as an associative array, as was the usual case before MW1.12.
         *        Providing arguments this way may be useful for extensions wishing to perform variable replacement explicitly.
         * @param bool $argsOnly Only do argument (triple-brace) expansion, not double-brace expansion
@@ -2676,14 +2804,10 @@ class Parser
         *       exceeded, provide the values (optional)
         */
        function limitationWarn( $limitationType, $current=null, $max=null) {
-               $msgName = $limitationType . '-warning';
                //does no harm if $current and $max are present but are unnecessary for the message
-               $warning = wfMsgExt( $msgName, array( 'parsemag', 'escape' ), $current, $max ); 
+               $warning = wfMsgExt( "$limitationType-warning", array( 'parsemag', 'escape' ), $current, $max );
                $this->mOutput->addWarning( $warning );
-               $cat = Title::makeTitleSafe( NS_CATEGORY, wfMsgForContent( $limitationType . '-category' ) );
-               if ( $cat ) {
-                       $this->mOutput->addCategory( $cat->getDBkey(), $this->getDefaultSort() );
-               }
+               $this->addTrackingCategory( "$limitationType-category" );
        }
 
        /**
@@ -2712,7 +2836,7 @@ class Parser
                $isLocalObj = false;        # $text is a DOM node needing expansion in the current frame
 
                # Title object, where $text came from
-               $title = NULL;
+               $title = null;
 
                # $part1 is the bit before the first |, and must contain only title characters.
                # Various prefixes will be stripped from it later.
@@ -2730,12 +2854,26 @@ class Parser
                # SUBST
                wfProfileIn( __METHOD__.'-modifiers' );
                if ( !$found ) {
-                       $mwSubst = MagicWord::get( 'subst' );
-                       if ( $mwSubst->matchStartAndRemove( $part1 ) xor $this->ot['wiki'] ) {
-                               # One of two possibilities is true:
-                               # 1) Found SUBST but not in the PST phase
-                               # 2) Didn't find SUBST and in the PST phase
-                               # In either case, return without further processing
+
+                       $substMatch = $this->mSubstWords->matchStartAndRemove( $part1 );
+
+                       # Possibilities for substMatch: "subst", "safesubst" or FALSE
+                       # Decide whether to expand template or keep wikitext as-is.
+                       if ( $this->ot['wiki'] )
+                       {
+                               if ( $substMatch === false ) {
+                                       $literal = true;  # literal when in PST with no prefix
+                               } else {
+                                       $literal = false; # expand when in PST with subst: or safesubst:
+                               }
+                       } else {
+                               if ( $substMatch == 'subst' ) {
+                                       $literal = true;  # literal when not in PST with plain subst:
+                               } else {
+                                       $literal = false; # expand when not in PST with safesubst: or no prefix
+                               }
+                       }
+                       if ( $literal ) {
                                $text = $frame->virtualBracketedImplode( '{{', '|', '}}', $titleWithSpaces, $args );
                                $isLocalObj = true;
                                $found = true;
@@ -2746,7 +2884,7 @@ class Parser
                if ( !$found && $args->getLength() == 0 ) {
                        $id = $this->mVariables->matchStartToEnd( $part1 );
                        if ( $id !== false ) {
-                               $text = $this->getVariableValue( $id );
+                               $text = $this->getVariableValue( $id, $frame );
                                if (MagicWord::getCacheTTL($id)>-1)
                                        $this->mOutput->mContainsOldMagic = true;
                                $found = true;
@@ -2785,7 +2923,7 @@ class Parser
                                        $function = $this->mFunctionSynonyms[1][$function];
                                } else {
                                        # Case insensitive functions
-                                       $function = strtolower( $function );
+                                       $function = $wgContLang->lc( $function );
                                        if ( isset( $this->mFunctionSynonyms[0][$function] ) ) {
                                                $function = $this->mFunctionSynonyms[0][$function];
                                        } else {
@@ -2822,7 +2960,7 @@ class Parser
                                        $found = true;
                                        $noparse = true;
                                        $preprocessFlags = 0;
-                                       
+
                                        if ( is_array( $result ) ) {
                                                if ( isset( $result[0] ) ) {
                                                        $text = $result[0];
@@ -3126,14 +3264,11 @@ class Parser
        function fetchScaryTemplateMaybeFromCache($url) {
                global $wgTranscludeCacheExpiry;
                $dbr = wfGetDB(DB_SLAVE);
+               $tsCond = $dbr->timestamp( time() - $wgTranscludeCacheExpiry );
                $obj = $dbr->selectRow('transcache', array('tc_time', 'tc_contents'),
-                               array('tc_url' => $url));
+                               array('tc_url' => $url, "tc_time >= " . $dbr->addQuotes( $tsCond ) ) );
                if ($obj) {
-                       $time = $obj->tc_time;
-                       $text = $obj->tc_contents;
-                       if ($time && time() < $time + $wgTranscludeCacheExpiry ) {
-                               return $text;
-                       }
+                       return $obj->tc_contents;
                }
 
                $text = Http::get($url);
@@ -3143,7 +3278,7 @@ class Parser
                $dbw = wfGetDB(DB_MASTER);
                $dbw->replace('transcache', array('tc_url'), array(
                        'tc_url' => $url,
-                       'tc_time' => time(),
+                       'tc_time' => $dbw->timestamp( time() ),
                        'tc_contents' => $text));
                return $text;
        }
@@ -3212,47 +3347,47 @@ class Parser
                $name = $frame->expand( $params['name'] );
                $attrText = !isset( $params['attr'] ) ? null : $frame->expand( $params['attr'] );
                $content = !isset( $params['inner'] ) ? null : $frame->expand( $params['inner'] );
-
                $marker = "{$this->mUniqPrefix}-$name-" . sprintf('%08X', $this->mMarkerIndex++) . self::MARKER_SUFFIX;
 
-               if ( $this->ot['html'] ) {
+               $isFunctionTag = isset( $this->mFunctionTagHooks[strtolower($name)] ) &&
+                       ( $this->ot['html'] || $this->ot['pre'] );
+               if ( $isFunctionTag ) {
+                       $markerType = 'none';
+               } else {
+                       $markerType = 'general';
+               }
+               if ( $this->ot['html'] || $isFunctionTag ) {
                        $name = strtolower( $name );
-
                        $attributes = Sanitizer::decodeTagAttributes( $attrText );
                        if ( isset( $params['attributes'] ) ) {
                                $attributes = $attributes + $params['attributes'];
                        }
-                       switch ( $name ) {
-                               case 'html':
-                                       if( $wgRawHtml ) {
-                                               $output = $content;
-                                               break;
-                                       } else {
-                                               throw new MWException( '<html> extension tag encountered unexpectedly' );
-                                       }
-                               case 'nowiki':
-                                       $content = strtr($content, array('-{' => '-&#123;', '}-' => '&#125;-'));
-                                       $output = Xml::escapeTagsOnly( $content );
-                                       break;
-                               case 'math':
-                                       $output = $wgContLang->armourMath(
-                                               MathRenderer::renderMath( $content, $attributes ) );
-                                       break;
-                               case 'gallery':
-                                       $output = $this->renderImageGallery( $content, $attributes );
-                                       break;
-                               default:
-                                       if( isset( $this->mTagHooks[$name] ) ) {
-                                               # Workaround for PHP bug 35229 and similar
-                                               if ( !is_callable( $this->mTagHooks[$name] ) ) {
-                                                       throw new MWException( "Tag hook for $name is not callable\n" );
-                                               }
-                                               $output = call_user_func_array( $this->mTagHooks[$name],
-                                                       array( $content, $attributes, $this ) );
-                                       } else {
-                                               $output = '<span class="error">Invalid tag extension name: ' .
-                                                       htmlspecialchars( $name ) . '</span>';
-                                       }
+
+                       if( isset( $this->mTagHooks[$name] ) ) {
+                               # Workaround for PHP bug 35229 and similar
+                               if ( !is_callable( $this->mTagHooks[$name] ) ) {
+                                       throw new MWException( "Tag hook for $name is not callable\n" );
+                               }
+                               $output = call_user_func_array( $this->mTagHooks[$name],
+                                       array( $content, $attributes, $this, $frame ) );
+                       } elseif( isset( $this->mFunctionTagHooks[$name] ) ) {
+                               list( $callback, $flags ) = $this->mFunctionTagHooks[$name];
+                               if( !is_callable( $callback ) )
+                                       throw new MWException( "Tag hook for $name is not callable\n" );
+
+                               $output = call_user_func_array( $callback,
+                                       array( &$this, $frame, $content, $attributes ) );
+                       } else {
+                               $output = '<span class="error">Invalid tag extension name: ' .
+                                       htmlspecialchars( $name ) . '</span>';
+                       }
+
+                       if ( is_array( $output ) ) {
+                               // Extract flags to local scope (to override $markerType)
+                               $flags = $output;
+                               $output = $flags[0];
+                               unset( $flags[0] );
+                               extract( $flags );
                        }
                } else {
                        if ( is_null( $attrText ) ) {
@@ -3272,10 +3407,14 @@ class Parser
                        }
                }
 
-               if ( $name === 'html' || $name === 'nowiki' ) {
+               if( $markerType === 'none' ) {
+                       return $output;
+               } elseif ( $markerType === 'nowiki' ) {
                        $this->mStripState->nowiki->setPair( $marker, $output );
-               } else {
+               } elseif ( $markerType === 'general' ) {
                        $this->mStripState->general->setPair( $marker, $output );
+               } else {
+                       throw new MWException( __METHOD__.': invalid marker type' );
                }
                return $marker;
        }
@@ -3316,6 +3455,7 @@ class Parser
         */
        function doDoubleUnderscore( $text ) {
                wfProfileIn( __METHOD__ );
+
                // The position of __TOC__ needs to be recorded
                $mw = MagicWord::get( 'toc' );
                if( $mw->match( $text ) ) {
@@ -3341,27 +3481,47 @@ class Parser
                }
                if ( isset( $this->mDoubleUnderscores['hiddencat'] ) && $this->mTitle->getNamespace() == NS_CATEGORY ) {
                        $this->mOutput->setProperty( 'hiddencat', 'y' );
-
-                       $containerCategory = Title::makeTitleSafe( NS_CATEGORY, wfMsgForContent( 'hidden-category-category' ) );
-                       if ( $containerCategory ) {
-                               $this->mOutput->addCategory( $containerCategory->getDBkey(), $this->getDefaultSort() );
-                       } else {
-                               wfDebug( __METHOD__.": [[MediaWiki:hidden-category-category]] is not a valid title!\n" );
-                       }
+                       $this->addTrackingCategory( 'hidden-category-category' );
                }
                # (bug 8068) Allow control over whether robots index a page.
                #
                # FIXME (bug 14899): __INDEX__ always overrides __NOINDEX__ here!  This
                # is not desirable, the last one on the page should win.
-               if( isset( $this->mDoubleUnderscores['noindex'] ) ) {
+               if( isset( $this->mDoubleUnderscores['noindex'] ) && $this->mTitle->canUseNoindex() ) {
                        $this->mOutput->setIndexPolicy( 'noindex' );
-               } elseif( isset( $this->mDoubleUnderscores['index'] ) ) {
+                       $this->addTrackingCategory( 'noindex-category' );
+               }
+               if( isset( $this->mDoubleUnderscores['index'] ) && $this->mTitle->canUseNoindex() ){
                        $this->mOutput->setIndexPolicy( 'index' );
+                       $this->addTrackingCategory( 'index-category' );
                }
+
                wfProfileOut( __METHOD__ );
                return $text;
        }
 
+       /**
+        * Add a tracking category, getting the title from a system message,
+        * or print a debug message if the title is invalid.
+        * @param $msg String message key
+        * @return Bool whether the addition was successful
+        */
+       protected function addTrackingCategory( $msg ){
+               $cat = wfMsgForContent( $msg );
+
+               # Allow tracking categories to be disabled by setting them to "-"
+               if( $cat === '-' ) return false;
+
+               $containerCategory = Title::makeTitleSafe( NS_CATEGORY, $cat );
+               if ( $containerCategory ) {
+                       $this->mOutput->addCategory( $containerCategory->getDBkey(), $this->getDefaultSort() );
+                       return true;
+               } else {
+                       wfDebug( __METHOD__.": [[MediaWiki:$msg]] is not a valid title!\n" );
+                       return false;
+               }
+       }
+
        /**
         * This function accomplishes several tasks:
         * 1) Auto-number headings if that option is enabled
@@ -3373,11 +3533,12 @@ class Parser
         * string and re-inserts the newly formatted headlines.
         *
         * @param string $text
+        * @param string $origText Original, untouched wikitext
         * @param boolean $isMain
         * @private
         */
-       function formatHeadings( $text, $isMain=true ) {
-               global $wgMaxTocLevel, $wgContLang, $wgEnforceHtmlIds;
+       function formatHeadings( $text, $origText, $isMain=true ) {
+               global $wgMaxTocLevel, $wgContLang, $wgHtml5, $wgExperimentalHtmlIds;
 
                $doNumberHeadings = $this->mOptions->getNumberHeadings();
                $showEditLink = $this->mOptions->getEditSection();
@@ -3442,6 +3603,12 @@ class Parser
                $prevtoclevel = 0;
                $markerRegex = "{$this->mUniqPrefix}-h-(\d+)-" . self::MARKER_SUFFIX;
                $baseTitleText = $this->mTitle->getPrefixedDBkey();
+               $oldType = $this->mOutputType;
+               $this->setOutputType( self::OT_WIKI );
+               $frame = $this->getPreprocessor()->newFrame();
+               $root = $this->preprocessToDom( $origText );
+               $node = $root->getFirstChild();
+               $byteOffset = 0;
                $tocraw = array();
 
                foreach( $matches[3] as $headline ) {
@@ -3463,64 +3630,61 @@ class Parser
                        }
                        $level = $matches[1][$headlineCount];
 
-                       if( $doNumberHeadings || $enoughToc ) {
-
-                               if ( $level > $prevlevel ) {
-                                       # Increase TOC level
-                                       $toclevel++;
-                                       $sublevelCount[$toclevel] = 0;
-                                       if( $toclevel<$wgMaxTocLevel ) {
-                                               $prevtoclevel = $toclevel;
-                                               $toc .= $sk->tocIndent();
-                                               $numVisible++;
-                                       }
+                       if ( $level > $prevlevel ) {
+                               # Increase TOC level
+                               $toclevel++;
+                               $sublevelCount[$toclevel] = 0;
+                               if( $toclevel<$wgMaxTocLevel ) {
+                                       $prevtoclevel = $toclevel;
+                                       $toc .= $sk->tocIndent();
+                                       $numVisible++;
                                }
-                               elseif ( $level < $prevlevel && $toclevel > 1 ) {
-                                       # Decrease TOC level, find level to jump to
+                       }
+                       elseif ( $level < $prevlevel && $toclevel > 1 ) {
+                               # Decrease TOC level, find level to jump to
 
-                                       for ($i = $toclevel; $i > 0; $i--) {
-                                               if ( $levelCount[$i] == $level ) {
-                                                       # Found last matching level
-                                                       $toclevel = $i;
-                                                       break;
-                                               }
-                                               elseif ( $levelCount[$i] < $level ) {
-                                                       # Found first matching level below current level
-                                                       $toclevel = $i + 1;
-                                                       break;
-                                               }
+                               for ($i = $toclevel; $i > 0; $i--) {
+                                       if ( $levelCount[$i] == $level ) {
+                                               # Found last matching level
+                                               $toclevel = $i;
+                                               break;
                                        }
-                                       if( $i == 0 ) $toclevel = 1;
-                                       if( $toclevel<$wgMaxTocLevel ) {
-                                               if($prevtoclevel < $wgMaxTocLevel) {
-                                                       # Unindent only if the previous toc level was shown :p
-                                                       $toc .= $sk->tocUnindent( $prevtoclevel - $toclevel );
-                                                       $prevtoclevel = $toclevel;
-                                               } else {
-                                                       $toc .= $sk->tocLineEnd();
-                                               }
+                                       elseif ( $levelCount[$i] < $level ) {
+                                               # Found first matching level below current level
+                                               $toclevel = $i + 1;
+                                               break;
                                        }
                                }
-                               else {
-                                       # No change in level, end TOC line
-                                       if( $toclevel<$wgMaxTocLevel ) {
+                               if( $i == 0 ) $toclevel = 1;
+                               if( $toclevel<$wgMaxTocLevel ) {
+                                       if($prevtoclevel < $wgMaxTocLevel) {
+                                               # Unindent only if the previous toc level was shown :p
+                                               $toc .= $sk->tocUnindent( $prevtoclevel - $toclevel );
+                                               $prevtoclevel = $toclevel;
+                                       } else {
                                                $toc .= $sk->tocLineEnd();
                                        }
                                }
+                       }
+                       else {
+                               # No change in level, end TOC line
+                               if( $toclevel<$wgMaxTocLevel ) {
+                                       $toc .= $sk->tocLineEnd();
+                               }
+                       }
 
-                               $levelCount[$toclevel] = $level;
+                       $levelCount[$toclevel] = $level;
 
-                               # count number of headlines for each level
-                               @$sublevelCount[$toclevel]++;
-                               $dot = 0;
-                               for( $i = 1; $i <= $toclevel; $i++ ) {
-                                       if( !empty( $sublevelCount[$i] ) ) {
-                                               if( $dot ) {
-                                                       $numbering .= '.';
-                                               }
-                                               $numbering .= $wgContLang->formatNum( $sublevelCount[$i] );
-                                               $dot = 1;
+                       # count number of headlines for each level
+                       @$sublevelCount[$toclevel]++;
+                       $dot = 0;
+                       for( $i = 1; $i <= $toclevel; $i++ ) {
+                               if( !empty( $sublevelCount[$i] ) ) {
+                                       if( $dot ) {
+                                               $numbering .= '.';
                                        }
+                                       $numbering .= $wgContLang->formatNum( $sublevelCount[$i] );
+                                       $dot = 1;
                                }
                        }
 
@@ -3550,11 +3714,7 @@ class Parser
                        # Save headline for section edit hint before it's escaped
                        $headlineHint = $safeHeadline;
 
-                       if ( $wgEnforceHtmlIds ) {
-                               $legacyHeadline = false;
-                               $safeHeadline = Sanitizer::escapeId( $safeHeadline,
-                                       'noninitial' );
-                       } else {
+                       if ( $wgHtml5 && $wgExperimentalHtmlIds ) {
                                # For reverse compatibility, provide an id that's
                                # HTML4-compatible, like we used to.
                                #
@@ -3566,20 +3726,17 @@ class Parser
                                # to type in section names like "abc_.D7.93.D7.90.D7.A4"
                                # manually, so let's not bother worrying about it.
                                $legacyHeadline = Sanitizer::escapeId( $safeHeadline,
-                                       'noninitial' );
-                               $safeHeadline = Sanitizer::escapeId( $safeHeadline, 'xml' );
+                                       array( 'noninitial', 'legacy' ) );
+                               $safeHeadline = Sanitizer::escapeId( $safeHeadline );
 
                                if ( $legacyHeadline == $safeHeadline ) {
                                        # No reason to have both (in fact, we can't)
                                        $legacyHeadline = false;
-                               } elseif ( $legacyHeadline != Sanitizer::escapeId(
-                               $legacyHeadline, 'xml' ) ) {
-                                       # The legacy id is invalid XML.  We used to allow this, but
-                                       # there's no reason to do so anymore.  Backward
-                                       # compatibility will fail slightly in this case, but it's
-                                       # no big deal.
-                                       $legacyHeadline = false;
                                }
+                       } else {
+                               $legacyHeadline = false;
+                               $safeHeadline = Sanitizer::escapeId( $safeHeadline,
+                                       'noninitial' );
                        }
 
                        # HTML names must be case-insensitively unique (bug 10721).  FIXME:
@@ -3607,7 +3764,7 @@ class Parser
                        # Don't number the heading if it is the only one (looks silly)
                        if( $doNumberHeadings && count( $matches[3] ) > 1) {
                                # the two are different if the line contains a link
-                               $headline=$numbering . ' ' . $headline;
+                               $headline = $numbering . ' ' . $headline;
                        }
 
                        # Create the anchor for linking from the TOC to the section
@@ -3620,9 +3777,33 @@ class Parser
                                $legacyAnchor .= '_' . $refers[$legacyArrayKey];
                        }
                        if( $enoughToc && ( !isset($wgMaxTocLevel) || $toclevel<$wgMaxTocLevel ) ) {
-                               $toc .= $sk->tocLine($anchor, $tocline, $numbering, $toclevel);
-                               $tocraw[] = array( 'toclevel' => $toclevel, 'level' => $level, 'line' => $tocline, 'number' => $numbering );
+                               $toc .= $sk->tocLine($anchor, $tocline,
+                                       $numbering, $toclevel, ($isTemplate ? false : $sectionIndex));
+                       }
+
+                       # Add the section to the section tree
+                       # Find the DOM node for this header
+                       while ( $node && !$isTemplate ) {
+                               if ( $node->getName() === 'h' ) {
+                                       $bits = $node->splitHeading();
+                                       if ( $bits['i'] == $sectionIndex )
+                                               break;
+                               }
+                               $byteOffset += mb_strlen( $this->mStripState->unstripBoth(
+                                       $frame->expand( $node, PPFrame::RECOVER_ORIG ) ) );
+                               $node = $node->getNextSibling();
                        }
+                       $tocraw[] = array(
+                               'toclevel' => $toclevel,
+                               'level' => $level,
+                               'line' => $tocline,
+                               'number' => $numbering,
+                               'index' => ($isTemplate ? 'T-' : '' ) . $sectionIndex,
+                               'fromtitle' => $titleText,
+                               'byteoffset' => ( $isTemplate ? null : $byteOffset ),
+                               'anchor' => $anchor,
+                       );
+
                        # give headline the correct <h#> tag
                        if( $showEditLink && $sectionIndex !== false ) {
                                if( $isTemplate ) {
@@ -3642,7 +3823,7 @@ class Parser
                        $headlineCount++;
                }
 
-               $this->mOutput->setSections( $tocraw );
+               $this->setOutputType( $oldType );
 
                # Never ever show TOC if no headers
                if( $numVisible < 1 ) {
@@ -3654,13 +3835,18 @@ class Parser
                                $toc .= $sk->tocUnindent( $prevtoclevel - 1 );
                        }
                        $toc = $sk->tocList( $toc );
+                       $this->mOutput->setTOCHTML( $toc );
+               }
+
+               if ( $isMain ) {
+                       $this->mOutput->setSections( $tocraw );
                }
 
                # split up and insert constructed headlines
 
                $blocks = preg_split( '/<H[1-6].*?' . '>.*?<\/H[1-6]>/i', $text );
                $i = 0;
-               
+
                foreach( $blocks as $block ) {
                        if( $showEditLink && $headlineCount > 0 && $i == 0 && $block !== "\n" ) {
                                # This is the [edit] link that appears for the top block of text when
@@ -3687,7 +3873,97 @@ class Parser
                        return $full;
                }
        }
-       
+
+       /**
+        * Merge $tree2 into $tree1 by replacing the section with index
+        * $section in $tree1 and its descendants with the sections in $tree2.
+        * Note that in the returned section tree, only the 'index' and
+        * 'byteoffset' fields are guaranteed to be correct.
+        * @param $tree1 array Section tree from ParserOutput::getSectons()
+       *  @param $tree2 array Section tree
+        * @param $section int Section index
+        * @param $title Title Title both section trees come from
+        * @param $len2 int Length of the original wikitext for $tree2
+        * @return array Merged section tree
+        */
+       public static function mergeSectionTrees( $tree1, $tree2, $section, $title, $len2 ) {
+               global $wgContLang;
+               $newTree = array();
+               $targetLevel = false;
+               $merged = false;
+               $lastLevel = 1;
+               $nextIndex = 1;
+               $numbering = array( 0 );
+               $titletext = $title->getPrefixedDBkey();
+               foreach ( $tree1 as $s ) {
+                       if ( $targetLevel !== false ) {
+                               if ( $s['level'] <= $targetLevel )
+                                       // We've skipped enough
+                                       $targetLevel = false;
+                               else
+                                       continue;
+                       }
+                       if ( $s['index'] != $section ||
+                                       $s['fromtitle'] != $titletext ) {
+                               self::incrementNumbering( $numbering,
+                                       $s['toclevel'], $lastLevel );
+
+                               // Rewrite index, byteoffset and number
+                               if ( $s['fromtitle'] == $titletext ) {
+                                       $s['index'] = $nextIndex++;
+                                       if ( $merged )
+                                               $s['byteoffset'] += $len2;
+                               }
+                               $s['number']  = implode( '.', array_map(
+                                       array( $wgContLang, 'formatnum' ),
+                                       $numbering ) );
+                               $lastLevel = $s['toclevel'];
+                               $newTree[] = $s;
+                       } else {
+                               // We're at $section
+                               // Insert sections from $tree2 here
+                               foreach ( $tree2 as $s2 ) {
+                                       // Rewrite the fields in $s2
+                                       // before inserting it
+                                       $s2['toclevel'] += $s['toclevel'] - 1;
+                                       $s2['level'] += $s['level'] - 1;
+                                       $s2['index'] = $nextIndex++;
+                                       $s2['byteoffset'] += $s['byteoffset'];
+
+                                       self::incrementNumbering( $numbering,
+                                               $s2['toclevel'], $lastLevel );
+                                       $s2['number']  = implode( '.', array_map(
+                                               array( $wgContLang, 'formatnum' ),
+                                               $numbering ) );
+                                       $lastLevel = $s2['toclevel'];
+                                       $newTree[] = $s2;
+                               }
+                               // Skip all descendants of $section in $tree1
+                               $targetLevel = $s['level'];
+                               $merged = true;
+                       }
+               }
+               return $newTree;
+       }
+
+       /**
+        * Increment a section number. Helper function for mergeSectionTrees()
+        * @param $number array Array representing a section number
+        * @param $level int Current TOC level (depth)
+        * @param $lastLevel int Level of previous TOC entry
+        */
+       private static function incrementNumbering( &$number, $level, $lastLevel ) {
+               if ( $level > $lastLevel )
+                       $number[$level - 1] = 1;
+               else if ( $level < $lastLevel ) {
+                       foreach ( $number as $key => $unused )
+                               if ( $key >= $level )
+                                       unset( $number[$key] );
+                       $number[$level - 1]++;
+               } else
+                       $number[$level - 1]++;
+       }
+
        /**
         * Transform wiki markup when saving a page by doing \r\n -> \n
         * conversion, substitting signatures, {{subst:}} templates, etc.
@@ -3733,26 +4009,29 @@ class Parser
                 * (see also bug 12815)
                 */
                $ts = $this->mOptions->getTimestamp();
-               $tz = wfMsgForContent( 'timezone-utc' );
                if ( isset( $wgLocaltimezone ) ) {
-                       $unixts = wfTimestamp( TS_UNIX, $ts );
-                       $oldtz = getenv( 'TZ' );
-                       putenv( 'TZ='.$wgLocaltimezone );
-                       $ts = date( 'YmdHis', $unixts );
-                       $tz = date( 'T', $unixts );  # might vary on DST changeover!
+                       $tz = $wgLocaltimezone;
+               } else {
+                       $tz = date_default_timezone_get();
+               }
 
-                       /* Allow translation of timezones trough wiki. date() can return
-                        * whatever crap the system uses, localised or not, so we cannot
-                        * ship premade translations.
-                        */
-                       $key = 'timezone-' . strtolower( trim( $tz ) );
-                       $value = wfMsgForContent( $key );
-                       if ( !wfEmptyMsg( $key, $value ) ) $tz = $value;
+               $unixts = wfTimestamp( TS_UNIX, $ts );
+               $oldtz = date_default_timezone_get();
+               date_default_timezone_set( $tz );
+               $ts = date( 'YmdHis', $unixts );
+               $tzMsg = date( 'T', $unixts );  # might vary on DST changeover!
 
-                       putenv( 'TZ='.$oldtz );
-               }
+               /* Allow translation of timezones trough wiki. date() can return
+                * whatever crap the system uses, localised or not, so we cannot
+                * ship premade translations.
+                */
+               $key = 'timezone-' . strtolower( trim( $tzMsg ) );
+               $value = wfMsgForContent( $key );
+               if ( !wfEmptyMsg( $key, $value ) ) $tzMsg = $value;
 
-               $d = $wgContLang->timeanddate( $ts, false, false ) . " ($tz)";
+               date_default_timezone_set( $oldtz );
+
+               $d = $wgContLang->timeanddate( $ts, false, false ) . " ($tzMsg)";
 
                # Variable replacement
                # Because mOutputType is OT_WIKI, this will only process {{subst:xxx}} type tags
@@ -3766,32 +4045,11 @@ class Parser
                        '~~~' => $sigText
                ) );
 
-               # Context links: [[|name]] and [[name (context)|]]
-               #
+               # Links of the form [[|<blah>]] or [[<blah>|]] perform pipe tricks
+               # Note this only allows the # in the position it works.
                global $wgLegalTitleChars;
-               $tc = "[$wgLegalTitleChars]";
-               $nc = '[ _0-9A-Za-z\x80-\xff-]'; # Namespaces can use non-ascii!
-
-               $p1 = "/\[\[(:?$nc+:|:|)($tc+?)( \\($tc+\\))\\|]]/";            # [[ns:page (context)|]]
-               $p4 = "/\[\[(:?$nc+:|:|)($tc+?)(($tc+))\\|]]/";             # [[ns:page(context)|]]
-               $p3 = "/\[\[(:?$nc+:|:|)($tc+?)( \\($tc+\\)|)(, $tc+|)\\|]]/";  # [[ns:page (context), context|]]
-               $p2 = "/\[\[\\|($tc+)]]/";                                      # [[|page]]
-
-               # try $p1 first, to turn "[[A, B (C)|]]" into "[[A, B (C)|A, B]]"
-               $text = preg_replace( $p1, '[[\\1\\2\\3|\\2]]', $text );
-               $text = preg_replace( $p4, '[[\\1\\2\\3|\\2]]', $text );
-               $text = preg_replace( $p3, '[[\\1\\2\\3\\4|\\2]]', $text );
-
-               $t = $this->mTitle->getText();
-               $m = array();
-               if ( preg_match( "/^($nc+:|)$tc+?( \\($tc+\\))$/", $t, $m ) ) {
-                       $text = preg_replace( $p2, "[[$m[1]\\1$m[2]|\\1]]", $text );
-               } elseif ( preg_match( "/^($nc+:|)$tc+?(, $tc+|)$/", $t, $m ) && '' != "$m[1]$m[2]" ) {
-                       $text = preg_replace( $p2, "[[$m[1]\\1$m[2]|\\1]]", $text );
-               } else {
-                       # if there's no context, don't bother duplicating the title
-                       $text = preg_replace( $p2, '[[\\1]]', $text );
-               }
+               $pipeTrickRe = "/\[\[(?:(\\|)([$wgLegalTitleChars]+)|([#$wgLegalTitleChars]+)\\|)\]\]/";
+               $text = preg_replace_callback( $pipeTrickRe, array( $this, 'pstPipeTrickCallback' ), $text );
 
                # Trim trailing whitespace
                $text = rtrim( $text );
@@ -3799,25 +4057,52 @@ class Parser
                return $text;
        }
 
+       /**
+        * Called from pstPass2 to perform the pipe trick on links.
+        * Original was either [[|text]] or [[link|]]
+        *
+        * @param Array ("|" or "", text, link) $m
+        */
+       function pstPipeTrickCallback( $m )
+       {
+               if( $m[1] ) { # [[|<blah>]]
+                       $text = $m[2];
+                       $link = $this->getPipeTrickLink( $text );
+               } else { # [[<blah>|]]
+                       $link = $m[3];
+                       $text = $this->getPipeTrickText( $link );
+               }
+
+               return $link === $text ? "[[$link]]" : "[[$link|$text]]";
+       }
+
        /**
         * Fetch the user's signature text, if any, and normalize to
         * validated, ready-to-insert wikitext.
+        * If you have pre-fetched the nickname or the fancySig option, you can
+        * specify them here to save a database query.
         *
         * @param User $user
         * @return string
-        * @private
         */
-       function getUserSig( &$user ) {
+       function getUserSig( &$user, $nickname = false, $fancySig = null ) {
                global $wgMaxSigChars;
 
                $username = $user->getName();
-               $nickname = $user->getOption( 'nickname' );
-               $nickname = $nickname === null ? $username : $nickname;
+
+               // If not given, retrieve from the user object.
+               if ( $nickname === false )
+                       $nickname = $user->getOption( 'nickname' );
+
+               if ( is_null( $fancySig ) )
+                       $fancySig = $user->getBoolOption( 'fancysig' );
+
+               $nickname = $nickname == null ? $username : $nickname;
 
                if( mb_strlen( $nickname ) > $wgMaxSigChars ) {
                        $nickname = $username;
                        wfDebug( __METHOD__ . ": $username has overlong signature.\n" );
-               } elseif( $user->getBoolOption( 'fancysig' ) !== false ) {
+               } elseif( $fancySig !== false ) {
                        # Sig. might contain markup; validate this
                        if( $this->validateSig( $nickname ) !== false ) {
                                # Validated; clean up (if needed) and return it
@@ -3971,7 +4256,9 @@ class Parser
                return $oldVal;
        }
 
+       /* An old work-around for bug 2257 - deprecated 2010-02-13 */
        function setTransparentTagHook( $tag, $callback ) {
+               wfDeprecated( __METHOD__ );
                $tag = strtolower( $tag );
                $oldVal = isset( $this->mTransparentTagHooks[$tag] ) ? $this->mTransparentTagHooks[$tag] : null;
                $this->mTransparentTagHooks[$tag] = $callback;
@@ -4010,28 +4297,30 @@ class Parser
         * @param integer $flags a combination of the following flags:
         *     SFH_NO_HASH   No leading hash, i.e. {{plural:...}} instead of {{#if:...}}
         *
-        *     SFH_OBJECT_ARGS   Pass the template arguments as PPNode objects instead of text. This 
+        *     SFH_OBJECT_ARGS   Pass the template arguments as PPNode objects instead of text. This
         *     allows for conditional expansion of the parse tree, allowing you to eliminate dead
-        *     branches and thus speed up parsing. It is also possible to analyse the parse tree of 
+        *     branches and thus speed up parsing. It is also possible to analyse the parse tree of
         *     the arguments, and to control the way they are expanded.
         *
         *     The $frame parameter is a PPFrame. This can be used to produce expanded text from the
         *     arguments, for instance:
         *         $text = isset( $args[0] ) ? $frame->expand( $args[0] ) : '';
         *
-        *     For technical reasons, $args[0] is pre-expanded and will be a string. This may change in 
+        *     For technical reasons, $args[0] is pre-expanded and will be a string. This may change in
         *     future versions. Please call $frame->expand() on it anyway so that your code keeps
         *     working if/when this is changed.
         *
         *     If you want whitespace to be trimmed from $args, you need to do it yourself, post-
         *     expansion.
         *
-        *     Please read the documentation in includes/parser/Preprocessor.php for more information 
+        *     Please read the documentation in includes/parser/Preprocessor.php for more information
         *     about the methods available in PPFrame and PPNode.
         *
         * @return The old callback function for this name, if any
         */
        function setFunctionHook( $id, $callback, $flags = 0 ) {
+               global $wgContLang;
+
                $oldVal = isset( $this->mFunctionHooks[$id] ) ? $this->mFunctionHooks[$id][0] : null;
                $this->mFunctionHooks[$id] = array( $callback, $flags );
 
@@ -4046,7 +4335,7 @@ class Parser
                foreach ( $synonyms as $syn ) {
                        # Case
                        if ( !$sensitive ) {
-                               $syn = strtolower( $syn );
+                               $syn = $wgContLang->lc( $syn );
                        }
                        # Add leading hash
                        if ( !( $flags & SFH_NO_HASH ) ) {
@@ -4070,6 +4359,24 @@ class Parser
                return array_keys( $this->mFunctionHooks );
        }
 
+       /**
+        * Create a tag function, e.g. <test>some stuff</test>.
+        * Unlike tag hooks, tag functions are parsed at preprocessor level.
+        * Unlike parser functions, their content is not preprocessed.
+        */
+       function setFunctionTagHook( $tag, $callback, $flags ) {
+               $tag = strtolower( $tag );
+               $old = isset( $this->mFunctionTagHooks[$tag] ) ?
+                       $this->mFunctionTagHooks[$tag] : null;
+               $this->mFunctionTagHooks[$tag] = array( $callback, $flags );
+
+               if( !in_array( $tag, $this->mStripList ) ) {
+                       $this->mStripList[] = $tag;
+               }
+
+               return $old;
+       }
+
        /**
         * FIXME: update documentation. makeLinkObj() is deprecated.
         * Replace <!--LINK--> link placeholders with actual links, in the buffer
@@ -4090,19 +4397,6 @@ class Parser
                return $this->mLinkHolders->replaceText( $text );
        }
 
-       /**
-        * Tag hook handler for 'pre'.
-        */
-       function renderPreTag( $text, $attribs ) {
-               // Backwards-compatibility hack
-               $content = StringUtils::delimiterReplace( '<nowiki>', '</nowiki>', '$1', $text, 'i' );
-
-               $attribs = Sanitizer::validateTagAttributes( $attribs, 'pre' );
-               return Xml::openElement( 'pre', $attribs ) .
-                       Xml::escapeTagsOnly( $content ) .
-                       '</pre>';
-       }
-
        /**
         * Renders an image gallery from a text with one line per image.
         * text labels may be given by using |-style alternative text. E.g.
@@ -4151,7 +4445,7 @@ class Parser
                        if ( count( $matches ) == 0 ) {
                                continue;
                        }
-                       
+
                        if ( strpos( $matches[0], '%' ) !== false )
                                $matches[1] = urldecode( $matches[1] );
                        $tp = Title::newFromText( $matches[1]/*, NS_FILE*/ );
@@ -4233,11 +4527,13 @@ class Parser
                #  * none       same, but not aligned
                #  * ___px      scale to ___ pixels width, no aligning. e.g. use in taxobox
                #  * center     center the image
-               #  * framed     Keep original image size, no magnify-button.
+               #  * frame      Keep original image size, no magnify-button.
+               #  * framed     Same as "frame"
                #  * frameless  like 'thumb' but without a frame. Keeps user preferences for width
                #  * upright    reduce width for upright images, rounded to full __0 px
                #  * border     draw a 1px border around the image
                #  * alt        Text for HTML alt attribute (defaults to empty)
+               #  * link       Set the target of the image link. Can be external, interwiki, or local
                # vertical-align values (no % or length right now):
                #  * baseline
                #  * sub
@@ -4261,15 +4557,7 @@ class Parser
 
                # Get the file
                $imagename = $title->getDBkey();
-               if ( isset( $this->mFileCache[$imagename][$time] ) ) {
-                       $file = $this->mFileCache[$imagename][$time];
-               } else {
-                       $file = wfFindFile( $title, $time );
-                       if ( count( $this->mFileCache ) > 1000 ) {
-                               $this->mFileCache = array();
-                       }
-                       $this->mFileCache[$imagename][$time] = $file;
-               }
+               $file = wfFindFile( $title, array( 'time' => $time ) );
                # Get parameter map
                $handler = $file ? $file->getHandler() : false;
 
@@ -4318,7 +4606,7 @@ class Parser
                                                switch( $paramName ) {
                                                case 'manualthumb':
                                                case 'alt':
-                                                       // @fixme - possibly check validity here for
+                                                       // @todo Fixme: possibly check validity here for
                                                        // manualthumb? downstream behavior seems odd with
                                                        // missing manual thumbs.
                                                        $validated = true;
@@ -4373,7 +4661,11 @@ class Parser
 
                $params['frame']['caption'] = $caption;
 
-               $params['frame']['title'] = $this->stripAltText( $caption, $holders );
+               # Will the image be presented in a frame, with the caption below?
+               $imageIsFramed = isset( $params['frame']['frame'] ) ||
+                                isset( $params['frame']['framed'] ) ||
+                                isset( $params['frame']['thumbnail'] ) ||
+                                isset( $params['frame']['manualthumb'] );
 
                # In the old days, [[Image:Foo|text...]] would set alt text.  Later it
                # came to also set the caption, ordinary text after the image -- which
@@ -4391,11 +4683,27 @@ class Parser
                # named parameter entirely for images without a caption; adding an ex-
                # plicit caption= parameter and preserving the old magic unnamed para-
                # meter for BC; ...
-               if( $caption !== '' && !isset( $params['frame']['alt'] )
-               && !isset( $params['frame']['framed'] )
-               && !isset( $params['frame']['thumbnail'] )
-               && !isset( $params['frame']['manualthumb'] ) ) {
-                       $params['frame']['alt'] = $params['frame']['title'];
+               if ( $imageIsFramed ) { # Framed image
+                       if ( $caption === '' && !isset( $params['frame']['alt'] ) ) {
+                               # No caption or alt text, add the filename as the alt text so
+                               # that screen readers at least get some description of the image
+                               $params['frame']['alt'] = $title->getText();
+                       }
+                       # Do not set $params['frame']['title'] because tooltips don't make sense
+                       # for framed images
+               } else { # Inline image
+                       if ( !isset( $params['frame']['alt'] ) ) {
+                               # No alt text, use the "caption" for the alt text
+                               if ( $caption !== '') {
+                                       $params['frame']['alt'] = $this->stripAltText( $caption, $holders );
+                               } else {
+                                       # No caption, fall back to using the filename for the
+                                       # alt text
+                                       $params['frame']['alt'] = $title->getText();
+                               }
+                       }
+                       # Use the "caption" for the tooltip text
+                       $params['frame']['title'] = $this->stripAltText( $caption, $holders );
                }
 
                wfRunHooks( 'ParserMakeImageParams', array( $title, $file, &$params ) );
@@ -4410,7 +4718,7 @@ class Parser
 
                return $ret;
        }
-       
+
        protected function stripAltText( $caption, $holders ) {
                # Strip bad stuff out of the title (tooltip).  We can't just use
                # replaceLinkHoldersText() here, because if this function is called
@@ -4426,7 +4734,7 @@ class Parser
                # remove the tags
                $tooltip = $this->mStripState->unstripBoth( $tooltip );
                $tooltip = Sanitizer::stripAllTags( $tooltip );
-               
+
                return $tooltip;
        }
 
@@ -4458,9 +4766,9 @@ class Parser
        /**#@+
         * Accessor/mutator
         */
-       function Title( $x = NULL ) { return wfSetVar( $this->mTitle, $x ); }
-       function Options( $x = NULL ) { return wfSetVar( $this->mOptions, $x ); }
-       function OutputType( $x = NULL ) { return wfSetVar( $this->mOutputType, $x ); }
+       function Title( $x = null ) { return wfSetVar( $this->mTitle, $x ); }
+       function Options( $x = null ) { return wfSetVar( $this->mOptions, $x ); }
+       function OutputType( $x = null ) { return wfSetVar( $this->mOutputType, $x ); }
        /**#@-*/
 
        /**#@+
@@ -4862,7 +5170,7 @@ class Parser
                        $links['interwiki'][] = $this->mLinkHolders->interwiki[$key];
                        $pos = $start_pos + strlen( "<!--IWLINK $key-->" );
                }
-               
+
                $data['linkholder'] = $links;
 
                return $data;
@@ -4871,7 +5179,7 @@ class Parser
        function unserialiseHalfParsedText( $data, $intPrefix = null /* Unique identifying prefix */ ) {
                if (!$intPrefix)
                        $intPrefix = $this->getRandomString();
-               
+
                // First, extract the strip state.
                $stripState = $data['stripstate'];
                $this->mStripState->general->merge( $stripState->general );