X-Git-Url: http://git.heureux-cyclage.org/?a=blobdiff_plain;f=includes%2FTitle.php;h=0d5d1c74147b95984cfcda6323122b1fdebb669f;hb=4a3cd50cba4aefba6e32c2a3de3de56eb368ad9e;hp=167d40634089a3b4fc217e1b096f3560aaeb46d9;hpb=f2dfed19309b4978b29cfb2e505fb40d0c276827;p=lhc%2Fweb%2Fwiklou.git diff --git a/includes/Title.php b/includes/Title.php index 167d406340..0d5d1c7414 100644 --- a/includes/Title.php +++ b/includes/Title.php @@ -1,7 +1,7 @@ mInterwiki = $this->mUrlform = $this->mTextform = $this->mDbkeyform = ''; $this->mArticleID = -1; - $this->mNamespace = 0; + $this->mNamespace = NS_MAIN; $this->mRestrictionsLoaded = false; $this->mRestrictions = array(); # Dont change the following, NS_MAIN is hardcoded in several place # See bug #696 $this->mDefaultNamespace = NS_MAIN; + $this->mWatched = NULL; + $this->mLatestID = false; } /** @@ -84,7 +90,7 @@ class Title { else return NULL; } - + /** * Create a new Title from text, such as what one would * find in a link. Decodes any HTML entities in the text. @@ -98,10 +104,15 @@ class Title { * @static * @access public */ - /* static */ function &newFromText( $text, $defaultNamespace = 0 ) { + function newFromText( $text, $defaultNamespace = NS_MAIN ) { + global $wgTitleCache; $fname = 'Title::newFromText'; wfProfileIn( $fname ); - + + if( is_object( $text ) ) { + wfDebugDieBacktrace( 'Title::newFromText given an object' ); + } + /** * Wiki pages often contain multiple links to the same page. * Title normalization and parsing can become expensive on @@ -110,44 +121,34 @@ class Title { * * In theory these are value objects and won't get changed... */ - static $titleCache = array(); - if( $defaultNamespace == 0 && isset( $titleCache[$text] ) ) { + if( $defaultNamespace == NS_MAIN && isset( $wgTitleCache[$text] ) ) { wfProfileOut( $fname ); - return $titleCache[$text]; + return $wgTitleCache[$text]; } /** - * Convert things like é into real text... + * Convert things like é ā or 〗 into real text... */ - global $wgInputEncoding; - $filteredText = do_html_entity_decode( $text, ENT_COMPAT, $wgInputEncoding ); - - /** - * Convert things like ā or 〗 into real text... - * WARNING: Not friendly to internal links on a latin-1 wiki. - */ - $filteredText = wfMungeToUtf8( $filteredText ); - - # What was this for? TS 2004-03-03 - # $text = urldecode( $text ); + $filteredText = Sanitizer::decodeCharReferences( $text ); $t =& new Title(); $t->mDbkeyform = str_replace( ' ', '_', $filteredText ); $t->mDefaultNamespace = $defaultNamespace; if( $t->secureAndSplit() ) { - if( $defaultNamespace == 0 ) { - if( count( $titleCache ) >= MW_TITLECACHE_MAX ) { + if( $defaultNamespace == NS_MAIN ) { + if( count( $wgTitleCache ) >= MW_TITLECACHE_MAX ) { # Avoid memory leaks on mass operations... - $titleCache = array(); + $wgTitleCache = array(); } - $titleCache[$text] =& $t; + $wgTitleCache[$text] =& $t; } wfProfileOut( $fname ); return $t; } else { wfProfileOut( $fname ); - return NULL; + $ret = NULL; + return $ret; } } @@ -159,15 +160,14 @@ class Title { * @static * @access public */ - /* static */ function newFromURL( $url ) { - global $wgLang, $wgServer; + function newFromURL( $url ) { $t = new Title(); - + # For compatibility with old buggy URLs. "+" is not valid in titles, # but some URLs used it as a space replacement and they still come # from some external search tools. $s = str_replace( '+', ' ', $url ); - + $t->mDbkeyform = str_replace( ' ', '_', $s ); if( $t->secureAndSplit() ) { return $t; @@ -175,19 +175,22 @@ class Title { return NULL; } } - + /** * Create a new Title from an article ID + * * @todo This is inefficiently implemented, the page row is requested - * but not used for anything else + * but not used for anything else + * * @param int $id the page_id corresponding to the Title to create * @return Title the new object, or NULL on an error * @access public + * @static */ - /* static */ function newFromID( $id ) { + function newFromID( $id ) { $fname = 'Title::newFromID'; $dbr =& wfGetDB( DB_SLAVE ); - $row = $dbr->selectRow( 'page', array( 'page_namespace', 'page_title' ), + $row = $dbr->selectRow( 'page', array( 'page_namespace', 'page_title' ), array( 'page_id' => $id ), $fname ); if ( $row !== false ) { $title = Title::makeTitle( $row->page_namespace, $row->page_title ); @@ -196,7 +199,7 @@ class Title { } return $title; } - + /** * Create a new Title from a namespace index and a DB key. * It's assumed that $ns and $title are *valid*, for instance when @@ -210,11 +213,11 @@ class Title { * @static * @access public */ - /* static */ function &makeTitle( $ns, $title ) { + function &makeTitle( $ns, $title ) { $t =& new Title(); $t->mInterwiki = ''; $t->mFragment = ''; - $t->mNamespace = IntVal( $ns ); + $t->mNamespace = intval( $ns ); $t->mDbkeyform = str_replace( ' ', '_', $title ); $t->mArticleID = ( $ns >= 0 ) ? -1 : 0; $t->mUrlform = wfUrlencode( $t->mDbkeyform ); @@ -226,13 +229,14 @@ class Title { * Create a new Title frrom a namespace index and a DB key. * The parameters will be checked for validity, which is a bit slower * than makeTitle() but safer for user-provided data. + * * @param int $ns the namespace of the article * @param string $title the database key form * @return Title the new object, or NULL on an error * @static * @access public */ - /* static */ function makeTitleSafe( $ns, $title ) { + function makeTitleSafe( $ns, $title ) { $t = new Title(); $t->mDbkeyform = Title::makeName( $ns, $title ); if( $t->secureAndSplit() ) { @@ -244,11 +248,12 @@ class Title { /** * Create a new Title for the Main Page + * * @static * @return Title the new object * @access public */ - /* static */ function newMainPage() { + function newMainPage() { return Title::newFromText( wfMsgForContent( 'mainpage' ) ); } @@ -260,18 +265,18 @@ class Title { * @static * @access public */ - /* static */ function newFromRedirect( $text ) { + function newFromRedirect( $text ) { global $wgMwRedir; $rt = NULL; if ( $wgMwRedir->matchStart( $text ) ) { - if ( preg_match( '/\\[\\[([^\\]\\|]+)[\\]\\|]/', $text, $m ) ) { + if ( preg_match( '/\[{2}(.*?)(?:\||\]{2})/', $text, $m ) ) { # categories are escaped using : for example one can enter: # #REDIRECT [[:Category:Music]]. Need to remove it. if ( substr($m[1],0,1) == ':') { # We don't want to keep the ':' $m[1] = substr( $m[1], 1 ); } - + $rt = Title::newFromText( $m[1] ); # Disallow redirects to Special:Userlogout if ( !is_null($rt) && $rt->getNamespace() == NS_SPECIAL && preg_match( '/^Userlogout/i', $rt->getText() ) ) { @@ -281,7 +286,7 @@ class Title { } return $rt; } - + #---------------------------------------------------------------------------- # Static functions #---------------------------------------------------------------------------- @@ -294,10 +299,10 @@ class Title { * @static * @access public */ - /* static */ function nameOf( $id ) { + function nameOf( $id ) { $fname = 'Title::nameOf'; $dbr =& wfGetDB( DB_SLAVE ); - + $s = $dbr->selectRow( 'page', array( 'page_namespace','page_title' ), array( 'page_id' => $id ), $fname ); if ( $s === false ) { return NULL; } @@ -311,27 +316,11 @@ class Title { * @static * @access public */ - /* static */ function legalChars() { - # Missing characters: - # * []|# Needed for link syntax - # * % and + are corrupted by Apache when they appear in the path - # - # % seems to work though - # - # The problem with % is that URLs are double-unescaped: once by Apache's - # path conversion code, and again by PHP. So %253F, for example, becomes "?". - # Our code does not double-escape to compensate for this, indeed double escaping - # would break if the double-escaped title was passed in the query string - # rather than the path. This is a minor security issue because articles can be - # created such that they are hard to view or edit. -- TS - # - # Theoretically 0x80-0x9F of ISO 8859-1 should be disallowed, but - # this breaks interlanguage links - - $set = " %!\"$&'()*,\\-.\\/0-9:;=?@A-Z\\\\^_`a-z~\\x80-\\xFF"; - return $set; + function legalChars() { + global $wgLegalTitleChars; + return $wgLegalTitleChars; } - + /** * Get a string representation of a title suitable for * including in a search index @@ -342,7 +331,7 @@ class Title { * search index */ /* static */ function indexTitle( $ns, $title ) { - global $wgDBminWordLen, $wgContLang; + global $wgContLang; require_once( 'SearchEngine.php' ); $lc = SearchEngine::legalSearchChars() . '&#;'; @@ -361,7 +350,7 @@ class Title { } return trim( $t ); } - + /* * Make a prefixed DB key from a DB key and a namespace index * @param int $ns numerical representation of the namespace @@ -372,10 +361,9 @@ class Title { global $wgContLang; $n = $wgContLang->getNsText( $ns ); - if ( '' == $n ) { return $title; } - else { return $n.':'.$title; } + return $n == '' ? $title : "$n:$title"; } - + /** * Returns the URL associated with an interwiki prefix * @param string $key the interwiki prefix (e.g. "MeatBall") @@ -384,53 +372,56 @@ class Title { * @static (arguably) * @access public */ - function getInterwikiLink( $key ) { + function getInterwikiLink( $key ) { global $wgMemc, $wgDBname, $wgInterwikiExpiry, $wgTitleInterwikiCache; $fname = 'Title::getInterwikiLink'; - + wfProfileIn( $fname ); - + + $key = strtolower( $key ); + $k = $wgDBname.':interwiki:'.$key; if( array_key_exists( $k, $wgTitleInterwikiCache ) ) { wfProfileOut( $fname ); return $wgTitleInterwikiCache[$k]->iw_url; } - $s = $wgMemc->get( $k ); + $s = $wgMemc->get( $k ); # Ignore old keys with no iw_local - if( $s && isset( $s->iw_local ) ) { + if( $s && isset( $s->iw_local ) && isset($s->iw_trans)) { $wgTitleInterwikiCache[$k] = $s; wfProfileOut( $fname ); return $s->iw_url; } - + $dbr =& wfGetDB( DB_SLAVE ); $res = $dbr->select( 'interwiki', - array( 'iw_url', 'iw_local' ), + array( 'iw_url', 'iw_local', 'iw_trans' ), array( 'iw_prefix' => $key ), $fname ); if( !$res ) { wfProfileOut( $fname ); return ''; } - + $s = $dbr->fetchObject( $res ); if( !$s ) { # Cache non-existence: create a blank object and save it to memcached $s = (object)false; $s->iw_url = ''; $s->iw_local = 0; + $s->iw_trans = 0; } $wgMemc->set( $k, $s, $wgInterwikiExpiry ); $wgTitleInterwikiCache[$k] = $s; - + wfProfileOut( $fname ); return $s->iw_url; } /** * Determine whether the object refers to a page within - * this project. - * + * this project. + * * @return bool TRUE if this is an in-project interwiki link * or a wikilink, FALSE otherwise * @access public @@ -448,6 +439,24 @@ class Title { } } + /** + * Determine whether the object refers to a page within + * this project and is transcludable. + * + * @return bool TRUE if this is transcludable + * @access public + */ + function isTrans() { + global $wgTitleInterwikiCache, $wgDBname; + + if ($this->mInterwiki == '' || !$this->isLocal()) + return false; + # Make sure key is loaded into cache + $this->getInterwikiLink( $this->mInterwiki ); + $k = $wgDBname.':interwiki:' . $this->mInterwiki; + return (bool)($wgTitleInterwikiCache[$k]->iw_trans); + } + /** * Update the page_touched field for an array of title objects * @todo Inefficient unless the IDs are already loaded into the @@ -458,7 +467,8 @@ class Title { * @static * @access public */ - /* static */ function touchArray( $titles, $timestamp = '' ) { + function touchArray( $titles, $timestamp = '' ) { + if ( count( $titles ) == 0 ) { return; } @@ -466,13 +476,19 @@ class Title { if ( $timestamp == '' ) { $timestamp = $dbw->timestamp(); } + /* $page = $dbw->tableName( 'page' ); $sql = "UPDATE $page SET page_touched='{$timestamp}' WHERE page_id IN ("; $first = true; foreach ( $titles as $title ) { - if ( ! $first ) { - $sql .= ','; + if ( $wgUseFileCache ) { + $cm = new CacheManager($title); + @unlink($cm->fileCacheName()); + } + + if ( ! $first ) { + $sql .= ','; } $first = false; $sql .= $title->getArticleID(); @@ -481,6 +497,18 @@ class Title { if ( ! $first ) { $dbw->query( $sql, 'Title::touchArray' ); } + */ + // hack hack hack -- brion 2005-07-11. this was unfriendly to db. + // do them in small chunks: + $fname = 'Title::touchArray'; + foreach( $titles as $title ) { + $dbw->update( 'page', + array( 'page_touched' => $timestamp ), + array( + 'page_namespace' => $title->getNamespace(), + 'page_title' => $title->getDBkey() ), + $fname ); + } } #---------------------------------------------------------------------------- @@ -512,6 +540,25 @@ class Title { * @access public */ function getNamespace() { return $this->mNamespace; } + /** + * Get the namespace text + * @return string + * @access public + */ + function getNsText() { + global $wgContLang; + return $wgContLang->getNsText( $this->mNamespace ); + } + /** + * Get the namespace text of the subject (rather than talk) page + * @return string + * @access public + */ + function getSubjectNsText() { + global $wgContLang; + return $wgContLang->getNsText( Namespace::getSubject( $this->mNamespace ) ); + } + /** * Get the interwiki prefix (or null string) * @return string @@ -560,14 +607,14 @@ class Title { */ function getPrefixedText() { global $wgContLang; - if ( empty( $this->mPrefixedText ) ) { + if ( empty( $this->mPrefixedText ) ) { // FIXME: bad usage of empty() ? $s = $this->prefix( $this->mTextform ); $s = str_replace( '_', ' ', $s ); $this->mPrefixedText = $s; } return $this->mPrefixedText; } - + /** * Get the prefixed title with spaces, plus any fragment * (part beginning with '#') @@ -594,7 +641,7 @@ class Title { $s = str_replace( ' ', '_', $s ); $s = wfUrlencode ( $s ) ; - + # Cleaning up URL to make it look nice -- is this safe? $s = str_replace( '%28', '(', $s ); $s = str_replace( '%29', ')', $s ); @@ -612,49 +659,79 @@ class Title { * @access public */ function getFullURL( $query = '' ) { - global $wgContLang, $wgArticlePath, $wgServer, $wgScript; + global $wgContLang, $wgServer; if ( '' == $this->mInterwiki ) { - $p = $wgArticlePath; - return $wgServer . $this->getLocalUrl( $query ); + $url = $wgServer . $this->getLocalUrl( $query ); } else { $baseUrl = $this->getInterwikiLink( $this->mInterwiki ); + $namespace = $wgContLang->getNsText( $this->mNamespace ); if ( '' != $namespace ) { # Can this actually happen? Interwikis shouldn't be parsed. - $namepace .= ':'; + $namespace .= ':'; } $url = str_replace( '$1', $namespace . $this->mUrlform, $baseUrl ); + if( $query != '' ) { + if( false === strpos( $url, '?' ) ) { + $url .= '?'; + } else { + $url .= '&'; + } + $url .= $query; + } if ( '' != $this->mFragment ) { $url .= '#' . $this->mFragment; } - return $url; } + wfRunHooks( 'GetFullURL', array( &$this, &$url, $query ) ); + return $url; } /** - * Get a URL with no fragment or server name + * Get a URL with no fragment or server name. If this page is generated + * with action=render, $wgServer is prepended. * @param string $query an optional query string; if not specified, * $wgArticlePath will be used. * @return string the URL * @access public */ function getLocalURL( $query = '' ) { - global $wgLang, $wgArticlePath, $wgScript; - - if ( $this->isExternal() ) { - return $this->getFullURL(); - } + global $wgArticlePath, $wgScript, $wgServer, $wgRequest; - $dbkey = wfUrlencode( $this->getPrefixedDBkey() ); - if ( $query == '' ) { - $url = str_replace( '$1', $dbkey, $wgArticlePath ); + if ( $this->isExternal() ) { + $url = $this->getFullURL(); } else { - if ( $query == '-' ) { - $query = ''; + $dbkey = wfUrlencode( $this->getPrefixedDBkey() ); + if ( $query == '' ) { + $url = str_replace( '$1', $dbkey, $wgArticlePath ); + } else { + global $wgActionPaths; + $url = false; + if( !empty( $wgActionPaths ) && + preg_match( '/^(.*&|)action=([^&]*)(&(.*)|)$/', $query, $matches ) ) + { + $action = urldecode( $matches[2] ); + if( isset( $wgActionPaths[$action] ) ) { + $query = $matches[1]; + if( isset( $matches[4] ) ) $query .= $matches[4]; + $url = str_replace( '$1', $dbkey, $wgActionPaths[$action] ); + if( $query != '' ) $url .= '?' . $query; + } + } + if ( $url === false ) { + if ( $query == '-' ) { + $query = ''; + } + $url = "{$wgScript}?title={$dbkey}&{$query}"; + } + } + + if ($wgRequest->getText('action') == 'render') { + $url = $wgServer . $url; } - $url = "{$wgScript}?title={$dbkey}&{$query}"; } + wfRunHooks( 'GetLocalURL', array( &$this, &$url, $query ) ); return $url; } @@ -681,7 +758,7 @@ class Title { return htmlspecialchars( $this->getFullURL( $query ) ); } - /** + /** * Get the URL form for an internal link. * - Used in various Squid-related code, in case we have a different * internal hostname for the server from the exposed one. @@ -709,7 +786,7 @@ class Title { return $s; } - + /** * Get the HTML-escaped displayable text form. * Used for the title field in tags. @@ -719,7 +796,7 @@ class Title { function getEscapedText() { return htmlspecialchars( $this->getPrefixedText() ); } - + /** * Is this Title interwiki? * @return boolean @@ -742,8 +819,8 @@ class Title { } if($action == 'move' || $action == '') { $a = $this->getRestrictions("move"); - if ( in_array( 'sysop', $a ) ) { return true; } - } + if ( in_array( 'sysop', $a ) ) { return true; } + } return false; } @@ -755,46 +832,53 @@ class Title { function userIsWatching() { global $wgUser; - if ( -1 == $this->mNamespace ) { return false; } - if ( 0 == $wgUser->getID() ) { return false; } - - return $wgUser->isWatched( $this ); + if ( is_null( $this->mWatched ) ) { + if ( -1 == $this->mNamespace || 0 == $wgUser->getID()) { + $this->mWatched = false; + } else { + $this->mWatched = $wgUser->isWatched( $this ); + } + } + return $this->mWatched; } /** - * Is $wgUser perform $action this page? + * Can $wgUser perform $action this page? * @param string $action action that permission needs to be checked for * @return boolean * @access private */ function userCan($action) { - $fname = 'Title::userCanEdit'; + $fname = 'Title::userCan'; wfProfileIn( $fname ); - + global $wgUser; if( NS_SPECIAL == $this->mNamespace ) { wfProfileOut( $fname ); return false; } + // XXX: This is the code that prevents unprotecting a page in NS_MEDIAWIKI + // from taking effect -ævar if( NS_MEDIAWIKI == $this->mNamespace && !$wgUser->isAllowed('editinterface') ) { wfProfileOut( $fname ); return false; } + if( $this->mDbkeyform == '_' ) { # FIXME: Is this necessary? Shouldn't be allowed anyway... wfProfileOut( $fname ); return false; } - + # protect global styles and js - if ( NS_MEDIAWIKI == $this->mNamespace + if ( NS_MEDIAWIKI == $this->mNamespace && preg_match("/\\.(css|js)$/", $this->mTextform ) && !$wgUser->isAllowed('editinterface') ) { wfProfileOut( $fname ); return false; } - + # protect css/js subpages of user pages # XXX: this might be better using restrictions # XXX: Find a way to work around the php bug that prevents using $this->userCanEditCssJsSubpage() from working @@ -807,11 +891,29 @@ class Title { } foreach( $this->getRestrictions($action) as $right ) { + // Backwards compatibility, rewrite sysop -> protect + if ( $right == 'sysop' ) { + $right = 'protect'; + } if( '' != $right && !$wgUser->isAllowed( $right ) ) { wfProfileOut( $fname ); return false; } } + + if( $action == 'move' && + !( $this->isMovable() && $wgUser->isAllowed( 'move' ) ) ) { + wfProfileOut( $fname ); + return false; + } + + if( $action == 'create' ) { + if( ( $this->isTalkPage() && !$wgUser->isAllowed( 'createtalk' ) ) || + ( !$this->isTalkPage() && !$wgUser->isAllowed( 'createpage' ) ) ) { + return false; + } + } + wfProfileOut( $fname ); return true; } @@ -824,16 +926,28 @@ class Title { function userCanEdit() { return $this->userCan('edit'); } - + /** * Can $wgUser move this page? * @return boolean * @access public - */ + */ function userCanMove() { return $this->userCan('move'); } + /** + * Would anybody with sufficient privileges be able to move this page? + * Some pages just aren't movable. + * + * @return boolean + * @access public + */ + function isMovable() { + return Namespace::isMovable( $this->getNamespace() ) + && $this->getInterwiki() == ''; + } + /** * Can $wgUser read this page? * @return boolean @@ -841,28 +955,28 @@ class Title { */ function userCanRead() { global $wgUser; - + if( $wgUser->isAllowed('read') ) { return true; } else { global $wgWhitelistRead; - + /** If anon users can create an account, they need to reach the login page first! */ if( $wgUser->isAllowed( 'createaccount' ) - && $this->mId == NS_SPECIAL + && $this->getNamespace() == NS_SPECIAL && $this->getText() == 'Userlogin' ) { return true; } /** some pages are explicitly allowed */ $name = $this->getPrefixedText(); - if( in_array( $name, $wgWhitelistRead ) ) { + if( $wgWhitelistRead && in_array( $name, $wgWhitelistRead ) ) { return true; } - + # Compatibility with old settings - if( $this->getNamespace() == NS_MAIN ) { + if( $wgWhitelistRead && $this->getNamespace() == NS_MAIN ) { if( in_array( ':' . $name, $wgWhitelistRead ) ) { return true; } @@ -871,6 +985,15 @@ class Title { return false; } + /** + * Is this a talk page of some sort? + * @return bool + * @access public + */ + function isTalkPage() { + return Namespace::isTalk( $this->getNamespace() ); + } + /** * Is this a .css or .js subpage of a user page? * @return bool @@ -910,7 +1033,7 @@ class Title { /** * Loads a string into mRestrictions array - * @param string $res restrictions in string format + * @param string $res restrictions in string format * @access public */ function loadRestrictions( $res ) { @@ -929,7 +1052,7 @@ class Title { /** * Accessor/initialisation for mRestrictions - * @param string $action action that permission needs to be checked for + * @param string $action action that permission needs to be checked for * @return array the array of groups allowed to edit this article * @access public */ @@ -947,7 +1070,7 @@ class Title { } return array(); } - + /** * Is there a version of this page in the deletion archive? * @return int the number of archived revisions @@ -955,9 +1078,13 @@ class Title { */ function isDeleted() { $fname = 'Title::isDeleted'; - $dbr =& wfGetDB( DB_SLAVE ); - $n = $dbr->selectField( 'archive', 'COUNT(*)', array( 'ar_namespace' => $this->getNamespace(), - 'ar_title' => $this->getDBkey() ), $fname ); + if ( $this->getNamespace() < 0 ) { + $n = 0; + } else { + $dbr =& wfGetDB( DB_SLAVE ); + $n = $dbr->selectField( 'archive', 'COUNT(*)', array( 'ar_namespace' => $this->getNamespace(), + 'ar_title' => $this->getDBkey() ), $fname ); + } return (int)$n; } @@ -971,7 +1098,6 @@ class Title { */ function getArticleID( $flags = 0 ) { global $wgLinkCache; - if ( $flags & GAID_FOR_UPDATE ) { $oldUpdate = $wgLinkCache->forUpdate( true ); $this->mArticleID = $wgLinkCache->addLinkObj( $this ); @@ -984,6 +1110,17 @@ class Title { return $this->mArticleID; } + function getLatestRevID() { + if ($this->mLatestID !== false) + return $this->mLatestID; + + $db =& wfGetDB(DB_SLAVE); + return $this->mLatestID = $db->selectField( 'revision', + "max(rev_id)", + array('rev_page' => $this->getArticleID()), + 'Title::getLatestRevID' ); + } + /** * This clears some fields in this object, and clears any associated * keys in the "bad links" section of $wgLinkCache. @@ -1004,23 +1141,34 @@ class Title { $this->mRestrictionsLoaded = false; $this->mRestrictions = array(); } - + /** * Updates page_touched for this page; called from LinksUpdate.php * @return bool true if the update succeded * @access public */ function invalidateCache() { - $now = wfTimestampNow(); + global $wgUseFileCache; + + if ( wfReadOnly() ) { + return; + } + $dbw =& wfGetDB( DB_MASTER ); - $success = $dbw->update( 'page', - array( /* SET */ + $success = $dbw->update( 'page', + array( /* SET */ 'page_touched' => $dbw->timestamp() - ), array( /* WHERE */ + ), array( /* WHERE */ 'page_namespace' => $this->getNamespace() , 'page_title' => $this->getDBkey() ), 'Title::invalidateCache' ); + + if ($wgUseFileCache) { + $cache = new CacheManager($this); + @unlink($cache->fileCacheName()); + } + return $success; } @@ -1060,7 +1208,7 @@ class Title { global $wgContLang, $wgLocalInterwiki, $wgCapitalLinks; $fname = 'Title::secureAndSplit'; wfProfileIn( $fname ); - + # Initialisation static $rxTc = false; if( !$rxTc ) { @@ -1073,16 +1221,15 @@ class Title { # Clean up whitespace # - $t = preg_replace( '/[\\s_]+/', '_', $this->mDbkeyform ); + $t = preg_replace( '/[ _]+/', '_', $this->mDbkeyform ); $t = trim( $t, '_' ); if ( '' == $t ) { wfProfileOut( $fname ); return false; } - - global $wgUseLatin1; - if( !$wgUseLatin1 && false !== strpos( $t, UTF8_REPLACEMENT ) ) { + + if( false !== strpos( $t, UTF8_REPLACEMENT ) ) { # Contained illegal UTF-8 sequences or forbidden Unicode chars. wfProfileOut( $fname ); return false; @@ -1090,57 +1237,58 @@ class Title { $this->mDbkeyform = $t; - # Initial colon indicating main namespace + # Initial colon indicates main namespace rather than specified default + # but should not create invalid {ns,title} pairs such as {0,Project:Foo} if ( ':' == $t{0} ) { - $r = substr( $t, 1 ); $this->mNamespace = NS_MAIN; - } else { - # Namespace or interwiki prefix - $firstPass = true; - do { - if ( preg_match( "/^(.+?)_*:_*(.*)$/S", $t, $m ) ) { - $p = $m[1]; - $lowerNs = strtolower( $p ); - if ( $ns = Namespace::getCanonicalIndex( $lowerNs ) ) { - # Canonical namespace - $t = $m[2]; - $this->mNamespace = $ns; - } elseif ( $ns = $wgContLang->getNsIndex( $lowerNs )) { - # Ordinary namespace - $t = $m[2]; - $this->mNamespace = $ns; - } elseif( $this->getInterwikiLink( $p ) ) { - if( !$firstPass ) { - # Can't make a local interwiki link to an interwiki link. - # That's just crazy! + $t = substr( $t, 1 ); # remove the colon but continue processing + } + + # Namespace or interwiki prefix + $firstPass = true; + do { + if ( preg_match( "/^(.+?)_*:_*(.*)$/S", $t, $m ) ) { + $p = $m[1]; + $lowerNs = strtolower( $p ); + if ( $ns = Namespace::getCanonicalIndex( $lowerNs ) ) { + # Canonical namespace + $t = $m[2]; + $this->mNamespace = $ns; + } elseif ( $ns = $wgContLang->getNsIndex( $lowerNs )) { + # Ordinary namespace + $t = $m[2]; + $this->mNamespace = $ns; + } elseif( $this->getInterwikiLink( $p ) ) { + if( !$firstPass ) { + # Can't make a local interwiki link to an interwiki link. + # That's just crazy! + wfProfileOut( $fname ); + return false; + } + + # Interwiki link + $t = $m[2]; + $this->mInterwiki = strtolower( $p ); + + # Redundant interwiki prefix to the local wiki + if ( 0 == strcasecmp( $this->mInterwiki, $wgLocalInterwiki ) ) { + if( $t == '' ) { + # Can't have an empty self-link wfProfileOut( $fname ); return false; } - - # Interwiki link - $t = $m[2]; - $this->mInterwiki = $p; - - # Redundant interwiki prefix to the local wiki - if ( 0 == strcasecmp( $this->mInterwiki, $wgLocalInterwiki ) ) { - if( $t == '' ) { - # Can't have an empty self-link - wfProfileOut( $fname ); - return false; - } - $this->mInterwiki = ''; - $firstPass = false; - # Do another namespace split... - continue; - } + $this->mInterwiki = ''; + $firstPass = false; + # Do another namespace split... + continue; } - # If there's no recognized interwiki or namespace, - # then let the colon expression be part of the title. } - break; - } while( true ); - $r = $t; - } + # If there's no recognized interwiki or namespace, + # then let the colon expression be part of the title. + } + break; + } while( true ); + $r = $t; # We already know that some pages won't be in the database! # @@ -1162,7 +1310,7 @@ class Title { wfProfileOut( $fname ); return false; } - + /** * Pages with "/./" or "/../" appearing in the URLs will * often be unreachable due to the way web browsers deal @@ -1182,6 +1330,7 @@ class Title { # We shouldn't need to query the DB for the size. #$maxSize = $dbr->textFieldSize( 'page', 'page_title' ); if ( strlen( $r ) > 255 ) { + wfProfileOut( $fname ); return false; } @@ -1198,17 +1347,29 @@ class Title { } else { $t = $r; } - + + /** + * Can't make a link to a namespace alone... + * "empty" local links can only be self-links + * with a fragment identifier. + */ + if( $t == '' && + $this->mInterwiki == '' && + $this->mNamespace != NS_MAIN ) { + wfProfileOut( $fname ); + return false; + } + # Fill fields $this->mDbkeyform = $t; $this->mUrlform = wfUrlencode( $t ); - + $this->mTextform = str_replace( '_', ' ', $t ); - + wfProfileOut( $fname ); return true; } - + /** * Get a Title object associated with the talk page of this article * @return Title the object for the talk page @@ -1217,7 +1378,7 @@ class Title { function getTalkPage() { return Title::makeTitle( Namespace::getTalk( $this->getNamespace() ), $this->getDBkey() ); } - + /** * Get a title object associated with the subject page of this * talk page @@ -1231,31 +1392,36 @@ class Title { /** * Get an array of Title objects linking to this Title - * - Also stores the IDs in the link cache. + * Also stores the IDs in the link cache. * - * @param string $options may be FOR UPDATE + * @param string $options may be FOR UPDATE * @return array the Title objects linking here * @access public */ function getLinksTo( $options = '' ) { global $wgLinkCache; $id = $this->getArticleID(); - + if ( $options ) { $db =& wfGetDB( DB_MASTER ); } else { $db =& wfGetDB( DB_SLAVE ); } - $page = $db->tableName( 'page' ); - $links = $db->tableName( 'links' ); - $sql = "SELECT page_namespace,page_title,page_id FROM $page,$links WHERE l_from=page_id AND l_to={$id} $options"; - $res = $db->query( $sql, 'Title::getLinksTo' ); + $res = $db->select( array( 'page', 'pagelinks' ), + array( 'page_namespace', 'page_title', 'page_id' ), + array( + 'pl_from=page_id', + 'pl_namespace' => $this->getNamespace(), + 'pl_title' => $this->getDbKey() ), + 'Title::getLinksTo', + $options ); + $retVal = array(); if ( $db->numRows( $res ) ) { while ( $row = $db->fetchObject( $res ) ) { if ( $titleObj = Title::makeTitle( $row->page_namespace, $row->page_title ) ) { - $wgLinkCache->addGoodLink( $row->page_id, $titleObj->getPrefixedDBkey() ); + $wgLinkCache->addGoodLinkObj( $row->page_id, $titleObj ); $retVal[] = $titleObj; } } @@ -1265,40 +1431,46 @@ class Title { } /** - * Get an array of Title objects linking to this non-existent title. - * - Also stores the IDs in the link cache. + * Get an array of Title objects referring to non-existent articles linked from this page * - * @param string $options may be FOR UPDATE - * @return array the Title objects linking here + * @param string $options may be FOR UPDATE + * @return array the Title objects * @access public */ - function getBrokenLinksTo( $options = '' ) { + function getBrokenLinksFrom( $options = '' ) { global $wgLinkCache; - + if ( $options ) { $db =& wfGetDB( DB_MASTER ); } else { $db =& wfGetDB( DB_SLAVE ); } - $page = $db->tableName( 'page' ); - $brokenlinks = $db->tableName( 'brokenlinks' ); - $encTitle = $db->strencode( $this->getPrefixedDBkey() ); - $sql = "SELECT page_namespace,page_title,page_id FROM $brokenlinks,$page " . - "WHERE bl_from=page_id AND bl_to='$encTitle' $options"; - $res = $db->query( $sql, "Title::getBrokenLinksTo" ); + $res = $db->safeQuery( + "SELECT pl_namespace, pl_title + FROM ! + LEFT JOIN ! + ON pl_namespace=page_namespace + AND pl_title=page_title + WHERE pl_from=? + AND page_namespace IS NULL + !", + $db->tableName( 'pagelinks' ), + $db->tableName( 'page' ), + $this->getArticleId(), + $options ); + $retVal = array(); if ( $db->numRows( $res ) ) { while ( $row = $db->fetchObject( $res ) ) { - $titleObj = Title::makeTitle( $row->page_namespace, $row->page_title ); - $wgLinkCache->addGoodLink( $row->page_id, $titleObj->getPrefixedDBkey() ); - $retVal[] = $titleObj; + $retVal[] = Title::makeTitle( $row->pl_namespace, $row->pl_title ); } } $db->freeResult( $res ); return $retVal; } + /** * Get a list of URLs to purge from the Squid cache when this * page changes @@ -1321,34 +1493,38 @@ class Title { function moveNoAuth( &$nt ) { return $this->moveTo( $nt, false ); } - + /** - * Move a title to a new location + * Check whether a given move operation would be valid. + * Returns true if ok, or a message key string for an error message + * if invalid. (Scarrrrry ugly interface this.) * @param Title &$nt the new title * @param bool $auth indicates whether $wgUser's permissions * should be checked * @return mixed true on success, message name on failure * @access public */ - function moveTo( &$nt, $auth = true ) { + function isValidMoveOperation( &$nt, $auth = true ) { + global $wgUser; if( !$this or !$nt ) { return 'badtitletext'; } + if( $this->equals( $nt ) ) { + return 'selfmove'; + } + if( !$this->isMovable() || !$nt->isMovable() ) { + return 'immobile_namespace'; + } - $fname = 'Title::move'; $oldid = $this->getArticleID(); $newid = $nt->getArticleID(); if ( strlen( $nt->getDBkey() ) < 1 ) { return 'articleexists'; } - if ( ( ! Namespace::isMovable( $this->getNamespace() ) ) || - ( '' == $this->getDBkey() ) || - ( '' != $this->getInterwiki() ) || + if ( ( '' == $this->getDBkey() ) || ( !$oldid ) || - ( ! Namespace::isMovable( $nt->getNamespace() ) ) || - ( '' == $nt->getDBkey() ) || - ( '' != $nt->getInterwiki() ) ) { + ( '' == $nt->getDBkey() ) ) { return 'badarticleerror'; } @@ -1357,7 +1533,7 @@ class Title { !$this->userCanMove() || !$nt->userCanMove() ) ) { return 'protectedpage'; } - + # The move is allowed only if (1) the target doesn't exist, or # (2) the target is a redirect to the source, and has no history # (so we can undo bad moves right after they're done). @@ -1366,22 +1542,44 @@ class Title { if ( ! $this->isValidMoveTarget( $nt ) ) { return 'articleexists'; } - $this->moveOverExistingRedirect( $nt ); + } + return true; + } + + /** + * Move a title to a new location + * @param Title &$nt the new title + * @param bool $auth indicates whether $wgUser's permissions + * should be checked + * @return mixed true on success, message name on failure + * @access public + */ + function moveTo( &$nt, $auth = true, $reason = '' ) { + $err = $this->isValidMoveOperation( $nt, $auth ); + if( is_string( $err ) ) { + return $err; + } + + $pageid = $this->getArticleID(); + if( $nt->exists() ) { + $this->moveOverExistingRedirect( $nt, $reason ); + $pageCountChange = 0; } else { # Target didn't exist, do normal move. - $this->moveToNewTitle( $nt, $newid ); + $this->moveToNewTitle( $nt, $newid, $reason ); + $pageCountChange = 1; } + $redirid = $this->getArticleID(); # Fixing category links (those without piped 'alternate' names) to be sorted under the new title - $dbw =& wfGetDB( DB_MASTER ); $categorylinks = $dbw->tableName( 'categorylinks' ); $sql = "UPDATE $categorylinks SET cl_sortkey=" . $dbw->addQuotes( $nt->getPrefixedText() ) . - " WHERE cl_from=" . $dbw->addQuotes( $this->getArticleID() ) . + " WHERE cl_from=" . $dbw->addQuotes( $pageid ) . " AND cl_sortkey=" . $dbw->addQuotes( $this->getPrefixedText() ); $dbw->query( $sql, 'SpecialMovepage::doSubmit' ); # Update watchlists - + $oldnamespace = $this->getNamespace() & ~1; $newnamespace = $nt->getNamespace() & ~1; $oldtitle = $this->getDBkey(); @@ -1392,14 +1590,35 @@ class Title { } # Update search engine - $u = new SearchUpdate( $oldid, $nt->getPrefixedDBkey() ); + $u = new SearchUpdate( $pageid, $nt->getPrefixedDBkey() ); $u->doUpdate(); - $u = new SearchUpdate( $newid, $this->getPrefixedDBkey(), '' ); + $u = new SearchUpdate( $redirid, $this->getPrefixedDBkey(), '' ); $u->doUpdate(); + # Update site_stats + if ( $this->getNamespace() == NS_MAIN and $nt->getNamespace() != NS_MAIN ) { + # Moved out of main namespace + # not viewed, edited, removing + $u = new SiteStatsUpdate( 0, 1, -1, $pageCountChange); + } elseif ( $this->getNamespace() != NS_MAIN and $nt->getNamespace() == NS_MAIN ) { + # Moved into main namespace + # not viewed, edited, adding + $u = new SiteStatsUpdate( 0, 1, +1, $pageCountChange ); + } elseif ( $pageCountChange ) { + # Added redirect + $u = new SiteStatsUpdate( 0, 0, 0, 1 ); + } else{ + $u = false; + } + if ( $u ) { + $u->doUpdate(); + } + + global $wgUser; + wfRunHooks( 'TitleMoveComplete', array( &$this, &$nt, &$wgUser, $pageid, $redirid ) ); return true; } - + /** * Move page to a title which is at present a redirect to the * source page @@ -1408,32 +1627,41 @@ class Title { * be a redirect * @access private */ - /* private */ function moveOverExistingRedirect( &$nt ) { + function moveOverExistingRedirect( &$nt, $reason = '' ) { global $wgUser, $wgLinkCache, $wgUseSquid, $wgMwRedir; $fname = 'Title::moveOverExistingRedirect'; $comment = wfMsgForContent( '1movedto2', $this->getPrefixedText(), $nt->getPrefixedText() ); - + + if ( $reason ) { + $comment .= ": $reason"; + } + $now = wfTimestampNow(); - $won = wfInvertTimestamp( $now ); $rand = wfRandom(); $newid = $nt->getArticleID(); $oldid = $this->getArticleID(); $dbw =& wfGetDB( DB_MASTER ); - $links = $dbw->tableName( 'links' ); # Delete the old redirect. We don't save it to history since # by definition if we've got here it's rather uninteresting. # We have to remove it so that the next step doesn't trigger # a conflict on the unique namespace+title index... $dbw->delete( 'page', array( 'page_id' => $newid ), $fname ); - + + # Save a null revision in the page's history notifying of the move + $nullRevision = Revision::newNullRevision( $dbw, $oldid, + wfMsgForContent( '1movedto2', $this->getPrefixedText(), $nt->getPrefixedText() ), + true ); + $nullRevId = $nullRevision->insertOn( $dbw ); + # Change the name of the target page: $dbw->update( 'page', - /* SET */ array( - 'page_touched' => $dbw->timestamp($now), + /* SET */ array( + 'page_touched' => $dbw->timestamp($now), 'page_namespace' => $nt->getNamespace(), - 'page_title' => $nt->getDBkey() - ), + 'page_title' => $nt->getDBkey(), + 'page_latest' => $nullRevId, + ), /* WHERE */ array( 'page_id' => $oldid ), $fname ); @@ -1441,85 +1669,30 @@ class Title { # Recreate the redirect, this time in the other direction. $redirectText = $wgMwRedir->getSynonym( 0 ) . ' [[' . $nt->getPrefixedText() . "]]\n"; - $dbw->insert( 'revision', array( - 'rev_id' => $dbw->nextSequenceValue('rev_rev_id_seq'), - 'rev_comment' => $comment, - 'rev_user' => $wgUser->getID(), - 'rev_user_text' => $wgUser->getName(), - 'rev_timestamp' => $now, - 'inverse_timestamp' => $won ), $fname - ); - $revid = $dbw->insertId(); - $dbw->insert( 'text', array( - 'old_id' => $revid, - 'old_flags' => '', - 'old_text' => $redirectText, - ), $fname - ); - $dbw->insert( 'page', array( - 'page_id' => $dbw->nextSequenceValue('page_page_id_seq'), - 'page_namespace' => $this->getNamespace(), - 'page_title' => $this->getDBkey(), - 'page_touched' => $now, - 'page_is_redirect' => 1, - 'page_random' => $rand, - 'page_is_new' => 1, - 'page_latest' => $revid), $fname - ); - $newid = $dbw->insertId(); + $redirectArticle = new Article( $this ); + $newid = $redirectArticle->insertOn( $dbw ); + $redirectRevision = new Revision( array( + 'page' => $newid, + 'comment' => $comment, + 'text' => $redirectText ) ); + $revid = $redirectRevision->insertOn( $dbw ); + $redirectArticle->updateRevisionOn( $dbw, $redirectRevision, 0 ); $wgLinkCache->clearLink( $this->getPrefixedDBkey() ); - - RecentChange::notifyMoveOverRedirect( $now, $this, $nt, $wgUser, $comment ); - - # Swap links - - # Load titles and IDs - $linksToOld = $this->getLinksTo( 'FOR UPDATE' ); - $linksToNew = $nt->getLinksTo( 'FOR UPDATE' ); - - # Delete them all - $sql = "DELETE FROM $links WHERE l_to=$oldid OR l_to=$newid"; - $dbw->query( $sql, $fname ); - - # Reinsert - if ( count( $linksToOld ) || count( $linksToNew )) { - $sql = "INSERT INTO $links (l_from,l_to) VALUES "; - $first = true; - - # Insert links to old title - foreach ( $linksToOld as $linkTitle ) { - if ( $first ) { - $first = false; - } else { - $sql .= ','; - } - $id = $linkTitle->getArticleID(); - $sql .= "($id,$newid)"; - } - - # Insert links to new title - foreach ( $linksToNew as $linkTitle ) { - if ( $first ) { - $first = false; - } else { - $sql .= ','; - } - $id = $linkTitle->getArticleID(); - $sql .= "($id, $oldid)"; - } - $dbw->query( $sql, DB_MASTER, $fname ); - } + # Log the move + $log = new LogPage( 'move' ); + $log->addEntry( 'move_redir', $this, $reason, array( 1 => $nt->getPrefixedText() ) ); # Now, we record the link from the redirect to the new title. # It should have no other outgoing links... - $dbw->delete( 'links', array( 'l_from' => $newid ) ); - $dbw->insert( 'links', array( 'l_from' => $newid, 'l_to' => $oldid ) ); - - # Clear linkscc - LinkCache::linksccClearLinksTo( $oldid ); - LinkCache::linksccClearLinksTo( $newid ); - + $dbw->delete( 'pagelinks', array( 'pl_from' => $newid ), $fname ); + $dbw->insert( 'pagelinks', + array( + 'pl_from' => $newid, + 'pl_namespace' => $nt->getNamespace(), + 'pl_title' => $nt->getDbKey() ), + $fname ); + # Purge squid if ( $wgUseSquid ) { $urls = array_merge( $nt->getSquidURLs(), $this->getSquidURLs() ); @@ -1534,80 +1707,72 @@ class Title { * @param int &$newid set to be the new article ID * @access private */ - /* private */ function moveToNewTitle( &$nt, &$newid ) { + function moveToNewTitle( &$nt, &$newid, $reason = '' ) { global $wgUser, $wgLinkCache, $wgUseSquid; global $wgMwRedir; $fname = 'MovePageForm::moveToNewTitle'; $comment = wfMsgForContent( '1movedto2', $this->getPrefixedText(), $nt->getPrefixedText() ); + if ( $reason ) { + $comment .= ": $reason"; + } $newid = $nt->getArticleID(); $oldid = $this->getArticleID(); $dbw =& wfGetDB( DB_MASTER ); $now = $dbw->timestamp(); - $won = wfInvertTimestamp( wfTimestamp(TS_MW,$now) ); wfSeedRandom(); $rand = wfRandom(); + # Save a null revision in the page's history notifying of the move + $nullRevision = Revision::newNullRevision( $dbw, $oldid, + wfMsgForContent( '1movedto2', $this->getPrefixedText(), $nt->getPrefixedText() ), + true ); + $nullRevId = $nullRevision->insertOn( $dbw ); + # Rename cur entry $dbw->update( 'page', /* SET */ array( - 'page_touched' => $now, + 'page_touched' => $now, 'page_namespace' => $nt->getNamespace(), - 'page_title' => $nt->getDBkey() + 'page_title' => $nt->getDBkey(), + 'page_latest' => $nullRevId, ), /* WHERE */ array( 'page_id' => $oldid ), $fname ); - + $wgLinkCache->clearLink( $nt->getPrefixedDBkey() ); # Insert redirect $redirectText = $wgMwRedir->getSynonym( 0 ) . ' [[' . $nt->getPrefixedText() . "]]\n"; - $dbw->insert( 'revision', array( - 'rev_id' => $dbw->nextSequenceValue('rev_rev_id_seq'), - 'rev_comment' => $comment, - 'rev_user' => $wgUser->getID(), - 'rev_user_text' => $wgUser->getName(), - 'rev_timestamp' => $now, - 'inverse_timestamp' => $won ), $fname - ); - $revid = $dbw->insertId(); - $dbw->insert( 'text', array( - 'old_id' => $revid, - 'old_flags' => '', - 'old_text' => $redirectText - ), $fname - ); - $dbw->insert( 'page', array( - 'page_id' => $dbw->nextSequenceValue('page_page_id_seq'), - 'page_namespace' => $this->getNamespace(), - 'page_title' => $this->getDBkey(), - 'page_touched' => $now, - 'page_is_redirect' => 1, - 'page_random' => $rand, - 'page_is_new' => 1, - 'page_latest' => $revid), $fname - ); - $newid = $dbw->insertId(); + $redirectArticle = new Article( $this ); + $newid = $redirectArticle->insertOn( $dbw ); + $redirectRevision = new Revision( array( + 'page' => $newid, + 'comment' => $comment, + 'text' => $redirectText ) ); + $revid = $redirectRevision->insertOn( $dbw ); + $redirectArticle->updateRevisionOn( $dbw, $redirectRevision, 0 ); $wgLinkCache->clearLink( $this->getPrefixedDBkey() ); - # Record in RC - RecentChange::notifyMoveToNew( $now, $this, $nt, $wgUser, $comment ); + # Log the move + $log = new LogPage( 'move' ); + $log->addEntry( 'move', $this, $reason, array( 1 => $nt->getPrefixedText()) ); - # Purge squid and linkscc as per article creation + # Purge caches as per article creation Article::onArticleCreate( $nt ); - # Any text links to the old title must be reassigned to the redirect - $dbw->update( 'links', array( 'l_to' => $newid ), array( 'l_to' => $oldid ), $fname ); - LinkCache::linksccClearLinksTo( $oldid ); - # Record the just-created redirect's linking to the page - $dbw->insert( 'links', array( 'l_from' => $newid, 'l_to' => $oldid ), $fname ); + $dbw->insert( 'pagelinks', + array( + 'pl_from' => $newid, + 'pl_namespace' => $nt->getNamespace(), + 'pl_title' => $nt->getDBkey() ), + $fname ); # Non-existent target may have had broken links to it; these must - # now be removed and made into good links. - $update = new LinksUpdate( $oldid, $nt->getPrefixedDBkey() ); - $update->fixBrokenLinks(); + # now be touched to update link coloring. + $nt->touchLinks(); # Purge old title from squid # The new title, and links to the new title, are purged in Article::onArticleCreate() @@ -1630,44 +1795,48 @@ class Title { * @access public */ function isValidMoveTarget( $nt ) { - + $fname = 'Title::isValidMoveTarget'; $dbw =& wfGetDB( DB_MASTER ); # Is it a redirect? $id = $nt->getArticleID(); - $obj = $dbw->selectRow( array( 'page', 'text') , - array( 'page_is_redirect','old_text' ), - array( 'page_id' => $id, 'page_latest=old_id' ), + $obj = $dbw->selectRow( array( 'page', 'revision', 'text'), + array( 'page_is_redirect','old_text','old_flags' ), + array( 'page_id' => $id, 'page_latest=rev_id', 'rev_text_id=old_id' ), $fname, 'FOR UPDATE' ); - if ( !$obj || 0 == $obj->page_is_redirect ) { + if ( !$obj || 0 == $obj->page_is_redirect ) { # Not a redirect - return false; + return false; } + $text = Revision::getRevisionText( $obj ); # Does the redirect point to the source? - if ( preg_match( "/\\[\\[\\s*([^\\]\\|]*)]]/", $obj->old_text, $m ) ) { + if ( preg_match( "/\\[\\[\\s*([^\\]\\|]*)]]/", $text, $m ) ) { $redirTitle = Title::newFromText( $m[1] ); if( !is_object( $redirTitle ) || $redirTitle->getPrefixedDBkey() != $this->getPrefixedDBkey() ) { return false; } + } else { + # Fail safe + return false; } # Does the article have a history? $row = $dbw->selectRow( array( 'page', 'revision'), - array( 'rev_id' ), + array( 'rev_id' ), array( 'page_namespace' => $nt->getNamespace(), 'page_title' => $nt->getDBkey(), 'page_id=rev_page AND page_latest != rev_id' - ), $fname, 'FOR UPDATE' + ), $fname, 'FOR UPDATE' ); # Return true if there was no history return $row === false; } - + /** * Create a redirect; fails if the title already exists; does * not notify RC @@ -1682,69 +1851,33 @@ class Title { if ( $this->getArticleID() ) { return false; } - + $fname = 'Title::createRedirect'; $dbw =& wfGetDB( DB_MASTER ); - $now = wfTimestampNow(); - $won = wfInvertTimestamp( $now ); - - $seqVal = $dbw->nextSequenceValue( 'page_page_id_seq' ); - $dbw->insert( 'page', array( - 'page_id' => $seqVal, - 'page_namespace' => $this->getNamespace(), - 'page_title' => $this->getDBkey(), - 'page_touched' => $now, - 'page_is_redirect' => 1, - 'page_is_new' => 1, - 'page_latest' => NULL, - ), $fname ); - $newid = $dbw->insertId(); - - $seqVal = $dbw->nextSequenceValue( 'text_old_id_seq' ); - $dbw->insert( 'text', array( - 'old_id' => $seqVal, - 'old_flags' => '', - 'old_text' => "#REDIRECT [[" . $dest->getPrefixedText() . "]]\n" - ), $fname ); - $revisionId = $dbw->insertId(); - - $dbw->insert( 'revision', array( - 'rev_id' => $seqVal, - 'rev_page' => $newid, - 'rev_comment' => $comment, - 'rev_user' => $wgUser->getID(), - 'rev_user_text' => $wgUser->getName(), - 'rev_timestamp' => $now, - 'inverse_timestamp' => $won, - ), $fname ); - - $dbw->update( 'page', - /* SET */ array( 'page_latest' => $revisionId ), - /* WHERE */ array( 'page_id' => $newid ), - $fname ); - $this->resetArticleID( $newid ); - + + $article = new Article( $this ); + $newid = $article->insertOn( $dbw ); + $revision = new Revision( array( + 'page' => $newid, + 'comment' => $comment, + 'text' => "#REDIRECT [[" . $dest->getPrefixedText() . "]]\n", + ) ); + $revisionId = $revision->insertOn( $dbw ); + $article->updateRevisionOn( $dbw, $revision, 0 ); + # Link table - if ( $dest->getArticleID() ) { - $dbw->insert( 'links', - array( - 'l_to' => $dest->getArticleID(), - 'l_from' => $newid - ), $fname - ); - } else { - $dbw->insert( 'brokenlinks', - array( - 'bl_to' => $dest->getPrefixedDBkey(), - 'bl_from' => $newid - ), $fname - ); - } + $dbw->insert( 'pagelinks', + array( + 'pl_from' => $newid, + 'pl_namespace' => $dest->getNamespace(), + 'pl_title' => $dest->getDbKey() + ), $fname + ); Article::onArticleCreate( $this ); return true; } - + /** * Get categories to which this Title belongs and return an array of * categories' names. @@ -1755,10 +1888,8 @@ class Title { */ function getParentCategories() { global $wgContLang,$wgUser; - + $titlekey = $this->getArticleId(); - $sk =& $wgUser->getSkin(); - $parents = array(); $dbr =& wfGetDB( DB_SLAVE ); $categorylinks = $dbr->tableName( 'categorylinks' ); @@ -1767,9 +1898,9 @@ class Title { ." WHERE cl_from='$titlekey'" ." AND cl_from <> '0'" ." ORDER BY cl_sortkey"; - + $res = $dbr->query ( $sql ) ; - + if($dbr->numRows($res) > 0) { while ( $x = $dbr->fetchObject ( $res ) ) //$data[] = Title::newFromText($wgContLang->getNSText ( NS_CATEGORY ).':'.$x->cl_to); @@ -1789,10 +1920,9 @@ class Title { */ function getParentCategoryTree( $children = array() ) { $parents = $this->getParentCategories(); - + if($parents != '') { - foreach($parents as $parent => $current) - { + foreach($parents as $parent => $current) { if ( array_key_exists( $parent, $children ) ) { # Circular reference $stack[$parent] = array(); @@ -1806,8 +1936,8 @@ class Title { return array(); } } - - + + /** * Get an associative array for selecting this title from * the "cur" table @@ -1841,8 +1971,8 @@ class Title { function getPreviousRevisionID( $revision ) { $dbr =& wfGetDB( DB_SLAVE ); return $dbr->selectField( 'revision', 'rev_id', - 'rev_page=' . IntVal( $this->getArticleId() ) . - ' AND rev_id<' . IntVal( $revision ) . ' ORDER BY rev_id DESC' ); + 'rev_page=' . intval( $this->getArticleId() ) . + ' AND rev_id<' . intval( $revision ) . ' ORDER BY rev_id DESC' ); } /** @@ -1854,9 +1984,93 @@ class Title { function getNextRevisionID( $revision ) { $dbr =& wfGetDB( DB_SLAVE ); return $dbr->selectField( 'revision', 'rev_id', - 'rev_page=' . IntVal( $this->getArticleId() ) . - ' AND rev_id>' . IntVal( $revision ) . ' ORDER BY rev_id' ); + 'rev_page=' . intval( $this->getArticleId() ) . + ' AND rev_id>' . intval( $revision ) . ' ORDER BY rev_id' ); } + /** + * Compare with another title. + * + * @param Title $title + * @return bool + */ + function equals( $title ) { + return $this->getInterwiki() == $title->getInterwiki() + && $this->getNamespace() == $title->getNamespace() + && $this->getDbkey() == $title->getDbkey(); + } + + /** + * Check if page exists + * @return bool + */ + function exists() { + return $this->getArticleId() != 0; + } + + /** + * Should a link should be displayed as a known link, just based on its title? + * + * Currently, a self-link with a fragment and special pages are in + * this category. Special pages never exist in the database. + */ + function isAlwaysKnown() { + return $this->isExternal() || ( 0 == $this->mNamespace && "" == $this->mDbkeyform ) + || NS_SPECIAL == $this->mNamespace; + } + + /** + * Update page_touched timestamps on pages linking to this title. + * In principal, this could be backgrounded and could also do squid + * purging. + */ + function touchLinks() { + $fname = 'Title::touchLinks'; + + $dbw =& wfGetDB( DB_MASTER ); + + $res = $dbw->select( 'pagelinks', + array( 'pl_from' ), + array( + 'pl_namespace' => $this->getNamespace(), + 'pl_title' => $this->getDbKey() ), + $fname ); + if ( 0 == $dbw->numRows( $res ) ) { + return; + } + + $toucharr = array(); + while( $row = $dbw->fetchObject( $res ) ) { + $toucharr[] = $row->pl_from; + } + if (!count($toucharr)) + return; + $dbw->update( 'page', /* SET */ array( 'page_touched' => $dbw->timestamp() ), + /* WHERE */ array( 'page_id' => $toucharr ),$fname); + } + + function trackbackURL() { + global $wgTitle, $wgScriptPath, $wgServer; + + return "$wgServer$wgScriptPath/trackback.php?article=" + . htmlspecialchars(urlencode($wgTitle->getPrefixedDBkey())); + } + + function trackbackRDF() { + $url = htmlspecialchars($this->getFullURL()); + $title = htmlspecialchars($this->getText()); + $tburl = $this->trackbackURL(); + + return " + + +"; + } } ?>