* (bug 10636) Update Thai translation
[lhc/web/wiklou.git] / includes / SpecialBlockip.php
index e7626f0..942ebe8 100644 (file)
@@ -2,8 +2,7 @@
 /**
  * Constructor for Special:Blockip page
  *
- * @package MediaWiki
- * @subpackage SpecialPage
+ * @addtogroup SpecialPage
  */
 
 /**
 function wfSpecialBlockip( $par ) {
        global $wgUser, $wgOut, $wgRequest;
 
+       # Can't block when the database is locked
+       if( wfReadOnly() ) {
+               $wgOut->readOnlyPage();
+               return;
+       }
+
+       # Permission check
        if( !$wgUser->isAllowed( 'block' ) ) {
                $wgOut->permissionRequired( 'block' );
                return;
@@ -31,58 +37,63 @@ function wfSpecialBlockip( $par ) {
 }
 
 /**
- * Form object
+ * Form object for the Special:Blockip page.
  *
- * @package MediaWiki
- * @subpackage SpecialPage
+ * @addtogroup SpecialPage
  */
 class IPBlockForm {
        var $BlockAddress, $BlockExpiry, $BlockReason;
+#      var $BlockEmail;
 
        function IPBlockForm( $par ) {
-               global $wgRequest;
+               global $wgRequest, $wgUser;
 
                $this->BlockAddress = $wgRequest->getVal( 'wpBlockAddress', $wgRequest->getVal( 'ip', $par ) );
+               $this->BlockAddress = strtr( $this->BlockAddress, '_', ' ' );
                $this->BlockReason = $wgRequest->getText( 'wpBlockReason' );
+               $this->BlockReasonList = $wgRequest->getText( 'wpBlockReasonList' );
                $this->BlockExpiry = $wgRequest->getVal( 'wpBlockExpiry', wfMsg('ipbotheroption') );
                $this->BlockOther = $wgRequest->getVal( 'wpBlockOther', '' );
 
-               # Unchecked checkboxes are not included in the form data at all, so having one 
+               # Unchecked checkboxes are not included in the form data at all, so having one
                # that is true by default is a bit tricky
                $byDefault = !$wgRequest->wasPosted();
                $this->BlockAnonOnly = $wgRequest->getBool( 'wpAnonOnly', $byDefault );
                $this->BlockCreateAccount = $wgRequest->getBool( 'wpCreateAccount', $byDefault );
                $this->BlockEnableAutoblock = $wgRequest->getBool( 'wpEnableAutoblock', $byDefault );
+               $this->BlockEmail = $wgRequest->getBool( 'wpEmailBan', false );
+               # Re-check user's rights to hide names, very serious, defaults to 0
+               $this->BlockHideName = ( $wgRequest->getBool( 'wpHideName', 0 ) && $wgUser->isAllowed( 'hideuser' ) ) ? 1 : 0;
        }
 
        function showForm( $err ) {
-               global $wgOut, $wgUser, $wgSysopUserBans;
+               global $wgOut, $wgUser, $wgSysopUserBans, $wgContLang;
 
                $wgOut->setPagetitle( wfMsg( 'blockip' ) );
                $wgOut->addWikiText( wfMsg( 'blockiptext' ) );
 
                if($wgSysopUserBans) {
-                       $mIpaddress = wfMsgHtml( 'ipadressorusername' );
+                       $mIpaddress = Xml::label( wfMsg( 'ipadressorusername' ), 'mw-bi-target' );
                } else {
-                       $mIpaddress = wfMsgHtml( 'ipaddress' );
+                       $mIpaddress = Xml::label( wfMsg( 'ipadress' ), 'mw-bi-target' );
                }
-               $mIpbexpiry = wfMsgHtml( 'ipbexpiry' );
-               $mIpbother = wfMsgHtml( 'ipbother' );
+               $mIpbexpiry = Xml::label( wfMsg( 'ipbexpiry' ), 'wpBlockExpiry' );
+               $mIpbother = Xml::label( wfMsg( 'ipbother' ), 'mw-bi-other' );
                $mIpbothertime = wfMsgHtml( 'ipbotheroption' );
-               $mIpbreason = wfMsgHtml( 'ipbreason' );
-               $mIpbsubmit = wfMsgHtml( 'ipbsubmit' );
+               $mIpbreasonother = Xml::label( wfMsg( 'ipbreason' ), 'wpBlockReasonList' );
+               $mIpbreason = Xml::label( wfMsg( 'ipbotherreason' ), 'mw-bi-reason' );
+               $mIpbreasonotherlist = wfMsgHtml( 'ipbreasonotherlist' );
+
                $titleObj = SpecialPage::getTitleFor( 'Blockip' );
                $action = $titleObj->escapeLocalURL( "action=submit" );
+               $alignRight = $wgContLang->isRtl() ? 'left' : 'right';
 
                if ( "" != $err ) {
                        $wgOut->setSubtitle( wfMsgHtml( 'formerror' ) );
                        $wgOut->addHTML( "<p class='error'>{$err}</p>\n" );
                }
 
-               $scBlockAddress = htmlspecialchars( $this->BlockAddress );
-               $scBlockReason = htmlspecialchars( $this->BlockReason );
-               $scBlockOtherTime = htmlspecialchars( $this->BlockOther );
-               $scBlockExpiryOptions = htmlspecialchars( wfMsgForContent( 'ipboptions' ) );
+               $scBlockExpiryOptions = wfMsgForContent( 'ipboptions' );
 
                $showblockoptions = $scBlockExpiryOptions != '-';
                if (!$showblockoptions)
@@ -100,22 +111,62 @@ class IPBlockForm {
                        $blockExpiryFormOptions .= "<option value=\"$value\"$selected>$show</option>";
                }
 
-               $token = htmlspecialchars( $wgUser->editToken() );
+               $scBlockReasonList = wfMsgForContent( 'ipbreason-dropdown' );
+               $blockReasonList = '';
+               if ( $scBlockReasonList != '' && $scBlockReasonList != '-' ) { 
+                       $blockReasonList = "<option value=\"other\">$mIpbreasonotherlist</option>";
+                       $optgroup = "";
+                       foreach ( explode( "\n", $scBlockReasonList ) as $option) {
+                               $value = trim( htmlspecialchars($option) );
+                               if ( $value == '' ) {
+                                       continue;
+                               } elseif ( substr( $value, 0, 1) == '*' && substr( $value, 1, 1) != '*' ) {
+                                       // A new group is starting ...
+                                       $value = trim( substr( $value, 1 ) );
+                                       $blockReasonList .= "$optgroup<optgroup label=\"$value\">";
+                                       $optgroup = "</optgroup>";
+                               } elseif ( substr( $value, 0, 2) == '**' ) {
+                                       // groupmember
+                                       $selected = "";
+                                       $value = trim( substr( $value, 2 ) );
+                                       if ( $this->BlockReasonList === $value)
+                                               $selected = ' selected="selected"';
+                                       $blockReasonList .= "<option value=\"$value\"$selected>$value</option>";
+                               } else {
+                                       // groupless block reason
+                                       $selected = "";
+                                       if ( $this->BlockReasonList === $value)
+                                               $selected = ' selected="selected"';
+                                       $blockReasonList .= "$optgroup<option value=\"$value\"$selected>$value</option>";
+                                       $optgroup = "";
+                               }
+                       }
+                       $blockReasonList .= $optgroup;
+               }
+
+               $token = $wgUser->editToken();
 
+               global $wgStylePath, $wgStyleVersion;
                $wgOut->addHTML( "
+<script type=\"text/javascript\" src=\"$wgStylePath/common/block.js?$wgStyleVersion\">
+</script>
 <form id=\"blockip\" method=\"post\" action=\"{$action}\">
        <table border='0'>
                <tr>
-                       <td align=\"right\">{$mIpaddress}:</td>
-                       <td align=\"left\">
-                               <input tabindex='1' type='text' size='40' name=\"wpBlockAddress\" value=\"{$scBlockAddress}\" />
+                       <td align=\"$alignRight\">{$mIpaddress}</td>
+                       <td>
+                               " . Xml::input( 'wpBlockAddress', 45, $this->BlockAddress,
+                                       array(
+                                               'tabindex' => '1',
+                                               'id' => 'mw-bi-target',
+                                               'onchange' => 'updateBlockOptions()' ) ) . "
                        </td>
                </tr>
                <tr>");
                if ($showblockoptions) {
                        $wgOut->addHTML("
-                       <td align=\"right\">{$mIpbexpiry}:</td>
-                       <td align=\"left\">
+                       <td align=\"$alignRight\">{$mIpbexpiry}</td>
+                       <td>
                                <select tabindex='2' id='wpBlockExpiry' name=\"wpBlockExpiry\" onchange=\"considerChangingExpiryFocus()\">
                                        $blockExpiryFormOptions
                                </select>
@@ -125,50 +176,98 @@ class IPBlockForm {
                $wgOut->addHTML("
                </tr>
                <tr id='wpBlockOther'>
-                       <td align=\"right\">{$mIpbother}:</td>
-                       <td align=\"left\">
-                               <input tabindex='3' type='text' size='40' name=\"wpBlockOther\" value=\"{$scBlockOtherTime}\" />
+                       <td align=\"$alignRight\">{$mIpbother}</td>
+                       <td>
+                               " . Xml::input( 'wpBlockOther', 45, $this->BlockOther,
+                                       array( 'tabindex' => '3', 'id' => 'mw-bi-other' ) ) . "
                        </td>
-               </tr>
-               <tr>
-                       <td align=\"right\">{$mIpbreason}:</td>
-                       <td align=\"left\">
-                               <input tabindex='3' type='text' size='40' name=\"wpBlockReason\" value=\"{$scBlockReason}\" />
+               </tr>");
+               if ( $blockReasonList != '' ) {
+                       $wgOut->addHTML("
+                       <tr>
+                               <td align=\"$alignRight\">{$mIpbreasonother}</td>
+                               <td>
+                                       <select tabindex='4' id=\"wpBlockReasonList\" name=\"wpBlockReasonList\">
+                                               $blockReasonList
+                                               </select>
+                               </td>
+                       </tr>");
+               }
+               $wgOut->addHTML("
+               <tr id=\"wpBlockReason\">
+                       <td align=\"$alignRight\">{$mIpbreason}</td>
+                       <td>
+                               " . Xml::input( 'wpBlockReason', 45, $this->BlockReason,
+                                       array( 'tabindex' => '5', 'id' => 'mw-bi-reason',
+                                              'maxlength'=> '200' ) ) . "
                        </td>
                </tr>
-               <tr>
+               <tr id='wpAnonOnlyRow'>
                        <td>&nbsp;</td>
-                       <td align=\"left\">
-                               " . wfCheckLabel( wfMsg( 'ipbanononly' ),
+                       <td>
+                               " . wfCheckLabel( wfMsgHtml( 'ipbanononly' ),
                                        'wpAnonOnly', 'wpAnonOnly', $this->BlockAnonOnly,
-                                       array( 'tabindex' => 4 ) ) . "
+                                       array( 'tabindex' => '6' ) ) . "
                        </td>
                </tr>
-               <tr>
+               <tr id='wpCreateAccountRow'>
                        <td>&nbsp;</td>
-                       <td align=\"left\">
-                               " . wfCheckLabel( wfMsg( 'ipbcreateaccount' ),
+                       <td>
+                               " . wfCheckLabel( wfMsgHtml( 'ipbcreateaccount' ),
                                        'wpCreateAccount', 'wpCreateAccount', $this->BlockCreateAccount,
-                                       array( 'tabindex' => 5 ) ) . "
+                                       array( 'tabindex' => '7' ) ) . "
+                       </td>
+               </tr>
+               <tr id='wpEnableAutoblockRow'>
+                       <td>&nbsp;</td>
+                       <td>
+                               " . wfCheckLabel( wfMsgHtml( 'ipbenableautoblock' ),
+                                               'wpEnableAutoblock', 'wpEnableAutoblock', $this->BlockEnableAutoblock,
+                                                       array( 'tabindex' => '8' ) ) . "
                        </td>
                </tr>
-                <tr>
-                        <td>&nbsp;</td>
-                        <td align=\"left\">
-                                " . wfCheckLabel( wfMsg( 'ipbenableautoblock' ),
-                                        'wpEnableAutoblock', 'wpEnableAutoblock', $this->BlockEnableAutoblock,
-                                        array( 'tabindex' => 6 ) ) . "
-                        </td>
-                </tr>
+               ");
+               // Allow some users to hide name from block log, blocklist and listusers
+               if ( $wgUser->isAllowed( 'hideuser' ) ) {
+                       $wgOut->addHTML("
+                       <tr>
+                       <td>&nbsp;</td>
+                               <td>
+                                       " . wfCheckLabel( wfMsgHtml( 'ipbhidename' ),
+                                                       'wpHideName', 'wpHideName', $this->BlockHideName,
+                                                               array( 'tabindex' => '9' ) ) . "
+                               </td>
+                       </tr>
+                       ");
+               }
+
+               global $wgSysopEmailBans;
+
+               if ( $wgSysopEmailBans && $wgUser->isAllowed( 'blockemail' ) ) {
+                       $wgOut->addHTML("
+                       <tr id='wpEnableEmailBan'>
+                       <td>&nbsp;</td>
+                               <td>
+                                       " . wfCheckLabel( wfMsgHtml( 'ipbemailban' ),
+                                                       'wpEmailBan', 'wpEmailBan', $this->BlockEmail,
+                                                               array( 'tabindex' => '10' )) . "
+                               </td>
+                       </tr>
+                       ");
+               }
+               $wgOut->addHTML("
                <tr>
                        <td style='padding-top: 1em'>&nbsp;</td>
-                       <td style='padding-top: 1em' align=\"left\">
-                               <input tabindex='7' type='submit' name=\"wpBlock\" value=\"{$mIpbsubmit}\" />
+                       <td style='padding-top: 1em'>
+                               " . Xml::submitButton( wfMsg( 'ipbsubmit' ),
+                                                       array( 'name' => 'wpBlock', 'tabindex' => '11' ) ) . "
                        </td>
                </tr>
-       </table>
-       <input type='hidden' name='wpEditToken' value=\"{$token}\" />
-</form>\n" );
+       </table>" .
+       Xml::hidden( 'wpEditToken', $token ) .
+"</form>
+<script type=\"text/javascript\">updateBlockOptions()</script>
+\n" );
 
                $wgOut->addHtml( $this->getConvenienceLinks() );
 
@@ -177,23 +276,42 @@ class IPBlockForm {
                        $this->showLogFragment( $wgOut, $user->getUserPage() );
                } elseif( preg_match( '/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/', $this->BlockAddress ) ) {
                        $this->showLogFragment( $wgOut, Title::makeTitle( NS_USER, $this->BlockAddress ) );
+               } elseif( preg_match( '/^\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}/', $this->BlockAddress ) ) {
+                       $this->showLogFragment( $wgOut, Title::makeTitle( NS_USER, $this->BlockAddress ) );
                }
-       
        }
 
        function doSubmit() {
                global $wgOut, $wgUser, $wgSysopUserBans, $wgSysopRangeBans;
 
                $userId = 0;
-               $this->BlockAddress = trim( $this->BlockAddress );
-               $rxIP = '\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}';
-
+               # Expand valid IPv6 addresses, usernames are left as is
+               $this->BlockAddress = IP::sanitizeIP( $this->BlockAddress );
+               # isIPv4() and IPv6() are used for final validation
+               $rxIP4 = '\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}';
+               $rxIP6 = '\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}:\w{1,4}';
+               $rxIP = "($rxIP4|$rxIP6)";
+               
                # Check for invalid specifications
-               if ( ! preg_match( "/^$rxIP$/", $this->BlockAddress ) ) {
+               if ( !preg_match( "/^$rxIP$/", $this->BlockAddress ) ) {
                        $matches = array();
-                       if ( preg_match( "/^($rxIP)\\/(\\d{1,2})$/", $this->BlockAddress, $matches ) ) {
+                       if ( preg_match( "/^($rxIP4)\\/(\\d{1,2})$/", $this->BlockAddress, $matches ) ) {
+                               # IPv4
+                               if ( $wgSysopRangeBans ) {
+                                       if ( !IP::isIPv4( $this->BlockAddress ) || $matches[2] < 16 || $matches[2] > 32 ) {
+                                               $this->showForm( wfMsg( 'ip_range_invalid' ) );
+                                               return;
+                                       }
+                                       $this->BlockAddress = Block::normaliseRange( $this->BlockAddress );
+                               } else {
+                                       # Range block illegal
+                                       $this->showForm( wfMsg( 'range_block_disabled' ) );
+                                       return;
+                               }
+                       } else if ( preg_match( "/^($rxIP6)\\/(\\d{1,3})$/", $this->BlockAddress, $matches ) ) {
+                               # IPv6
                                if ( $wgSysopRangeBans ) {
-                                       if ( $matches[2] > 31 || $matches[2] < 16 ) {
+                                       if ( !IP::isIPv6( $this->BlockAddress ) || $matches[2] < 64 || $matches[2] > 128 ) {
                                                $this->showForm( wfMsg( 'ip_range_invalid' ) );
                                                return;
                                        }
@@ -222,6 +340,14 @@ class IPBlockForm {
                        }
                }
 
+               $reasonstr = $this->BlockReasonList;
+               if ( $reasonstr != 'other' && $this->BlockReason != '') {
+                       // Entry from drop down menu + additional comment
+                       $reasonstr .= ': ' . $this->BlockReason;
+               } elseif ( $reasonstr == 'other' ) {
+                       $reasonstr = $this->BlockReason;
+               }
+
                $expirestr = $this->BlockExpiry;
                if( $expirestr == 'other' )
                        $expirestr = $this->BlockOther;
@@ -247,15 +373,15 @@ class IPBlockForm {
 
                # Create block
                # Note: for a user block, ipb_address is only for display purposes
-
                $block = new Block( $this->BlockAddress, $userId, $wgUser->getID(),
-                       $this->BlockReason, wfTimestampNow(), 0, $expiry, $this->BlockAnonOnly, 
-                       $this->BlockCreateAccount, $this->BlockEnableAutoblock );
+                       $reasonstr, wfTimestampNow(), 0, $expiry, $this->BlockAnonOnly,
+                       $this->BlockCreateAccount, $this->BlockEnableAutoblock, $this->BlockHideName,
+                       $this->BlockEmail);
 
                if (wfRunHooks('BlockIp', array(&$block, &$wgUser))) {
 
                        if ( !$block->insert() ) {
-                               $this->showForm( wfMsg( 'ipb_already_blocked', 
+                               $this->showForm( wfMsg( 'ipb_already_blocked',
                                        htmlspecialchars( $this->BlockAddress ) ) );
                                return;
                        }
@@ -267,10 +393,11 @@ class IPBlockForm {
                        $logParams[] = $expirestr;
                        $logParams[] = $this->blockLogFlags();
 
-                       # Make log entry
-                       $log = new LogPage( 'block' );
+                       # Make log entry, if the name is hidden, put it in the oversight log
+                       $log_type = ($this->BlockHideName) ? 'oversight' : 'block';
+                       $log = new LogPage( $log_type );
                        $log->addEntry( 'block', Title::makeTitle( NS_USER, $this->BlockAddress ),
-                         $this->BlockReason, $logParams );
+                         $reasonstr, $logParams );
 
                        # Report to the user
                        $titleObj = SpecialPage::getTitleFor( 'Blockip' );
@@ -287,7 +414,7 @@ class IPBlockForm {
                $text = wfMsg( 'blockipsuccesstext', $this->BlockAddress );
                $wgOut->addWikiText( $text );
        }
-       
+
        function showLogFragment( $out, $title ) {
                $out->addHtml( wfElement( 'h2', NULL, LogPage::logName( 'block' ) ) );
                $request = new FauxRequest( array( 'page' => $title->getPrefixedText(), 'type' => 'block' ) );
@@ -303,15 +430,18 @@ class IPBlockForm {
         */
        private function blockLogFlags() {
                $flags = array();
-               if( $this->BlockAnonOnly )
+               if( $this->BlockAnonOnly && IP::isIPAddress( $this->BlockAddress ) )
+                                       // when blocking a user the option 'anononly' is not available/has no effect -> do not write this into log
                        $flags[] = 'anononly';
                if( $this->BlockCreateAccount )
                        $flags[] = 'nocreate';
-               if( $this->BlockEnableAutoblock )
-                       $flags[] = 'autoblock';
+               if( !$this->BlockEnableAutoblock )
+                       $flags[] = 'noautoblock';
+               if ( $this->BlockEmail )
+                       $flags[] = 'noemail';
                return implode( ',', $flags );
        }
-       
+
        /**
         * Builds unblock and block list links
         *
@@ -320,11 +450,12 @@ class IPBlockForm {
        private function getConvenienceLinks() {
                global $wgUser;
                $skin = $wgUser->getSkin();
+               $links[] = $skin->makeLink ( 'MediaWiki:ipbreason-dropdown', wfMsgHtml( 'ipb-edit-dropdown' ) );
                $links[] = $this->getUnblockLink( $skin );
                $links[] = $this->getBlockListLink( $skin );
                return '<p class="mw-ipb-conveniencelinks">' . implode( ' | ', $links ) . '</p>';
        }
-       
+
        /**
         * Build a convenient link to unblock the given username or IP
         * address, if available; otherwise link to a blank unblock
@@ -336,14 +467,14 @@ class IPBlockForm {
        private function getUnblockLink( $skin ) {
                $list = SpecialPage::getTitleFor( 'Ipblocklist' );
                if( $this->BlockAddress ) {
-                       $addr = htmlspecialchars( $this->BlockAddress );
+                       $addr = htmlspecialchars( strtr( $this->BlockAddress, '_', ' ' ) );
                        return $skin->makeKnownLinkObj( $list, wfMsgHtml( 'ipb-unblock-addr', $addr ),
-                               'action=unblock&ip=' . $this->BlockAddress );
+                               'action=unblock&ip=' . urlencode( $this->BlockAddress ) );
                } else {
                        return $skin->makeKnownLinkObj( $list, wfMsgHtml( 'ipb-unblock' ),      'action=unblock' );
                }
        }
-       
+
        /**
         * Build a convenience link to the block list
         *
@@ -353,14 +484,12 @@ class IPBlockForm {
        private function getBlockListLink( $skin ) {
                $list = SpecialPage::getTitleFor( 'Ipblocklist' );
                if( $this->BlockAddress ) {
-                       $addr = htmlspecialchars( $this->BlockAddress );
+                       $addr = htmlspecialchars( strtr( $this->BlockAddress, '_', ' ' ) );
                        return $skin->makeKnownLinkObj( $list, wfMsgHtml( 'ipb-blocklist-addr', $addr ),
-                               'ip=' . $this->BlockAddress );
+                               'ip=' . urlencode( $this->BlockAddress ) );
                } else {
                        return $skin->makeKnownLinkObj( $list, wfMsgHtml( 'ipb-blocklist' ) );
                }
        }
-       
 }
 
-?>