includes/SpecialUnusedimages.php

   1 <?php
   2 /**
   3  *
   4  */
   5
   6 /**
   7  *
   8  */
   9 function wfSpecialUnusedimages() {
  10         global $wgUser, $wgOut, $wgLang, $wgTitle;
  11         $fname = "wfSpecialUnusedimages";
  12
  13         list( $limit, $offset ) = wfCheckLimits();
  14         $dbr =& wfGetDB( DB_SLAVE );
  15         extract( $dbr->tableNames( 'image','imagelinks' ) );
  16
  17         $sql = "SELECT img_name,img_user,img_user_text,img_timestamp,img_description " .
  18           "FROM $image LEFT JOIN $imagelinks ON img_name=il_to WHERE il_to IS NULL " .
  19           "ORDER BY img_timestamp ".$dbr->limitResult($limit,$offset);
  20         $res = $dbr->query( $sql, $fname );
  21
  22         $sk = $wgUser->getSkin();
  23
  24         $wgOut->addHTML( wfMsg( "unusedimagestext" ) );
  25         $top = wfShowingResults( $offset, $limit );
  26         $wgOut->addHTML( "<p>{$top}\n" );
  27
  28         $sl = wfViewPrevNext( $offset, $limit,
  29           $wgLang->specialPage( "Unusedimages" ) );
  30         $wgOut->addHTML( "<br />{$sl}</p>\n" );
  31
  32         $ins = $wgLang->getNsText ( 6 ) ;
  33         $s = "<ol start='" . ( $offset + 1 ) . "'>";
  34         while ( $obj = $dbr->fetchObject( $res ) ) {
  35                 $name = $obj->img_name;
  36                 $dlink = $sk->makeKnownLink( "{$ins}:{$name}", wfMsg( "imgdesc" ) );
  37                 $ilink = "<a href=\"" . Image::wfImageUrl( $name ) . "\">{$name}</a>";
  38
  39                 $d = $wgLang->timeanddate( $obj->img_timestamp, true );
  40                 $u = $obj->img_user;
  41                 $ut = $obj->img_user_text;
  42                 $c = $obj->img_description;
  43
  44                 if ( 0 == $u ) { $ul = $ut; }
  45                 else { $ul = $sk->makeLink( $wgLang->getNsText(2).":{$ut}", $ut ); }
  46
  47                 $s .= "<li>({$dlink}) {$ilink} . . {$d} . . {$ul}";
  48
  49                 if ( "" != $c && "*" != $c ) { $s .= " <em>({$c})</em>"; }
  50                 $s .= "</li>\n";
  51         }
  52         $dbr->freeResult( $res );
  53         $s .= "</ol>\n\n";
  54         $wgOut->addHTML( $s );
  55         $wgOut->addHTML( "<p>{$sl}</p>\n" );
  56 }
  57
  58 ?>