Record and report memory usage change in profiling.

[lhc/web/wiklou.git] / includes / SpecialWhatlinkshere.php

diff --git a/includes/SpecialWhatlinkshere.php b/includes/SpecialWhatlinkshere.php
index 1744676..92a4931 100644 (file)
--- a/includes/SpecialWhatlinkshere.php
+++ b/includes/SpecialWhatlinkshere.php
@@ -2,18 +2,19 @@
 
 function wfSpecialWhatlinkshere($par = NULL)
 {
-       global $wgUser, $wgOut, $target;
+       global $wgUser, $wgOut, $wgRequest;
        $fname = "wfSpecialWhatlinkshere";
 
-       if($par) {
+       $target = $wgRequest->getVal( 'target' );
+       $limit = $wgRequest->getInt( 'limit', 500 );
+       
+       if(!empty($par)) {
                $target = $par;
-       } else {
-               $target = $_REQUEST['target'] ;
-       }
-       if ( "" == $target ) {
+       } else if ( is_null( $target ) ) {
                $wgOut->errorpage( "notargettitle", "notargettext" );
                return;
        }
+
        $nt = Title::newFromURL( $target );
        if( !$nt ) {
                $wgOut->errorpage( "notargettitle", "notargettext" );
@@ -26,20 +27,22 @@ function wfSpecialWhatlinkshere($par = NULL)
        $sk = $wgUser->getSkin();
        $isredir = " (" . wfMsg( "isredirect" ) . ")\n";
 
-       $wgOut->addHTML("&lt; ".$sk->makeKnownLinkObj($nt, "", "redirect=no" )."<br/>\n");
-       
+       $wgOut->addHTML("&lt; ".$sk->makeKnownLinkObj($nt, "", "redirect=no" )."<br />\n");
+       $dbr =& wfGetDB( DB_SLAVE );
+       extract( $dbr->tableNames( 'cur', '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 cur_id,cur_namespace,cur_title,cur_is_redirect FROM $brokenlinks,$cur WHERE bl_to='" .
+                 $dbr->strencode( $nt->getPrefixedDBkey() ) . "' AND bl_from=cur_id LIMIT $limit";
+               $res = $dbr->query( $sql, $fname );
 
-               if ( 0 == wfNumRows( $res ) ) {
+               if ( 0 == $dbr->numRows( $res ) ) {
                        $wgOut->addHTML( wfMsg( "nolinkshere" ) );
                } else {
                        $wgOut->addHTML( wfMsg( "linkshere" ) );
                        $wgOut->addHTML( "\n<ul>" );
 
-                       while ( $row = wfFetchObject( $res ) ) {
+                       while ( $row = $dbr->fetchObject( $res ) ) {
                                $nt = Title::makeTitle( $row->cur_namespace, $row->cur_title );
                                if( !$nt ) {
                                        continue;
@@ -49,27 +52,30 @@ function wfSpecialWhatlinkshere($par = NULL)
 
                                if ( $row->cur_is_redirect ) {
                                        $wgOut->addHTML( $isredir );
-                                       wfShowIndirectLinks( 1, $row->cur_id );
+                                       wfShowIndirectLinks( 1, $row->cur_id, $limit );
                                }
                                $wgOut->addHTML( "</li>\n" );
                        }
                        $wgOut->addHTML( "</ul>\n" );
-                       wfFreeResult( $res );
+                       $dbr->freeResult( $res );
                }
        } else {
-               wfShowIndirectLinks( 0, $id );
+               wfShowIndirectLinks( 0, $id, $limit );
        }
 }
 
-function wfShowIndirectLinks( $level, $lid )
+function wfShowIndirectLinks( $level, $lid, $limit )
 {
        global $wgOut, $wgUser;
        $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','cur' ) );
+
+       $sql = "SELECT cur_id,cur_namespace,cur_title,cur_is_redirect FROM $links,$cur WHERE l_to={$lid} AND l_from=cur_id LIMIT $limit";
+       $res = $dbr->query( $sql, $fname );
 
-       if ( 0 == wfNumRows( $res ) ) {
+       if ( 0 == $dbr->numRows( $res ) ) {
                if ( 0 == $level ) {
                        $wgOut->addHTML( wfMsg( "nolinkshere" ) );
                }
@@ -82,27 +88,27 @@ function wfShowIndirectLinks( $level, $lid )
        $isredir = " (" . wfMsg( "isredirect" ) . ")\n";
 
        $wgOut->addHTML( "<ul>" );
-       while ( $row = wfFetchObject( $res ) ) {
+       while ( $row = $dbr->fetchObject( $res ) ) {
                $nt = Title::makeTitle( $row->cur_namespace, $row->cur_title );
                if( !$nt ) {
                        $wgOut->addHTML( "<!-- bad backlink: " . htmlspecialchars( $row->l_from ) . " -->\n" );
                        continue;
                }
-               
+
                if ( $row->cur_is_redirect ) {
-                   $extra = "redirect=no";
+                       $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 );
-                   }
+                       $wgOut->addHTML( $isredir );
+                       if ( $level < 2 ) {
+                               wfShowIndirectLinks( $level + 1, $row->cur_id, $limit );
+                       }
                }
                $wgOut->addHTML( "</li>\n" );
        }