X-Git-Url: http://git.heureux-cyclage.org/?a=blobdiff_plain;f=includes%2FTitle.php;h=d2167cafddfefde915af8854130ea915cde56bf4;hb=0ea2bcdbeaa453f00324c14f90b71f545e1d706c;hp=a9163a2fe9ccecb87fac0986c2c679793b2c86cd;hpb=0aa2629efc67b65d661df536f2c0f2fed59f3d64;p=lhc%2Fweb%2Fwiklou.git diff --git a/includes/Title.php b/includes/Title.php index a9163a2fe9..d2167cafdd 100644 --- a/includes/Title.php +++ b/includes/Title.php @@ -1,7 +1,7 @@ mDefaultNamespace = NS_MAIN; + $this->mWatched = NULL; + $this->mLatestID = false; } /** @@ -84,7 +88,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,14 +102,14 @@ class Title { * @static * @access public */ - function &newFromText( $text, $defaultNamespace = NS_MAIN ) { + function &newFromText( $text, $defaultNamespace = NS_MAIN ) { $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 @@ -121,19 +125,9 @@ class Title { } /** - * Convert things like é 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. + * Convert things like é ā or 〗 into real text... */ - $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 ); @@ -163,15 +157,15 @@ class Title { * @static * @access public */ - /* static */ function newFromURL( $url ) { + function newFromURL( $url ) { global $wgLang, $wgServer; $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; @@ -179,19 +173,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 ); @@ -200,7 +197,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 @@ -214,7 +211,7 @@ class Title { * @static * @access public */ - /* static */ function &makeTitle( $ns, $title ) { + function &makeTitle( $ns, $title ) { $t =& new Title(); $t->mInterwiki = ''; $t->mFragment = ''; @@ -230,13 +227,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() ) { @@ -248,11 +246,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' ) ); } @@ -264,18 +263,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() ) ) { @@ -285,7 +284,7 @@ class Title { } return $rt; } - + #---------------------------------------------------------------------------- # Static functions #---------------------------------------------------------------------------- @@ -298,10 +297,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; } @@ -322,7 +321,7 @@ class Title { # # % seems to work though # - # The problem with % is that URLs are double-unescaped: once by Apache's + # 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 @@ -331,11 +330,11 @@ class Title { # # 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; } - + /** * Get a string representation of a title suitable for * including in a search index @@ -365,7 +364,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 @@ -376,10 +375,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") @@ -388,53 +386,54 @@ class Title { * @static (arguably) * @access public */ - function getInterwikiLink( $key ) { + function getInterwikiLink( $key, $transludeonly = false ) { global $wgMemc, $wgDBname, $wgInterwikiExpiry, $wgTitleInterwikiCache; $fname = 'Title::getInterwikiLink'; - + wfProfileIn( $fname ); - + $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 @@ -452,6 +451,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 @@ -462,7 +479,7 @@ class Title { * @static * @access public */ - /* static */ function touchArray( $titles, $timestamp = '' ) { + function touchArray( $titles, $timestamp = '' ) { if ( count( $titles ) == 0 ) { return; } @@ -475,8 +492,8 @@ class Title { $first = true; foreach ( $titles as $title ) { - if ( ! $first ) { - $sql .= ','; + if ( ! $first ) { + $sql .= ','; } $first = false; $sql .= $title->getArticleID(); @@ -571,7 +588,7 @@ class Title { } return $this->mPrefixedText; } - + /** * Get the prefixed title with spaces, plus any fragment * (part beginning with '#') @@ -598,7 +615,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 ); @@ -616,50 +633,138 @@ class Title { * @access public */ function getFullURL( $query = '' ) { - global $wgContLang, $wgArticlePath, $wgServer, $wgScript; + global $wgContLang, $wgServer, $wgScript, $wgMakeDumpLinks, $wgArticlePath; if ( '' == $this->mInterwiki ) { - $p = $wgArticlePath; return $wgServer . $this->getLocalUrl( $query ); + } elseif ( $wgMakeDumpLinks && $wgContLang->getLanguageName( $this->mInterwiki ) ) { + $baseUrl = str_replace( '$1', "../../{$this->mInterwiki}/$1", $wgArticlePath ); + $baseUrl = str_replace( '$1', $this->getHashedDirectory() . '/$1', $baseUrl ); } else { $baseUrl = $this->getInterwikiLink( $this->mInterwiki ); - $namespace = $wgContLang->getNsText( $this->mNamespace ); - if ( '' != $namespace ) { - # Can this actually happen? Interwikis shouldn't be parsed. - $namepace .= ':'; + } + + $namespace = $wgContLang->getNsText( $this->mNamespace ); + if ( '' != $namespace ) { + # Can this actually happen? Interwikis shouldn't be parsed. + $namepace .= ':'; + } + $url = str_replace( '$1', $namespace . $this->mUrlform, $baseUrl ); + if( $query != '' ) { + if( false === strpos( $url, '?' ) ) { + $url .= '?'; + } else { + $url .= '&'; } - $url = str_replace( '$1', $namespace . $this->mUrlform, $baseUrl ); - if ( '' != $this->mFragment ) { - $url .= '#' . $this->mFragment; + $url .= $query; + } + if ( '' != $this->mFragment ) { + $url .= '#' . $this->mFragment; + } + return $url; + } + + /** + * Get a relative directory for putting an HTML version of this article into + */ + function getHashedDirectory() { + global $wgMakeDumpLinks, $wgInputEncoding; + $dbkey = $this->getDBkey(); + + # Split into characters + if ( $wgInputEncoding == 'UTF-8' ) { + preg_match_all( '/./us', $dbkey, $m ); + } else { + preg_match_all( '/./s', $dbkey, $m ); + } + $chars = $m[0]; + $length = count( $chars ); + $dir = ''; + + for ( $i = 0; $i < $wgMakeDumpLinks; $i++ ) { + if ( $i ) { + $dir .= '/'; + } + if ( $i >= $length ) { + $dir .= '_'; + } elseif ( ord( $chars[$i] ) > 32 ) { + $dir .= strtolower( $chars[$i] ); + } else { + $dir .= sprintf( "%02X", ord( $chars[$i] ) ); } - return $url; } + return $dir; + } + + function getHashedFilename() { + $dbkey = $this->getPrefixedDBkey(); + $mainPage = Title::newMainPage(); + if ( $mainPage->getPrefixedDBkey() == $dbkey ) { + return 'index.html'; + } + + $dir = $this->getHashedDirectory(); + + # Replace illegal charcters for Windows paths with underscores + $friendlyName = strtr( $dbkey, '/\\*?"<>|~', '_________' ); + + # Work out lower case form. We assume we're on a system with case-insensitive + # filenames, so unless the case is of a special form, we have to disambiguate + $lowerCase = $this->prefix( ucfirst( strtolower( $this->getDBkey() ) ) ); + + # Make it mostly unique + if ( $lowerCase != $friendlyName ) { + $friendlyName .= '_' . substr(md5( $dbkey ), 0, 4); + } + # Handle colon specially by replacing it with tilde + # Thus we reduce the number of paths with hashes appended + $friendlyName = str_replace( ':', '~', $friendlyName ); + return "$dir/$friendlyName.html"; } /** - * 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; - + global $wgLang, $wgArticlePath, $wgScript, $wgMakeDumpLinks, $wgServer, $action; + if ( $this->isExternal() ) { return $this->getFullURL(); } $dbkey = wfUrlencode( $this->getPrefixedDBkey() ); - if ( $query == '' ) { + if ( $wgMakeDumpLinks ) { + $url = str_replace( '$1', wfUrlencode( $this->getHashedFilename() ), $wgArticlePath ); + } elseif ( $query == '' ) { $url = str_replace( '$1', $dbkey, $wgArticlePath ); } else { + global $wgActionPaths; + 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; + return $url; + } + } if ( $query == '-' ) { $query = ''; } $url = "{$wgScript}?title={$dbkey}&{$query}"; } - return $url; + + if ($action == 'render') + return $wgServer . $url; + else + return $url; } /** @@ -685,7 +790,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. @@ -713,7 +818,7 @@ class Title { return $s; } - + /** * Get the HTML-escaped displayable text form. * Used for the title field in tags. @@ -723,7 +828,7 @@ class Title { function getEscapedText() { return htmlspecialchars( $this->getPrefixedText() ); } - + /** * Is this Title interwiki? * @return boolean @@ -746,8 +851,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; } @@ -759,10 +864,14 @@ 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; } /** @@ -774,7 +883,7 @@ class Title { function userCan($action) { $fname = 'Title::userCanEdit'; wfProfileIn( $fname ); - + global $wgUser; if( NS_SPECIAL == $this->mNamespace ) { wfProfileOut( $fname ); @@ -790,15 +899,15 @@ class Title { 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 @@ -811,11 +920,21 @@ 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() ) { + wfProfileOut( $fname ); + return false; + } + wfProfileOut( $fname ); return true; } @@ -828,16 +947,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 @@ -845,28 +976,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; } @@ -874,7 +1005,7 @@ class Title { } return false; } - + /** * Is this a talk page of some sort? * @return bool @@ -923,7 +1054,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 ) { @@ -942,7 +1073,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 */ @@ -960,7 +1091,7 @@ class Title { } return array(); } - + /** * Is there a version of this page in the deletion archive? * @return int the number of archived revisions @@ -968,9 +1099,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; } @@ -984,7 +1119,7 @@ class Title { */ function getArticleID( $flags = 0 ) { global $wgLinkCache; - + if ( $flags & GAID_FOR_UPDATE ) { $oldUpdate = $wgLinkCache->forUpdate( true ); $this->mArticleID = $wgLinkCache->addLinkObj( $this ); @@ -997,6 +1132,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. @@ -1017,19 +1163,23 @@ 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() { + if ( wfReadOnly() ) { + return; + } + $now = wfTimestampNow(); $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' @@ -1073,7 +1223,7 @@ class Title { global $wgContLang, $wgLocalInterwiki, $wgCapitalLinks; $fname = 'Title::secureAndSplit'; wfProfileIn( $fname ); - + # Initialisation static $rxTc = false; if( !$rxTc ) { @@ -1093,9 +1243,8 @@ class Title { 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; @@ -1129,11 +1278,11 @@ class Title { 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 == '' ) { @@ -1175,7 +1324,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 @@ -1212,7 +1361,7 @@ class Title { } else { $t = $r; } - + /** * Can't make a link to a namespace alone... * "empty" local links can only be self-links @@ -1224,17 +1373,17 @@ class Title { 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 @@ -1243,7 +1392,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 @@ -1257,31 +1406,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; } } @@ -1291,40 +1445,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 @@ -1347,20 +1507,28 @@ 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, $reason = '' ) { 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(); @@ -1369,13 +1537,9 @@ class Title { 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'; } @@ -1384,7 +1548,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). @@ -1393,22 +1557,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, $reason ); + 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(); @@ -1419,15 +1605,34 @@ 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(); - wfRunHooks( 'TitleMoveComplete', $this, $nt, $wgUser, $oldid, $newid ); + # 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(); + } + + 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 @@ -1436,11 +1641,15 @@ 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(); $rand = wfRandom(); $newid = $nt->getArticleID(); @@ -1453,14 +1662,21 @@ class Title { # 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 ); @@ -1468,91 +1684,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 - ), $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 - // Replaced by a log entry - // RecentChange::notifyMoveOverRedirect( $now, $this, $nt, $wgUser, $comment ); - # Log the move $log = new LogPage( 'move' ); - $log->addEntry( 'move_redir', $this, '', array(1 => $nt->getText()) ); - - # 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->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() ); @@ -1567,11 +1722,14 @@ 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(); @@ -1580,74 +1738,56 @@ class Title { 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 - ), $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() ); - // attach revision to the new page - $dbw->update( 'revision', array('rev_page' => $newid), array('rev_id' => $revid), $fname); - - # Record in RC - // Replaced by a log entry - // RecentChange::notifyMoveToNew( $now, $this, $nt, $wgUser, $comment ); - # Log the move $log = new LogPage( 'move' ); - $log->addEntry( 'move', $this, '', array(1 => $nt->getText()) ); + $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() @@ -1670,20 +1810,20 @@ 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' ), + 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; } # Does the redirect point to the source? @@ -1697,17 +1837,17 @@ class Title { # 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 @@ -1722,67 +1862,33 @@ class Title { if ( $this->getArticleID() ) { return false; } - + $fname = 'Title::createRedirect'; $dbw =& wfGetDB( DB_MASTER ); - $now = wfTimestampNow(); - - $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, - ), $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. @@ -1793,7 +1899,7 @@ class Title { */ function getParentCategories() { global $wgContLang,$wgUser; - + $titlekey = $this->getArticleId(); $sk =& $wgUser->getSkin(); $parents = array(); @@ -1805,9 +1911,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); @@ -1827,7 +1933,7 @@ class Title { */ function getParentCategoryTree( $children = array() ) { $parents = $this->getParentCategories(); - + if($parents != '') { foreach($parents as $parent => $current) { @@ -1844,8 +1950,8 @@ class Title { return array(); } } - - + + /** * Get an associative array for selecting this title from * the "cur" table @@ -1895,7 +2001,7 @@ class Title { 'rev_page=' . IntVal( $this->getArticleId() ) . ' AND rev_id>' . IntVal( $revision ) . ' ORDER BY rev_id' ); } - + /** * Compare with another title. * @@ -1908,5 +2014,55 @@ class Title { && $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, special pages and image pages are in + * this category. Special pages never exist in the database. Some images do not + * have description pages in the database, but the description page contains + * useful history information that the user may want to link to. + */ + function isAlwaysKnown() { + return $this->isExternal() || ( 0 == $this->mNamespace && "" == $this->mDbkeyform ) + || NS_SPECIAL == $this->mNamespace || NS_IMAGE == $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; + } + + $arr = array(); + $toucharr = array(); + while( $row = $dbw->fetchObject( $res ) ) { + $toucharr[] = $row->pl_from; + } + + $dbw->update( 'page', /* SET */ array( 'page_touched' => $dbw->timestamp() ), + /* WHERE */ array( 'page_id' => $toucharr ),$fname); + } } ?>