includes/SpecialIpblocklist.php

   1 <?
   2
   3 function wfSpecialIpblocklist()
   4 {
   5         global $wgUser, $wgOut, $action, $ip;
   6
   7         $fields = array( "wpUnblockAddress" );
   8         wfCleanFormFields( $fields );
   9         $ipu = new IPUnblockForm();
  10
  11         if ( "success" == $action ) {
  12                 $msg = str_replace( "$1", $ip, wfMsg( "ipusuccess" ) );
  13                 $ipu->showList( $msg );
  14         } else if ( "submit" == $action ) {
  15                 if ( ! $wgUser->isSysop() ) {
  16                         $wgOut->sysopRequired();
  17                         return;
  18                 }
  19                 $ipu->doSubmit();
  20         } else if ( "unblock" == $action ) {
  21                 $ipu->showForm( "" );
  22         } else {
  23                 $ipu->showList( "" );
  24         }
  25 }
  26
  27 class IPUnblockForm {
  28
  29         function showForm( $err )
  30         {
  31                 global $wgOut, $wgUser, $wgLang;
  32                 global $ip, $wpUnblockAddress;
  33
  34                 $wgOut->setPagetitle( wfMsg( "unblockip" ) );
  35                 $wgOut->addWikiText( wfMsg( "unblockiptext" ) );
  36
  37                 if ( ! $wpUnblockAddress ) { $wpUnblockAddress = $ip; }
  38                 $ipa = wfMsg( "ipaddress" );
  39                 $ipr = wfMsg( "ipbreason" );
  40                 $ipus = wfMsg( "ipusubmit" );
  41                 $action = wfLocalUrlE( $wgLang->specialPage( "Ipblocklist" ),
  42                   "action=submit" );
  43
  44                 if ( "" != $err ) {
  45                         $wgOut->setSubtitle( wfMsg( "formerror" ) );
  46                         $wgOut->addHTML( "<p><font color='red' size='+1'>{$err}</font>\n" );
  47                 }
  48                 $wgOut->addHTML( "<p>
  49 <form id=\"unblockip\" method=\"post\" action=\"{$action}\">
  50 <table border=0><tr>
  51 <td align=right>{$ipa}:</td>
  52 <td align=left>
  53 <input tabindex=1 type=text size=20 name=\"wpUnblockAddress\" value=\"{$wpUnblockAddress}\">
  54 </td></tr><tr>
  55 <td align=right>{$ipr}:</td>
  56 <td align=left>
  57 <input tabindex=1 type=text size=40 name=\"wpUnblockReason\" value=\"{$wpUnblockReason}\">
  58 </td></tr><tr>
  59 <td>&nbsp;</td><td align=left>
  60 <input tabindex=2 type=submit name=\"wpBlock\" value=\"{$ipus}\">
  61 </td></tr></table>
  62 </form>\n" );
  63
  64         }
  65
  66         function doSubmit()
  67         {
  68                 global $wgOut, $wgUser, $wgLang;
  69                 global $wpUnblockAddress, $wpUnblockReason;
  70
  71                 $block = new Block();
  72                 $wpUnblockAddress = trim( $wpUnblockAddress );
  73
  74                 if ( $wpUnblockAddress{0} == "#" ) {
  75                         $block->mId = substr( $wpUnblockAddress, 1 );
  76                 } else {
  77                         $block->mAddress = $wpUnblockAddress;
  78                 }
  79
  80                 # Delete block (if it exists)
  81                 # We should probably check for errors rather than just declaring success
  82                 $block->delete();
  83
  84                 # Make log entry
  85                 $log = new LogPage( wfMsg( "blocklogpage" ), wfMsg( "blocklogtext" ) );
  86                 $action = str_replace( "$1", $wpUnblockAddress, wfMsg( "unblocklogentry" ) );
  87                 $log->addEntry( $action, $wpUnblockReason );
  88
  89                 # Report to the user
  90                 $success = wfLocalUrl( $wgLang->specialPage( "Ipblocklist" ),
  91                   "action=success&ip=" . urlencode($wpUnblockAddress) );
  92                 $wgOut->redirect( $success );
  93         }
  94
  95         function showList( $msg )
  96         {
  97                 global $wgOut;
  98
  99                 $wgOut->setPagetitle( wfMsg( "ipblocklist" ) );
 100                 if ( "" != $msg ) {
 101                         $wgOut->setSubtitle( $msg );
 102                 }
 103                 $wgOut->addHTML( "<ul>" );
 104                 Block::enumBlocks( "wfAddRow", 0 );
 105                 $wgOut->addHTML( "</ul>\n" );
 106         }
 107 }
 108
 109 # Callback function to output a block
 110 function wfAddRow( $block, $tag ) {
 111         global $wgOut, $wgUser, $wgLang, $ip;
 112
 113         $sk = $wgUser->getSkin();
 114
 115         # Hide addresses blocked by User::spreadBlocks, for privacy
 116         $addr = $block->mAuto ? "#{$block->mId}" : $block->mAddress;
 117
 118         $name = User::whoIs( $block->mBy );
 119         $ulink = $sk->makeKnownLink( $wgLang->getNsText( Namespace::getUser() ). ":{$name}", $name );
 120         $d = $wgLang->timeanddate( $block->mTimestamp, true );
 121
 122         $line = str_replace( "$1", $d, wfMsg( "blocklistline" ) );
 123         $line = str_replace( "$2", $ulink, $line );
 124         $line = str_replace( "$3", $addr, $line );
 125
 126         $wgOut->addHTML( "<li>{$line}" );
 127
 128         if ( !$block->mAuto ) {
 129                 $clink = "<a href=\"" . wfLocalUrlE( $wgLang->specialPage(
 130                   "Contributions" ), "target={$block->mAddress}" ) . "\">" .
 131                   wfMsg( "contribslink" ) . "</a>";
 132                 $wgOut->addHTML( " ({$clink})" );
 133         }
 134
 135         if ( $wgUser->isSysop() ) {
 136                 $ublink = "<a href=\"" . wfLocalUrlE( $wgLang->specialPage(
 137                   "Ipblocklist" ), "action=unblock&ip=" . urlencode( $addr ) ) . "\">" .
 138                   wfMsg( "unblocklink" ) . "</a>";
 139                 $wgOut->addHTML( " ({$ublink})" );
 140         }
 141         if ( "" != $block->mReason ) {
 142                 $wgOut->addHTML( " <em>(" . wfEscapeHTML( $block->mReason ) .
 143                   ")</em>" );
 144         }
 145         $wgOut->addHTML( "</li>\n" );
 146 }
 147
 148
 149 ?>