<?php
+/**
+ *
+ * @package MediaWiki
+ * @subpackage SpecialPage
+ */
-function wfSpecialWhatlinkshere($par = NULL)
-{
- global $wgUser, $wgOut, $target;
- $fname = "wfSpecialWhatlinkshere";
+/**
+ * Entry point
+ * @param string $par An article name ??
+ */
+function wfSpecialWhatlinkshere($par = NULL) {
+ global $wgUser, $wgOut, $wgRequest;
+ $fname = 'wfSpecialWhatlinkshere';
- if($par) {
+ $target = $wgRequest->getVal( 'target' );
+ list( $limit, $offset ) = $wgRequest->getLimitOffset();
+
+ if(!empty($par)) {
$target = $par;
- } else {
- $target = $_REQUEST['target'] ;
- }
- if ( "" == $target ) {
- $wgOut->errorpage( "notargettitle", "notargettext" );
+ } else if ( is_null( $target ) ) {
+ $wgOut->errorpage( 'notargettitle', 'notargettext' );
return;
}
+
$nt = Title::newFromURL( $target );
if( !$nt ) {
- $wgOut->errorpage( "notargettitle", "notargettext" );
+ $wgOut->errorpage( 'notargettitle', 'notargettext' );
return;
}
$wgOut->setPagetitle( $nt->getPrefixedText() );
- $wgOut->setSubtitle( wfMsg( "linklistsub" ) );
+ $wgOut->setSubtitle( wfMsg( 'linklistsub' ) );
$id = $nt->getArticleID();
$sk = $wgUser->getSkin();
- $isredir = " (" . wfMsg( "isredirect" ) . ")\n";
+ $isredir = ' (' . wfMsg( 'isredirect' ) . ")\n";
+
+ $wgOut->addHTML('< '.$sk->makeKnownLinkObj($nt, '', 'redirect=no' )."<br />\n");
+
+ $specialTitle = Title::makeTitle( NS_SPECIAL, 'Whatlinkshere' );
+ $wgOut->addHTML( wfViewPrevNext( $offset, $limit, $specialTitle, 'target=' . urlencode( $target ) ) );
+
+ $dbr =& wfGetDB( DB_SLAVE );
+ extract( $dbr->tableNames( 'page', 'brokenlinks', 'links' ) );
if ( 0 == $id ) {
- $sql = "SELECT cur_id,cur_namespace,cur_title,cur_is_redirect FROM brokenlinks,cur WHERE bl_to='" .
- wfStrencode( $nt->getPrefixedDBkey() ) . "' AND bl_from=cur_id LIMIT 500";
- $res = wfQuery( $sql, DB_READ, $fname );
+ $sql = "SELECT page_id,page_namespace,page_title,page_is_redirect FROM $brokenlinks,$page WHERE bl_to='" .
+ $dbr->strencode( $nt->getPrefixedDBkey() ) . "' AND bl_from=page_id " .
+ $dbr->limitResult( $limit, $offset );
+ $res = $dbr->query( $sql, $fname );
- if ( 0 == wfNumRows( $res ) ) {
- $wgOut->addHTML( wfMsg( "nolinkshere" ) );
+ if ( 0 == $dbr->numRows( $res ) ) {
+ $wgOut->addHTML( wfMsg( 'nolinkshere' ) );
} else {
- $wgOut->addHTML( wfMsg( "linkshere" ) );
+ $wgOut->addHTML( wfMsg( 'linkshere' ) );
$wgOut->addHTML( "\n<ul>" );
- while ( $row = wfFetchObject( $res ) ) {
- $nt = Title::makeTitle( $row->cur_namespace, $row->cur_title );
+ while ( $row = $dbr->fetchObject( $res ) ) {
+ $nt = Title::makeTitle( $row->page_namespace, $row->page_title );
if( !$nt ) {
continue;
}
- $link = $sk->makeKnownLinkObj( $nt, "", "redirect=no" );
+ $link = $sk->makeKnownLinkObj( $nt, '', 'redirect=no' );
$wgOut->addHTML( "<li>{$link}" );
- if ( $row->cur_is_redirect ) {
+ if ( $row->page_is_redirect ) {
$wgOut->addHTML( $isredir );
- wfShowIndirectLinks( 1, $row->cur_id );
+ wfShowIndirectLinks( 1, $row->page_id, 500 );
}
$wgOut->addHTML( "</li>\n" );
}
$wgOut->addHTML( "</ul>\n" );
- wfFreeResult( $res );
+ $dbr->freeResult( $res );
}
} else {
- wfShowIndirectLinks( 0, $id );
+ wfShowIndirectLinks( 0, $id, $limit, $offset );
}
+ $wgOut->addHTML( wfViewPrevNext( $offset, $limit, $specialTitle, 'target=' . urlencode( $target ) ) );
}
-function wfShowIndirectLinks( $level, $lid )
-{
+/**
+ *
+ */
+function wfShowIndirectLinks( $level, $lid, $limit, $offset = 0 ) {
global $wgOut, $wgUser;
- $fname = "wfShowIndirectLinks";
+ $fname = 'wfShowIndirectLinks';
- $sql = "SELECT cur_id,cur_namespace,cur_title,cur_is_redirect FROM links,cur WHERE l_to={$lid} AND l_from=cur_id LIMIT 500";
- $res = wfQuery( $sql, DB_READ, $fname );
+ $dbr =& wfGetDB( DB_READ );
+ extract( $dbr->tableNames( 'links','page' ) );
+
+ if ( $level == 0 ) {
+ $limitSql = $dbr->limitResult( $limit, $offset );
+ } else {
+ $limitSql = "LIMIT $limit";
+ }
- if ( 0 == wfNumRows( $res ) ) {
+ $sql = "SELECT page_id,page_namespace,page_title,page_is_redirect FROM $links,$page WHERE l_to={$lid} AND l_from=page_id $limitSql";
+ $res = $dbr->query( $sql, $fname );
+
+ if ( 0 == $dbr->numRows( $res ) ) {
if ( 0 == $level ) {
- $wgOut->addHTML( wfMsg( "nolinkshere" ) );
+ $wgOut->addHTML( wfMsg( 'nolinkshere' ) );
}
return;
}
if ( 0 == $level ) {
- $wgOut->addHTML( wfMsg( "linkshere" ) );
+ $wgOut->addHTML( wfMsg( 'linkshere' ) );
}
$sk = $wgUser->getSkin();
- $isredir = " (" . wfMsg( "isredirect" ) . ")\n";
+ $isredir = ' (' . wfMsg( 'isredirect' ) . ")\n";
- $wgOut->addHTML( "<ul>" );
- while ( $row = wfFetchObject( $res ) ) {
- $nt = Title::makeTitle( $row->cur_namespace, $row->cur_title );
+ $wgOut->addHTML( '<ul>' );
+ while ( $row = $dbr->fetchObject( $res ) ) {
+ $nt = Title::makeTitle( $row->page_namespace, $row->page_title );
if( !$nt ) {
- $wgOut->addHTML( "<!-- bad backlink: " . htmlspecialchars( $row->l_from ) . " -->\n" );
+ $wgOut->addHTML( '<!-- bad backlink: ' . htmlspecialchars( $row->l_from ) . " -->\n" );
continue;
}
-
- if ( $row->cur_is_redirect ) {
- $extra = "redirect=no";
+
+ if ( $row->page_is_redirect ) {
+ $extra = 'redirect=no';
} else {
- $extra = "";
+ $extra = '';
}
-
- $link = $sk->makeKnownLinkObj( $nt, "", $extra );
- $wgOut->addHTML( "<li>{$link}" );
-
- if ( $row->cur_is_redirect ) {
- $wgOut->addHTML( $isredir );
- if ( $level < 2 ) {
- wfShowIndirectLinks( $level + 1, $row->cur_id );
- }
+
+ $link = $sk->makeKnownLinkObj( $nt, '', $extra );
+ $wgOut->addHTML( '<li>'.$link );
+
+ if ( $row->page_is_redirect ) {
+ $wgOut->addHTML( $isredir );
+ if ( $level < 2 ) {
+ wfShowIndirectLinks( $level + 1, $row->page_id, 500 );
+ }
}
$wgOut->addHTML( "</li>\n" );
}