{$err}\n" ); - } - $wgOut->addHTML( "
-
\n" ); + function showForm( $err ) { + global $wgOut, $wgUser, $wgContLang; + + $start = $wgContLang->isRTL() ? 'right' : 'left'; + $end = $wgContLang->isRTL() ? 'left' : 'right'; - } + $wgOut->setPagetitle( wfMsg( 'movepage' ) ); - function doSubmit() - { - global $wgOut, $wgUser, $wgLang; - global $wpNewTitle, $wpOldTitle, $wpMovetalk, $target; - global $wgDeferredUpdateList, $wgMessageCache; - $fname = "MovePageForm::doSubmit"; - - $this->ot = Title::newFromText( $wpOldTitle ); - $this->nt = Title::newFromText( $wpNewTitle ); - if( !$this->ot or !$this->nt ) { - $this->showForm( wfMsg( "badtitletext" ) ); + $ot = Title::newFromURL( $this->oldTitle ); + if( is_null( $ot ) ) { + $wgOut->showErrorPage( 'notargettitle', 'notargettext' ); return; } - $this->ons = $this->ot->getNamespace(); - $this->nns = $this->nt->getNamespace(); - $this->odt = wfStrencode( $this->ot->getDBkey() ); - $this->ndt = wfStrencode( $this->nt->getDBkey() ); - $this->oft = wfStrencode( $this->ot->getPrefixedDBkey() ); - $this->nft = wfStrencode( $this->nt->getPrefixedDBkey() ); - $this->ofx = $this->ot->getPrefixedText(); - $this->nfx = $this->nt->getPrefixedText(); - - $this->oldid = $this->ot->getArticleID(); - $this->newid = $this->nt->getArticleID(); - - if ( strlen( trim( $this->ndt ) ) < 1 ) { - $this->showForm( wfMsg( "articleexists" ) ); - return; - } - if ( ( ! Namespace::isMovable( $this->ons ) ) || - ( "" == $this->odt ) || - ( "" != $this->ot->getInterwiki() ) || - ( !$this->ot->userCanEdit() ) || - ( !$this->oldid ) || - ( ! Namespace::isMovable( $nns ) ) || - ( "" == $this->ndt ) || - ( "" != $this->nt->getInterwiki() ) || - ( !$this->nt->userCanEdit() ) || - ( $this->ons == NS_MEDIAWIKI && $wgMessageCache->isCacheable( $this->odt ) ) ) { - $this->showForm( wfMsg( "badarticleerror" ) ); - return; - } - # 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). - - if ( 0 != $this->newid ) { # Target exists; check for validity - if ( ! $this->isValidTarget() ) { - $this->showForm( wfMsg( "articleexists" ) ); - return; - } - $this->moveOverExistingRedirect(); - } else { # Target didn't exist, do normal move. - $this->moveToNewTitle(); - } - - $this->updateWatchlists(); - - $u = new SearchUpdate( $this->oldid, $this->nt->getPrefixedDBkey() ); - $u->doUpdate(); - $u = new SearchUpdate( $this->newid, $this->ot->getPrefixedDBkey(), "" ); - $u->doUpdate(); - - # Move talk page if (1) the checkbox says to, (2) the source - # and target namespaces are identical, (3) the namespaces are not - # themselves talk namespaces, and of course (4) it exists. - - if ( ( 1 == $wpMovetalk ) && - ( ! Namespace::isTalk( $this->ons ) ) && - ( $this->ons == $this->nns ) ) { - - $this->ons = $this->nns = Namespace::getTalk( $this->ons ); - $this->ot = Title::makeTitle( $this->ons, $this->ot->getDBkey() ); - $this->nt = Title::makeTitle( $this->nns, $this->nt->getDBkey() ); - - # odt, ndt, ofx, nfx remain the same - - $this->oft = wfStrencode( $this->ot->getPrefixedDBkey() ); - $this->nft = wfStrencode( $this->nt->getPrefixedDBkey() ); - - $this->oldid = $this->ot->getArticleID(); - $this->newid = $this->nt->getArticleID(); + $oldTitle = $ot->getPrefixedText(); - if ( 0 != $this->oldid ) { - if ( 0 != $this->newid ) { - if ( $this->isValidTarget() ) { - $this->moveOverExistingRedirect(); - $this->talkmoved = 1; - } else { - $this->talkmoved = 'invalid'; + $encOldTitle = htmlspecialchars( $oldTitle ); + if( $this->newTitle == '' ) { + # Show the current title as a default + # when the form is first opened. + $encNewTitle = $encOldTitle; + } else { + if( $err == '' ) { + $nt = Title::newFromURL( $this->newTitle ); + if( $nt ) { + # If a title was supplied, probably from the move log revert + # link, check for validity. We can then show some diagnostic + # information and save a click. + $newerr = $ot->isValidMoveOperation( $nt ); + if( is_string( $newerr ) ) { + $err = $newerr; } - } else { - $this->moveToNewTitle(); - $this->talkmoved = 1; } - $u = new SearchUpdate( $this->oldid, $this->nt->getPrefixedDBkey() ); - $u->doUpdate(); - $u = new SearchUpdate( $this->newid, $this->ot->getPrefixedDBkey(), "" ); - $u->doUpdate(); } + $encNewTitle = htmlspecialchars( $this->newTitle ); + } + $encReason = htmlspecialchars( $this->reason ); + + if ( $err == 'articleexists' && $wgUser->isAllowed( 'delete' ) ) { + $wgOut->addWikiText( wfMsg( 'delete_and_move_text', $encNewTitle ) ); + $movepagebtn = wfMsgHtml( 'delete_and_move' ); + $submitVar = 'wpDeleteAndMove'; + $confirm = " +" . wfMsg( "talkpagemoved" ) ); - } elseif( 'invalid' == $talkmoved ) { - $wgOut->addHTML( "\n
" . wfMsg( "talkexists" ) . "" ); - } else { - $ot = Title::newFromURL( $oldtitle ); - if ( ! Namespace::isTalk( $ot->getNamespace() ) ) { - $wgOut->addHTML( "\n
" . wfMsg( "talkpagenotmoved" ) ); - } + if ( $err != '' ) { + $wgOut->setSubtitle( wfMsg( 'formerror' ) ); + $wgOut->addWikiText( '
' . wfMsg($err) . "
\n" ); } - } - - # Is the the existing target title valid? - function isValidTarget() - { - $fname = "MovePageForm::isValidTarget"; + $moveTalkChecked = $this->moveTalk ? ' checked="checked"' : ''; - $sql = "SELECT cur_is_redirect,cur_text FROM cur " . - "WHERE cur_id={$this->newid}"; - $res = wfQuery( $sql, DB_READ, $fname ); - $obj = wfFetchObject( $res ); + $wgOut->addHTML( " +\n" ); - if ( preg_match( "/\\[\\[\\s*([^\\]]*)]]/", $obj->cur_text, $m ) ) { - $rt = Title::newFromText( $m[1] ); - if ( 0 != strcmp( wfStrencode( $rt->getPrefixedDBkey() ), - $this->oft ) ) { - return false; - } - } - $sql = "SELECT old_id FROM old WHERE old_namespace={$this->nns} " . - "AND old_title='{$this->ndt}'"; - $res = wfQuery( $sql, DB_READ, $fname ); - if ( 0 != wfNumRows( $res ) ) { return false; } + $this->showLogFragment( $ot, $wgOut ); - return true; } - # Move page to title which is presently a redirect to the source - # page. Handling link tables here is tricky. - - function moveOverExistingRedirect() - { - global $wgUser, $wgLinkCache; - $fname = "MovePageForm::moveOverExistingRedirect"; - $mt = wfMsg( "movedto" ); - - # Change the name of the target page: - $now = wfTimestampNow(); - $sql = "UPDATE cur SET cur_touched='{$now}'," . - "cur_namespace={$this->nns},cur_title='{$this->ndt}' " . - "WHERE cur_id={$this->oldid}"; - wfQuery( $sql, DB_WRITE, $fname ); - $wgLinkCache->clearLink( $this->nft ); - - # Repurpose the old redirect. We don't save it to history since - # by definition if we've got here it's rather uninteresting. - $sql = "UPDATE cur SET cur_touched='{$now}',cur_timestamp='{$now}'," . - "cur_namespace={$this->ons},cur_title='{$this->odt}'," . - "cur_text='#REDIRECT [[{$this->nft}]]\n',cur_comment='" . - "{$mt} \\\"{$this->nft}\\\"',cur_user='" . $wgUser->getID() . - "',cur_minor_edit=0,cur_counter=0,cur_restrictions=''," . - "cur_user_text='" . wfStrencode( $wgUser->getName() ) . "'," . - "cur_is_redirect=1,cur_is_new=0 WHERE cur_id={$this->newid}"; - wfQuery( $sql, DB_WRITE, $fname ); - $wgLinkCache->clearLink( $this->oft ); - - # Fix the redundant names for the past revisions of the target page. - # The redirect should have no old revisions. - $sql = "UPDATE old SET " . - "old_namespace={$this->nns},old_title='{$this->ndt}' WHERE " . - "old_namespace={$this->ons} AND old_title='{$this->odt}'"; - wfQuery( $sql, DB_WRITE, $fname ); - - RecentChange::notifyMove( $now, $this->ot, $this->nt, $wgUser, $mt ); + function doSubmit() { + global $wgOut, $wgUser, $wgRequest; - # The only link from here should be the old redirect + if ( $wgUser->pingLimiter( 'move' ) ) { + $wgOut->rateLimited(); + return; + } - $sql = "DELETE FROM links WHERE l_from='{$this->nft}'"; - wfQuery( $sql, DB_WRITE, $fname ); + # Variables beginning with 'o' for old article 'n' for new article - $sql = "UPDATE links SET l_from='{$this->nft}' WHERE l_from='{$this->oft}'"; - wfQuery( $sql, DB_WRITE, $fname ); + $ot = Title::newFromText( $this->oldTitle ); + $nt = Title::newFromText( $this->newTitle ); - # Swap links. Using MAXINT as a temp; if there's ever an article - # with id 4294967295, this will fail, but I think that's pretty safe + # Delete to make way if requested + if ( $wgUser->isAllowed( 'delete' ) && $this->deleteAndMove ) { + $article = new Article( $nt ); + // This may output an error message and exit + $article->doDelete( wfMsgForContent( 'delete_and_move_reason' ) ); + } - $sql = "UPDATE links SET l_to=4294967295 WHERE l_to={$this->oldid}"; - wfQuery( $sql, DB_WRITE, $fname ); + # don't allow moving to pages with # in + if ( !$nt || $nt->getFragment() != '' ) { + $this->showForm( 'badtitletext' ); + return; + } - $sql = "UPDATE links SET l_to={$this->oldid} WHERE l_to={$this->newid}"; - wfQuery( $sql, DB_WRITE, $fname ); + $error = $ot->moveTo( $nt, true, $this->reason ); + if ( $error !== true ) { + $this->showForm( $error ); + return; + } - $sql = "UPDATE links SET l_to={$this->newid} WHERE l_to=4294967295"; - wfQuery( $sql, DB_WRITE, $fname ); + wfRunHooks( 'SpecialMovepageAfterMove', array( &$this , &$ot , &$nt ) ) ; - # Note: the insert below must be after the updates above! + # Move the talk page if relevant, if it exists, and if we've been told to + $ott = $ot->getTalkPage(); + if( $ott->exists() ) { + if( $this->moveTalk && !$ot->isTalkPage() && !$nt->isTalkPage() ) { + $ntt = $nt->getTalkPage(); + + # Attempt the move + $error = $ott->moveTo( $ntt, true, $this->reason ); + if ( $error === true ) { + $talkmoved = 1; + wfRunHooks( 'SpecialMovepageAfterMove', array( &$this , &$ott , &$ntt ) ) ; + } else { + $talkmoved = $error; + } + } else { + # Stay silent on the subject of talk. + $talkmoved = ''; + } + } else { + $talkmoved = 'notalkpage'; + } + + # Deal with watches + if( $this->watch ) { + $wgUser->addWatch( $ot ); + $wgUser->addWatch( $nt ); + } else { + $wgUser->removeWatch( $ot ); + $wgUser->removeWatch( $nt ); + } - $sql = "INSERT INTO links (l_from,l_to) VALUES ('{$this->oft}',{$this->oldid})"; - wfQuery( $sql, DB_WRITE, $fname ); + # Give back result to user. + $titleObj = SpecialPage::getTitleFor( 'Movepage' ); + $success = $titleObj->getFullURL( + 'action=success&oldtitle=' . wfUrlencode( $ot->getPrefixedText() ) . + '&newtitle=' . wfUrlencode( $nt->getPrefixedText() ) . + '&talkmoved='.$talkmoved ); - $sql = "UPDATE imagelinks SET il_from='{$this->nft}' WHERE il_from='{$this->oft}'"; - wfQuery( $sql, DB_WRITE, $fname ); + $wgOut->redirect( $success ); } - # Move page to non-existing title. - - function moveToNewTitle() - { - global $wgUser, $wgLinkCache; - $fname = "MovePageForm::moveToNewTitle"; - $mt = wfMsg( "movedto" ); - - $now = wfTimestampNow(); - $won = wfInvertTimestamp( $now ); - $sql = "UPDATE cur SET cur_touched='{$now}'," . - "cur_namespace={$this->nns},cur_title='{$this->ndt}' " . - "WHERE cur_id={$this->oldid}"; - wfQuery( $sql, DB_WRITE, $fname ); - $wgLinkCache->clearLink( $this->nft ); - - $comment = "{$mt} \"{$this->nft}\""; - $encComment = wfStrencode( $comment ); - $common = "{$this->ons},'{$this->odt}'," . - "'$encComment','" .$wgUser->getID() . "','" . - wfStrencode( $wgUser->getName() ) ."','{$now}'"; - $sql = "INSERT INTO cur (cur_namespace,cur_title," . - "cur_comment,cur_user,cur_user_text,cur_timestamp,inverse_timestamp," . - "cur_touched,cur_text,cur_is_redirect,cur_is_new) " . - "VALUES ({$common},'{$won}','{$now}','#REDIRECT [[{$this->nft}]]\n',1,1)"; - wfQuery( $sql, DB_WRITE, $fname ); - $this->newid = wfInsertId(); - $wgLinkCache->clearLink( $this->oft ); - - $sql = "UPDATE old SET " . - "old_namespace={$this->nns},old_title='{$this->ndt}' WHERE " . - "old_namespace={$this->ons} AND old_title='{$this->odt}'"; - wfQuery( $sql, DB_WRITE, $fname ); - - RecentChange::notifyMove( $now, $this->ot, $this->nt, $wgUser, $comment ); - Article::onArticleCreate( $this->nt ); - - $sql = "UPDATE links SET l_from='{$this->nft}' WHERE l_from='{$this->oft}'"; - wfQuery( $sql, DB_WRITE, $fname ); - - $sql = "UPDATE links SET l_to={$this->newid} WHERE l_to={$this->oldid}"; - wfQuery( $sql, DB_WRITE, $fname ); - - $sql = "INSERT INTO links (l_from,l_to) VALUES ('{$this->oft}',{$this->oldid})"; - wfQuery( $sql, DB_WRITE, $fname ); - - # Non-existent target may have had broken links to it; these must - # now be removed and made into good links. - $update = new LinksUpdate( $this->oldid, $this->nft ); - $update->fixBrokenLinks(); - - $sql = "UPDATE imagelinks SET il_from='{$this->nft}' WHERE il_from='{$this->oft}'"; - wfQuery( $sql, DB_WRITE, $fname ); + function showSuccess() { + global $wgOut, $wgRequest, $wgUser; + + $old = Title::newFromText( $wgRequest->getVal( 'oldtitle' ) ); + $new = Title::newFromText( $wgRequest->getVal( 'newtitle' ) ); + + if( is_null( $old ) || is_null( $new ) ) { + throw new ErrorPageError( 'badtitle', 'badtitletext' ); + } + + $wgOut->setPagetitle( wfMsg( 'movepage' ) ); + $wgOut->setSubtitle( wfMsg( 'pagemovedsub' ) ); + + $talkmoved = $wgRequest->getVal( 'talkmoved' ); + $oldUrl = $old->getFullUrl( 'redirect=no' ); + $newUrl = $new->getFullURl(); + $oldText = $old->getPrefixedText(); + $newText = $new->getPrefixedText(); + $oldLink = "[$oldUrl $oldText]"; + $newLink = "[$newUrl $newText]"; + + $s = wfMsg( 'movepage-moved', $oldLink, $newLink, $oldText, $newText ); + + if ( $talkmoved == 1 ) { + $s .= "\n\n" . wfMsg( 'talkpagemoved' ); + } elseif( 'articleexists' == $talkmoved ) { + $s .= "\n\n" . wfMsg( 'talkexists' ); + } else { + if( !$old->isTalkPage() && $talkmoved != 'notalkpage' ) { + $s .= "\n\n" . wfMsg( 'talkpagenotmoved', wfMsg( $talkmoved ) ); + } + } + $wgOut->addWikiText( $s ); } - - function updateWatchlists() - { - $oldnamespace = $this->ons & ~1; - $newnamespace = $this->nns & ~1; - $oldtitle = $this->odt; - $newtitle = $this->ndt; - - if( $oldnamespace == $newnamespace and $oldtitle == $newtitle ) - return; - - WatchedItem::duplicateEntries( $this->ot, $this->nt ); + + function showLogFragment( $title, &$out ) { + $out->addHtml( wfElement( 'h2', NULL, LogPage::logName( 'move' ) ) ); + $request = new FauxRequest( array( 'page' => $title->getPrefixedText(), 'type' => 'move' ) ); + $viewer = new LogViewer( new LogReader( $request ) ); + $viewer->showList( $out ); } - + } -?> +