5 * @subpackage SpecialPage
10 * @param string $par An article name ??
12 function wfSpecialWhatlinkshere($par = NULL) {
13 global $wgUser, $wgOut, $wgRequest;
14 $fname = 'wfSpecialWhatlinkshere';
16 $target = isset($par) ?
$par : $wgRequest->getVal( 'target' );
17 list( $limit, $offset ) = $wgRequest->getLimitOffset();
19 if (is_null($target)) {
20 $wgOut->errorpage( 'notargettitle', 'notargettext' );
24 $nt = Title
::newFromURL( $target );
26 $wgOut->errorpage( 'notargettitle', 'notargettext' );
29 $wgOut->setPagetitle( $nt->getPrefixedText() );
30 $wgOut->setSubtitle( wfMsg( 'linklistsub' ) );
32 $sk = $wgUser->getSkin();
33 $isredir = ' (' . wfMsg( 'isredirect' ) . ")\n";
35 $wgOut->addHTML('< '.$sk->makeKnownLinkObj($nt, '', 'redirect=no' )."<br />\n");
37 wfShowIndirectLinks( 0, $nt, $limit, $offset );
42 * @param Title $target
47 function wfShowIndirectLinks( $level, $target, $limit, $offset = 0 ) {
48 global $wgOut, $wgUser;
49 $fname = 'wfShowIndirectLinks';
51 $dbr =& wfGetDB( DB_READ
);
53 // Read one extra row as an at-end check
54 $queryLimit = $limit +
1;
55 $limitSql = ( $level == 0 )
56 ?
"$offset,$queryLimit"
59 $res = $dbr->select( array( 'pagelinks', 'page' ),
60 array( 'page_id', 'page_namespace', 'page_title', 'page_is_redirect' ),
63 'pl_namespace' => $target->getNamespace(),
64 'pl_title' => $target->getDbKey() ),
66 array( 'LIMIT' => $limitSql ) );
68 if ( 0 == $dbr->numRows( $res ) ) {
70 $wgOut->addWikiText( wfMsg( 'nolinkshere' ) );
75 $wgOut->addWikiText( wfMsg( 'linkshere' ) );
77 $sk = $wgUser->getSkin();
78 $isredir = ' (' . wfMsg( 'isredirect' ) . ")\n";
80 if( $dbr->numRows( $res ) == 0 ) {
83 $atend = ( $dbr->numRows( $res ) <= $limit );
86 $specialTitle = Title
::makeTitle( NS_SPECIAL
, 'Whatlinkshere' );
87 $prevnext = wfViewPrevNext( $offset, $limit, $specialTitle,
88 'target=' . urlencode( $target->getPrefixedDbKey() ),
90 $wgOut->addHTML( $prevnext );
93 $wgOut->addHTML( '<ul>' );
95 while ( $row = $dbr->fetchObject( $res ) ) {
96 if( ++
$linksShown > $limit ) {
97 // Last row is for checks only; don't display it.
101 $nt = Title
::makeTitle( $row->page_namespace
, $row->page_title
);
103 if ( $row->page_is_redirect
) {
104 $extra = 'redirect=no';
109 $link = $sk->makeKnownLinkObj( $nt, '', $extra );
110 $wgOut->addHTML( '<li>'.$link );
112 if ( $row->page_is_redirect
) {
113 $wgOut->addHTML( $isredir );
115 wfShowIndirectLinks( $level +
1, $nt, 500 );
118 $wgOut->addHTML( "</li>\n" );
120 $wgOut->addHTML( "</ul>\n" );
123 $wgOut->addHTML( $prevnext );