And while I'm at it: removed unused global declarations of $wgFeedClasses
[lhc/web/wiklou.git] / includes / specials / SpecialBlockip.php
1 <?php
2 /**
3 * Constructor for Special:Blockip page
4 *
5 * @file
6 * @ingroup SpecialPage
7 */
8
9 /**
10 * Constructor
11 */
12 function wfSpecialBlockip( $par ) {
13 global $wgUser, $wgOut, $wgRequest;
14
15 # Can't block when the database is locked
16 if( wfReadOnly() ) {
17 $wgOut->readOnlyPage();
18 return;
19 }
20 # Permission check
21 if( !$wgUser->isAllowed( 'block' ) ) {
22 $wgOut->permissionRequired( 'block' );
23 return;
24 }
25
26 $ipb = new IPBlockForm( $par );
27
28 $action = $wgRequest->getVal( 'action' );
29 if( 'success' == $action ) {
30 $ipb->showSuccess();
31 } elseif( $wgRequest->wasPosted() && 'submit' == $action &&
32 $wgUser->matchEditToken( $wgRequest->getVal( 'wpEditToken' ) ) ) {
33 $ipb->doSubmit();
34 } else {
35 $ipb->showForm( '' );
36 }
37 }
38
39 /**
40 * Form object for the Special:Blockip page.
41 *
42 * @ingroup SpecialPage
43 */
44 class IPBlockForm {
45 var $BlockAddress, $BlockExpiry, $BlockReason;
46 // The maximum number of edits a user can have and still be hidden
47 const HIDEUSER_CONTRIBLIMIT = 1000;
48
49 public function __construct( $par ) {
50 global $wgRequest, $wgUser, $wgBlockAllowsUTEdit;
51
52 $this->BlockAddress = $wgRequest->getVal( 'wpBlockAddress', $wgRequest->getVal( 'ip', $par ) );
53 $this->BlockAddress = strtr( $this->BlockAddress, '_', ' ' );
54 $this->BlockReason = $wgRequest->getText( 'wpBlockReason' );
55 $this->BlockReasonList = $wgRequest->getText( 'wpBlockReasonList' );
56 $this->BlockExpiry = $wgRequest->getVal( 'wpBlockExpiry', wfMsg( 'ipbotheroption' ) );
57 $this->BlockOther = $wgRequest->getVal( 'wpBlockOther', '' );
58
59 # Unchecked checkboxes are not included in the form data at all, so having one
60 # that is true by default is a bit tricky
61 $byDefault = !$wgRequest->wasPosted();
62 $this->BlockAnonOnly = $wgRequest->getBool( 'wpAnonOnly', $byDefault );
63 $this->BlockCreateAccount = $wgRequest->getBool( 'wpCreateAccount', $byDefault );
64 $this->BlockEnableAutoblock = $wgRequest->getBool( 'wpEnableAutoblock', $byDefault );
65 $this->BlockEmail = false;
66 if( self::canBlockEmail( $wgUser ) ) {
67 $this->BlockEmail = $wgRequest->getBool( 'wpEmailBan', false );
68 }
69 $this->BlockWatchUser = $wgRequest->getBool( 'wpWatchUser', false ) && $wgUser->isLoggedIn();
70 # Re-check user's rights to hide names, very serious, defaults to null
71 if( $wgUser->isAllowed( 'hideuser' ) ) {
72 $this->BlockHideName = $wgRequest->getBool( 'wpHideName', null );
73 } else {
74 $this->BlockHideName = false;
75 }
76 $this->BlockAllowUsertalk = ( $wgRequest->getBool( 'wpAllowUsertalk', $byDefault ) && $wgBlockAllowsUTEdit );
77 $this->BlockReblock = $wgRequest->getBool( 'wpChangeBlock', false );
78
79 $this->wasPosted = $wgRequest->wasPosted();
80 }
81
82 public function showForm( $err ) {
83 global $wgOut, $wgUser, $wgSysopUserBans;
84
85 $wgOut->setPageTitle( wfMsg( 'blockip-title' ) );
86 $wgOut->addWikiMsg( 'blockiptext' );
87
88 if( $wgSysopUserBans ) {
89 $mIpaddress = Xml::label( wfMsg( 'ipadressorusername' ), 'mw-bi-target' );
90 } else {
91 $mIpaddress = Xml::label( wfMsg( 'ipaddress' ), 'mw-bi-target' );
92 }
93 $mIpbexpiry = Xml::label( wfMsg( 'ipbexpiry' ), 'wpBlockExpiry' );
94 $mIpbother = Xml::label( wfMsg( 'ipbother' ), 'mw-bi-other' );
95 $mIpbreasonother = Xml::label( wfMsg( 'ipbreason' ), 'wpBlockReasonList' );
96 $mIpbreason = Xml::label( wfMsg( 'ipbotherreason' ), 'mw-bi-reason' );
97
98 $titleObj = SpecialPage::getTitleFor( 'Blockip' );
99 $user = User::newFromName( $this->BlockAddress );
100
101 $alreadyBlocked = false;
102 $otherBlockedMsgs = array();
103 if( $err && $err[0] != 'ipb_already_blocked' ) {
104 $key = array_shift( $err );
105 $msg = wfMsgReal( $key, $err );
106 $wgOut->setSubtitle( wfMsgHtml( 'formerror' ) );
107 $wgOut->addHTML( Xml::tags( 'p', array( 'class' => 'error' ), $msg ) );
108 } elseif( $this->BlockAddress ) {
109 # Get other blocks, i.e. from GlobalBlocking or TorBlock extension
110 wfRunHooks( 'OtherBlockLogLink', array( &$otherBlockedMsgs, $this->BlockAddress ) );
111
112 $userId = is_object( $user ) ? $user->getId() : 0;
113 $currentBlock = Block::newFromDB( $this->BlockAddress, $userId );
114 if( !is_null( $currentBlock ) && !$currentBlock->mAuto && # The block exists and isn't an autoblock
115 ( $currentBlock->mRangeStart == $currentBlock->mRangeEnd || # The block isn't a rangeblock
116 # or if it is, the range is what we're about to block
117 ( $currentBlock->mAddress == $this->BlockAddress ) )
118 ) {
119 $alreadyBlocked = true;
120 # Set the block form settings to the existing block
121 if( !$this->wasPosted ) {
122 $this->BlockAnonOnly = $currentBlock->mAnonOnly;
123 $this->BlockCreateAccount = $currentBlock->mCreateAccount;
124 $this->BlockEnableAutoblock = $currentBlock->mEnableAutoblock;
125 $this->BlockEmail = $currentBlock->mBlockEmail;
126 $this->BlockHideName = $currentBlock->mHideName;
127 $this->BlockAllowUsertalk = $currentBlock->mAllowUsertalk;
128 if( $currentBlock->mExpiry == 'infinity' ) {
129 $this->BlockOther = 'indefinite';
130 } else {
131 $this->BlockOther = wfTimestamp( TS_ISO_8601, $currentBlock->mExpiry );
132 }
133 $this->BlockReason = $currentBlock->mReason;
134 }
135 }
136 }
137
138 # Show other blocks from extensions, i.e. GlockBlocking and TorBlock
139 if( count( $otherBlockedMsgs ) ) {
140 $wgOut->addHTML(
141 Html::rawElement( 'h2', array(), wfMsgExt( 'ipb-otherblocks-header', 'parseinline', count( $otherBlockedMsgs ) ) ) . "\n"
142 );
143 $list = '';
144 foreach( $otherBlockedMsgs as $link ) {
145 $list .= Html::rawElement( 'li', array(), $link ) . "\n";
146 }
147 $wgOut->addHTML( Html::rawElement( 'ul', array( 'class' => 'mw-blockip-alreadyblocked' ), $list ) . "\n" );
148 }
149
150 # Username/IP is blocked already locally
151 if( $alreadyBlocked ) {
152 $wgOut->addWikiMsg( 'ipb-needreblock', $this->BlockAddress );
153 }
154
155 $scBlockExpiryOptions = wfMsgForContent( 'ipboptions' );
156
157 $showblockoptions = $scBlockExpiryOptions != '-';
158 if( !$showblockoptions ) $mIpbother = $mIpbexpiry;
159
160 $blockExpiryFormOptions = Xml::option( wfMsg( 'ipbotheroption' ), 'other' );
161 foreach( explode( ',', $scBlockExpiryOptions ) as $option ) {
162 if( strpos( $option, ':' ) === false ) $option = "$option:$option";
163 list( $show, $value ) = explode( ':', $option );
164 $show = htmlspecialchars( $show );
165 $value = htmlspecialchars( $value );
166 $blockExpiryFormOptions .= Xml::option( $show, $value, $this->BlockExpiry === $value ? true : false ) . "\n";
167 }
168
169 $reasonDropDown = Xml::listDropDown( 'wpBlockReasonList',
170 wfMsgForContent( 'ipbreason-dropdown' ),
171 wfMsgForContent( 'ipbreasonotherlist' ), $this->BlockReasonList, 'wpBlockDropDown', 4 );
172
173 global $wgStylePath, $wgStyleVersion;
174 $wgOut->addHTML(
175 Xml::tags( 'script', array( 'type' => 'text/javascript', 'src' => "$wgStylePath/common/block.js?$wgStyleVersion" ), '' ) .
176 Xml::openElement( 'form', array( 'method' => 'post', 'action' => $titleObj->getLocalURL( 'action=submit' ), 'id' => 'blockip' ) ) .
177 Xml::openElement( 'fieldset' ) .
178 Xml::element( 'legend', null, wfMsg( 'blockip-legend' ) ) .
179 Xml::openElement( 'table', array( 'border' => '0', 'id' => 'mw-blockip-table' ) ) .
180 "<tr>
181 <td class='mw-label'>
182 {$mIpaddress}
183 </td>
184 <td class='mw-input'>" .
185 Html::input( 'wpBlockAddress', $this->BlockAddress, 'text', array(
186 'tabindex' => '1',
187 'id' => 'mw-bi-target',
188 'onchange' => 'updateBlockOptions()',
189 'size' => '45',
190 'required' => ''
191 ) + ( $this->BlockAddress ? array() : array( 'autofocus' ) ) ). "
192 </td>
193 </tr>
194 <tr>"
195 );
196 if( $showblockoptions ) {
197 $wgOut->addHTML("
198 <td class='mw-label'>
199 {$mIpbexpiry}
200 </td>
201 <td class='mw-input'>" .
202 Xml::tags( 'select',
203 array(
204 'id' => 'wpBlockExpiry',
205 'name' => 'wpBlockExpiry',
206 'onchange' => 'considerChangingExpiryFocus()',
207 'tabindex' => '2' ),
208 $blockExpiryFormOptions ) .
209 "</td>"
210 );
211 }
212 $wgOut->addHTML("
213 </tr>
214 <tr id='wpBlockOther'>
215 <td class='mw-label'>
216 {$mIpbother}
217 </td>
218 <td class='mw-input'>" .
219 Xml::input( 'wpBlockOther', 45, $this->BlockOther,
220 array( 'tabindex' => '3', 'id' => 'mw-bi-other' ) ) . "
221 </td>
222 </tr>
223 <tr>
224 <td class='mw-label'>
225 {$mIpbreasonother}
226 </td>
227 <td class='mw-input'>
228 {$reasonDropDown}
229 </td>
230 </tr>
231 <tr id=\"wpBlockReason\">
232 <td class='mw-label'>
233 {$mIpbreason}
234 </td>
235 <td class='mw-input'>" .
236 Html::input( 'wpBlockReason', $this->BlockReason, 'text', array(
237 'tabindex' => '5',
238 'id' => 'mw-bi-reason',
239 'maxlength' => '200',
240 'size' => '45'
241 ) + ( $this->BlockAddress ? array( 'autofocus' ) : array() ) ) . "
242 </td>
243 </tr>
244 <tr id='wpAnonOnlyRow'>
245 <td>&nbsp;</td>
246 <td class='mw-input'>" .
247 Xml::checkLabel( wfMsg( 'ipbanononly' ),
248 'wpAnonOnly', 'wpAnonOnly', $this->BlockAnonOnly,
249 array( 'tabindex' => '6' ) ) . "
250 </td>
251 </tr>
252 <tr id='wpCreateAccountRow'>
253 <td>&nbsp;</td>
254 <td class='mw-input'>" .
255 Xml::checkLabel( wfMsg( 'ipbcreateaccount' ),
256 'wpCreateAccount', 'wpCreateAccount', $this->BlockCreateAccount,
257 array( 'tabindex' => '7' ) ) . "
258 </td>
259 </tr>
260 <tr id='wpEnableAutoblockRow'>
261 <td>&nbsp;</td>
262 <td class='mw-input'>" .
263 Xml::checkLabel( wfMsg( 'ipbenableautoblock' ),
264 'wpEnableAutoblock', 'wpEnableAutoblock', $this->BlockEnableAutoblock,
265 array( 'tabindex' => '8' ) ) . "
266 </td>
267 </tr>"
268 );
269
270 if( self::canBlockEmail( $wgUser ) ) {
271 $wgOut->addHTML("
272 <tr id='wpEnableEmailBan'>
273 <td>&nbsp;</td>
274 <td class='mw-input'>" .
275 Xml::checkLabel( wfMsg( 'ipbemailban' ),
276 'wpEmailBan', 'wpEmailBan', $this->BlockEmail,
277 array( 'tabindex' => '9' ) ) . "
278 </td>
279 </tr>"
280 );
281 }
282
283 // Allow some users to hide name from block log, blocklist and listusers
284 if( $wgUser->isAllowed( 'hideuser' ) ) {
285 $wgOut->addHTML("
286 <tr id='wpEnableHideUser'>
287 <td>&nbsp;</td>
288 <td class='mw-input'><strong>" .
289 Xml::checkLabel( wfMsg( 'ipbhidename' ),
290 'wpHideName', 'wpHideName', $this->BlockHideName,
291 array( 'tabindex' => '10' )
292 ) . "
293 </strong></td>
294 </tr>"
295 );
296 }
297
298 # Watchlist their user page? (Only if user is logged in)
299 if( $wgUser->isLoggedIn() ) {
300 $wgOut->addHTML("
301 <tr id='wpEnableWatchUser'>
302 <td>&nbsp;</td>
303 <td class='mw-input'>" .
304 Xml::checkLabel( wfMsg( 'ipbwatchuser' ),
305 'wpWatchUser', 'wpWatchUser', $this->BlockWatchUser,
306 array( 'tabindex' => '11' ) ) . "
307 </td>
308 </tr>"
309 );
310 }
311
312 # Can we explicitly disallow the use of user_talk?
313 global $wgBlockAllowsUTEdit;
314 if( $wgBlockAllowsUTEdit ){
315 $wgOut->addHTML("
316 <tr id='wpAllowUsertalkRow'>
317 <td>&nbsp;</td>
318 <td class='mw-input'>" .
319 Xml::checkLabel( wfMsg( 'ipballowusertalk' ),
320 'wpAllowUsertalk', 'wpAllowUsertalk', $this->BlockAllowUsertalk,
321 array( 'tabindex' => '12' ) ) . "
322 </td>
323 </tr>"
324 );
325 }
326
327 $wgOut->addHTML("
328 <tr>
329 <td style='padding-top: 1em'>&nbsp;</td>
330 <td class='mw-submit' style='padding-top: 1em'>" .
331 Xml::submitButton( wfMsg( $alreadyBlocked ? 'ipb-change-block' : 'ipbsubmit' ),
332 array( 'name' => 'wpBlock', 'tabindex' => '13', 'accesskey' => 's' ) ) . "
333 </td>
334 </tr>" .
335 Xml::closeElement( 'table' ) .
336 Xml::hidden( 'wpEditToken', $wgUser->editToken() ) .
337 ( $alreadyBlocked ? Xml::hidden( 'wpChangeBlock', 1 ) : "" ) .
338 Xml::closeElement( 'fieldset' ) .
339 Xml::closeElement( 'form' ) .
340 Xml::tags( 'script', array( 'type' => 'text/javascript' ), 'updateBlockOptions()' ) . "\n"
341 );
342
343 $wgOut->addHTML( $this->getConvenienceLinks() );
344
345 if( is_object( $user ) ) {
346 $this->showLogFragment( $wgOut, $user->getUserPage() );
347 } elseif( preg_match( '/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/', $this->BlockAddress ) ) {
348 $this->showLogFragment( $wgOut, Title::makeTitle( NS_USER, $this->BlockAddress ) );
349 } 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 ) ) {
350 $this->showLogFragment( $wgOut, Title::makeTitle( NS_USER, $this->BlockAddress ) );
351 }
352 }
353
354 /**
355 * Can we do an email block?
356 * @param User $user The sysop wanting to make a block
357 * @return boolean
358 */
359 public static function canBlockEmail( $user ) {
360 global $wgEnableUserEmail, $wgSysopEmailBans;
361 return ( $wgEnableUserEmail && $wgSysopEmailBans && $user->isAllowed( 'blockemail' ) );
362 }
363
364 /**
365 * Backend block code.
366 * $userID and $expiry will be filled accordingly
367 * @return array(message key, arguments) on failure, empty array on success
368 */
369 function doBlock( &$userId = null, &$expiry = null ) {
370 global $wgUser, $wgSysopUserBans, $wgSysopRangeBans, $wgBlockAllowsUTEdit, $wgBlockCIDRLimit;
371
372 $userId = 0;
373 # Expand valid IPv6 addresses, usernames are left as is
374 $this->BlockAddress = IP::sanitizeIP( $this->BlockAddress );
375 # isIPv4() and IPv6() are used for final validation
376 $rxIP4 = '\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}';
377 $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}';
378 $rxIP = "($rxIP4|$rxIP6)";
379
380 # Check for invalid specifications
381 if( !preg_match( "/^$rxIP$/", $this->BlockAddress ) ) {
382 $matches = array();
383 if( preg_match( "/^($rxIP4)\\/(\\d{1,2})$/", $this->BlockAddress, $matches ) ) {
384 # IPv4
385 if( $wgSysopRangeBans ) {
386 if( !IP::isIPv4( $this->BlockAddress ) || $matches[2] > 32 ) {
387 return array( 'ip_range_invalid' );
388 } elseif ( $matches[2] < $wgBlockCIDRLimit['IPv4'] ) {
389 return array( 'ip_range_toolarge', $wgBlockCIDRLimit['IPv4'] );
390 }
391 $this->BlockAddress = Block::normaliseRange( $this->BlockAddress );
392 } else {
393 # Range block illegal
394 return array( 'range_block_disabled' );
395 }
396 } elseif( preg_match( "/^($rxIP6)\\/(\\d{1,3})$/", $this->BlockAddress, $matches ) ) {
397 # IPv6
398 if( $wgSysopRangeBans ) {
399 if( !IP::isIPv6( $this->BlockAddress ) || $matches[2] > 128 ) {
400 return array( 'ip_range_invalid' );
401 } elseif( $matches[2] < $wgBlockCIDRLimit['IPv6'] ) {
402 return array( 'ip_range_toolarge', $wgBlockCIDRLimit['IPv6'] );
403 }
404 $this->BlockAddress = Block::normaliseRange( $this->BlockAddress );
405 } else {
406 # Range block illegal
407 return array('range_block_disabled');
408 }
409 } else {
410 # Username block
411 if( $wgSysopUserBans ) {
412 $user = User::newFromName( $this->BlockAddress );
413 if( !is_null( $user ) && $user->getId() ) {
414 # Use canonical name
415 $userId = $user->getId();
416 $this->BlockAddress = $user->getName();
417 } else {
418 return array( 'nosuchusershort', htmlspecialchars( $user ? $user->getName() : $this->BlockAddress ) );
419 }
420 } else {
421 return array( 'badipaddress' );
422 }
423 }
424 }
425
426 if( $wgUser->isBlocked() && ( $wgUser->getId() !== $userId ) ) {
427 return array( 'cant-block-while-blocked' );
428 }
429
430 $reasonstr = $this->BlockReasonList;
431 if( $reasonstr != 'other' && $this->BlockReason != '' ) {
432 // Entry from drop down menu + additional comment
433 $reasonstr .= wfMsgForContent( 'colon-separator' ) . $this->BlockReason;
434 } elseif( $reasonstr == 'other' ) {
435 $reasonstr = $this->BlockReason;
436 }
437
438 $expirestr = $this->BlockExpiry;
439 if( $expirestr == 'other' )
440 $expirestr = $this->BlockOther;
441
442 if( ( strlen( $expirestr ) == 0) || ( strlen( $expirestr ) > 50 ) ) {
443 return array( 'ipb_expiry_invalid' );
444 }
445
446 if( false === ( $expiry = Block::parseExpiryInput( $expirestr ) ) ) {
447 // Bad expiry.
448 return array( 'ipb_expiry_invalid' );
449 }
450
451 if( $this->BlockHideName ) {
452 // Recheck params here...
453 if( !$userId || !$wgUser->isAllowed('hideuser') ) {
454 $this->BlockHideName = false; // IP users should not be hidden
455 } elseif( $expiry !== 'infinity' ) {
456 // Bad expiry.
457 return array( 'ipb_expiry_temp' );
458 } elseif( User::edits( $userId ) > self::HIDEUSER_CONTRIBLIMIT ) {
459 // Typically, the user should have a handful of edits.
460 // Disallow hiding users with many edits for performance.
461 return array( 'ipb_hide_invalid' );
462 }
463 }
464
465 # Create block object
466 # Note: for a user block, ipb_address is only for display purposes
467 $block = new Block( $this->BlockAddress, $userId, $wgUser->getId(),
468 $reasonstr, wfTimestampNow(), 0, $expiry, $this->BlockAnonOnly,
469 $this->BlockCreateAccount, $this->BlockEnableAutoblock, $this->BlockHideName,
470 $this->BlockEmail,
471 isset( $this->BlockAllowUsertalk ) ? $this->BlockAllowUsertalk : $wgBlockAllowsUTEdit
472 );
473
474 # Should this be privately logged?
475 $suppressLog = (bool)$this->BlockHideName;
476 if( wfRunHooks( 'BlockIp', array( &$block, &$wgUser ) ) ) {
477 # Try to insert block. Is there a conflicting block?
478 if( !$block->insert() ) {
479 # Show form unless the user is already aware of this...
480 if( !$this->BlockReblock ) {
481 return array( 'ipb_already_blocked' );
482 # Otherwise, try to update the block...
483 } else {
484 # This returns direct blocks before autoblocks/rangeblocks, since we should
485 # be sure the user is blocked by now it should work for our purposes
486 $currentBlock = Block::newFromDB( $this->BlockAddress, $userId );
487 if( $block->equals( $currentBlock ) ) {
488 return array( 'ipb_already_blocked' );
489 }
490 # If the name was hidden and the blocking user cannot hide
491 # names, then don't allow any block changes...
492 if( $currentBlock->mHideName && !$wgUser->isAllowed( 'hideuser' ) ) {
493 return array( 'cant-see-hidden-user' );
494 }
495 $currentBlock->delete();
496 $block->insert();
497 # If hiding/unhiding a name, this should go in the private logs
498 $suppressLog = $suppressLog || (bool)$currentBlock->mHideName;
499 $log_action = 'reblock';
500 # Unset _deleted fields if requested
501 if( $currentBlock->mHideName && !$this->BlockHideName ) {
502 self::unsuppressUserName( $this->BlockAddress, $userId );
503 }
504 }
505 } else {
506 $log_action = 'block';
507 }
508 wfRunHooks( 'BlockIpComplete', array( $block, $wgUser ) );
509
510 # Set *_deleted fields if requested
511 if( $this->BlockHideName ) {
512 self::suppressUserName( $this->BlockAddress, $userId );
513 }
514
515 # Only show watch link when this is no range block
516 if( $this->BlockWatchUser && $block->mRangeStart == $block->mRangeEnd ) {
517 $wgUser->addWatch( Title::makeTitle( NS_USER, $this->BlockAddress ) );
518 }
519
520 # Block constructor sanitizes certain block options on insert
521 $this->BlockEmail = $block->mBlockEmail;
522 $this->BlockEnableAutoblock = $block->mEnableAutoblock;
523
524 # Prepare log parameters
525 $logParams = array();
526 $logParams[] = $expirestr;
527 $logParams[] = $this->blockLogFlags();
528
529 # Make log entry, if the name is hidden, put it in the oversight log
530 $log_type = $suppressLog ? 'suppress' : 'block';
531 $log = new LogPage( $log_type );
532 $log->addEntry( $log_action, Title::makeTitle( NS_USER, $this->BlockAddress ),
533 $reasonstr, $logParams );
534
535 # Report to the user
536 return array();
537 } else {
538 return array( 'hookaborted' );
539 }
540 }
541
542 public static function suppressUserName( $name, $userId ) {
543 $op = '|'; // bitwise OR
544 return self::setUsernameBitfields( $name, $userId, $op );
545 }
546
547 public static function unsuppressUserName( $name, $userId ) {
548 $op = '&'; // bitwise AND
549 return self::setUsernameBitfields( $name, $userId, $op );
550 }
551
552 private static function setUsernameBitfields( $name, $userId, $op ) {
553 if( $op !== '|' && $op !== '&' ) return false; // sanity check
554 $dbw = wfGetDB( DB_MASTER );
555 $delUser = Revision::DELETED_USER | Revision::DELETED_RESTRICTED;
556 $delAction = LogPage::DELETED_ACTION | Revision::DELETED_RESTRICTED;
557 # Normalize user name
558 $userTitle = Title::makeTitleSafe( NS_USER, $name );
559 $userDbKey = $userTitle->getDBkey();
560 # To suppress, we OR the current bitfields with Revision::DELETED_USER
561 # to put a 1 in the username *_deleted bit. To unsuppress we AND the
562 # current bitfields with the inverse of Revision::DELETED_USER. The
563 # username bit is made to 0 (x & 0 = 0), while others are unchanged (x & 1 = x).
564 # The same goes for the sysop-restricted *_deleted bit.
565 if( $op == '&' ) {
566 $delUser = "~{$delUser}";
567 $delAction = "~{$delAction}";
568 }
569 # Hide name from live edits
570 $dbw->update( 'revision', array( "rev_deleted = rev_deleted $op $delUser" ),
571 array( 'rev_user' => $userId ), __METHOD__ );
572 # Hide name from deleted edits
573 $dbw->update( 'archive', array( "ar_deleted = ar_deleted $op $delUser" ),
574 array( 'ar_user_text' => $name ), __METHOD__ );
575 # Hide name from logs
576 $dbw->update( 'logging', array( "log_deleted = log_deleted $op $delUser" ),
577 array( 'log_user' => $userId, "log_type != 'suppress'" ), __METHOD__ );
578 $dbw->update( 'logging', array( "log_deleted = log_deleted $op $delAction" ),
579 array( 'log_namespace' => NS_USER, 'log_title' => $userDbKey,
580 "log_type != 'suppress'" ), __METHOD__ );
581 # Hide name from RC
582 $dbw->update( 'recentchanges', array( "rc_deleted = rc_deleted $op $delUser" ),
583 array( 'rc_user_text' => $name ), __METHOD__ );
584 $dbw->update( 'recentchanges', array( "rc_deleted = rc_deleted $op $delAction" ),
585 array( 'rc_namespace' => NS_USER, 'rc_title' => $userDbKey, 'rc_logid > 0' ), __METHOD__ );
586 # Hide name from live images
587 $dbw->update( 'oldimage', array( "oi_deleted = oi_deleted $op $delUser" ),
588 array( 'oi_user_text' => $name ), __METHOD__ );
589 # Hide name from deleted images
590 # WMF - schema change pending
591 # $dbw->update( 'filearchive', array( "fa_deleted = fa_deleted $op $delUser" ),
592 # array( 'fa_user_text' => $name ), __METHOD__ );
593 # Done!
594 return true;
595 }
596
597 /**
598 * UI entry point for blocking
599 * Wraps around doBlock()
600 */
601 public function doSubmit() {
602 global $wgOut;
603 $retval = $this->doBlock();
604 if( empty( $retval ) ) {
605 $titleObj = SpecialPage::getTitleFor( 'Blockip' );
606 $wgOut->redirect( $titleObj->getFullURL( 'action=success&ip=' .
607 urlencode( $this->BlockAddress ) ) );
608 return;
609 }
610 $this->showForm( $retval );
611 }
612
613 public function showSuccess() {
614 global $wgOut;
615
616 $wgOut->setPageTitle( wfMsg( 'blockip-title' ) );
617 $wgOut->setSubtitle( wfMsg( 'blockipsuccesssub' ) );
618 $text = wfMsgExt( 'blockipsuccesstext', array( 'parse' ), $this->BlockAddress );
619 $wgOut->addHTML( $text );
620 }
621
622 private function showLogFragment( $out, $title ) {
623 global $wgUser;
624
625 // Used to support GENDER in 'blocklog-showlog' and 'blocklog-showsuppresslog'
626 $userBlocked = $title->getText();
627
628 LogEventsList::showLogExtract(
629 $out,
630 'block',
631 $title->getPrefixedText(),
632 '',
633 array(
634 'lim' => 10,
635 'msgKey' => array(
636 'blocklog-showlog',
637 $userBlocked
638 ),
639 'showIfEmpty' => false
640 )
641 );
642
643 // Add suppression block entries if allowed
644 if( $wgUser->isAllowed( 'hideuser' ) ) {
645 LogEventsList::showLogExtract( $out, 'suppress', $title->getPrefixedText(), '',
646 array(
647 'lim' => 10,
648 'conds' => array(
649 'log_action' => array(
650 'block',
651 'reblock',
652 'unblock'
653 )
654 ),
655 'msgKey' => array(
656 'blocklog-showsuppresslog',
657 $userBlocked
658 ),
659 'showIfEmpty' => false
660 )
661 );
662 }
663 }
664
665 /**
666 * Return a comma-delimited list of "flags" to be passed to the log
667 * reader for this block, to provide more information in the logs
668 *
669 * @return array
670 */
671 private function blockLogFlags() {
672 global $wgBlockAllowsUTEdit;
673 $flags = array();
674 if( $this->BlockAnonOnly && IP::isIPAddress( $this->BlockAddress ) )
675 // when blocking a user the option 'anononly' is not available/has no effect -> do not write this into log
676 $flags[] = 'anononly';
677 if( $this->BlockCreateAccount )
678 $flags[] = 'nocreate';
679 if( !$this->BlockEnableAutoblock && !IP::isIPAddress( $this->BlockAddress ) )
680 // Same as anononly, this is not displayed when blocking an IP address
681 $flags[] = 'noautoblock';
682 if( $this->BlockEmail )
683 $flags[] = 'noemail';
684 if( !$this->BlockAllowUsertalk && $wgBlockAllowsUTEdit )
685 $flags[] = 'nousertalk';
686 if( $this->BlockHideName )
687 $flags[] = 'hiddenname';
688 return implode( ',', $flags );
689 }
690
691 /**
692 * Builds unblock and block list links
693 *
694 * @return string
695 */
696 private function getConvenienceLinks() {
697 global $wgUser, $wgLang;
698 $skin = $wgUser->getSkin();
699 if( $this->BlockAddress )
700 $links[] = $this->getContribsLink( $skin );
701 $links[] = $this->getUnblockLink( $skin );
702 $links[] = $this->getBlockListLink( $skin );
703 if ( $wgUser->isAllowed( 'editinterface' ) ) {
704 $title = Title::makeTitle( NS_MEDIAWIKI, 'Ipbreason-dropdown' );
705 $links[] = $skin->link(
706 $title,
707 wfMsgHtml( 'ipb-edit-dropdown' ),
708 array(),
709 array( 'action' => 'edit' )
710 );
711 }
712 return '<p class="mw-ipb-conveniencelinks">' . $wgLang->pipeList( $links ) . '</p>';
713 }
714
715 /**
716 * Build a convenient link to a user or IP's contribs
717 * form
718 *
719 * @param $skin Skin to use
720 * @return string
721 */
722 private function getContribsLink( $skin ) {
723 $contribsPage = SpecialPage::getTitleFor( 'Contributions', $this->BlockAddress );
724 return $skin->link( $contribsPage, wfMsgExt( 'ipb-blocklist-contribs', 'escape', $this->BlockAddress ) );
725 }
726
727 /**
728 * Build a convenient link to unblock the given username or IP
729 * address, if available; otherwise link to a blank unblock
730 * form
731 *
732 * @param $skin Skin to use
733 * @return string
734 */
735 private function getUnblockLink( $skin ) {
736 $list = SpecialPage::getTitleFor( 'Ipblocklist' );
737 $query = array( 'action' => 'unblock' );
738
739 if( $this->BlockAddress ) {
740 $addr = strtr( $this->BlockAddress, '_', ' ' );
741 $message = wfMsg( 'ipb-unblock-addr', $addr );
742 $query['ip'] = $this->BlockAddress;
743 } else {
744 $message = wfMsg( 'ipb-unblock' );
745 }
746 return $skin->linkKnown(
747 $list,
748 htmlspecialchars( $message ),
749 array(),
750 $query
751 );
752 }
753
754 /**
755 * Build a convenience link to the block list
756 *
757 * @param $skin Skin to use
758 * @return string
759 */
760 private function getBlockListLink( $skin ) {
761 $list = SpecialPage::getTitleFor( 'Ipblocklist' );
762 $query = array();
763
764 if( $this->BlockAddress ) {
765 $addr = strtr( $this->BlockAddress, '_', ' ' );
766 $message = wfMsg( 'ipb-blocklist-addr', $addr );
767 $query['ip'] = $this->BlockAddress;
768 } else {
769 $message = wfMsg( 'ipb-blocklist' );
770 }
771
772 return $skin->linkKnown(
773 $list,
774 htmlspecialchars( $message ),
775 array(),
776 $query
777 );
778 }
779
780 /**
781 * Block a list of selected users
782 * @param array $users
783 * @param string $reason
784 * @param string $tag replaces user pages
785 * @param string $talkTag replaces user talk pages
786 * @returns array, list of html-safe usernames
787 */
788 public static function doMassUserBlock( $users, $reason = '', $tag = '', $talkTag = '' ) {
789 global $wgUser;
790 $counter = $blockSize = 0;
791 $safeUsers = array();
792 $log = new LogPage( 'block' );
793 foreach( $users as $name ) {
794 # Enforce limits
795 $counter++;
796 $blockSize++;
797 # Lets not go *too* fast
798 if( $blockSize >= 20 ) {
799 $blockSize = 0;
800 wfWaitForSlaves( 5 );
801 }
802 $u = User::newFromName( $name, false );
803 // If user doesn't exist, it ought to be an IP then
804 if( is_null( $u ) || ( !$u->getId() && !IP::isIPAddress( $u->getName() ) ) ) {
805 continue;
806 }
807 $userTitle = $u->getUserPage();
808 $userTalkTitle = $u->getTalkPage();
809 $userpage = new Article( $userTitle );
810 $usertalk = new Article( $userTalkTitle );
811 $safeUsers[] = '[[' . $userTitle->getPrefixedText() . '|' . $userTitle->getText() . ']]';
812 $expirestr = $u->getId() ? 'indefinite' : '1 week';
813 $expiry = Block::parseExpiryInput( $expirestr );
814 $anonOnly = IP::isIPAddress( $u->getName() ) ? 1 : 0;
815 // Create the block
816 $block = new Block( $u->getName(), // victim
817 $u->getId(), // uid
818 $wgUser->getId(), // blocker
819 $reason, // comment
820 wfTimestampNow(), // block time
821 0, // auto ?
822 $expiry, // duration
823 $anonOnly, // anononly?
824 1, // block account creation?
825 1, // autoblocking?
826 0, // suppress name?
827 0 // block from sending email?
828 );
829 $oldblock = Block::newFromDB( $u->getName(), $u->getId() );
830 if( !$oldblock ) {
831 $block->insert();
832 # Prepare log parameters
833 $logParams = array();
834 $logParams[] = $expirestr;
835 if( $anonOnly ) {
836 $logParams[] = 'anononly';
837 }
838 $logParams[] = 'nocreate';
839 # Add log entry
840 $log->addEntry( 'block', $userTitle, $reason, $logParams );
841 }
842 # Tag userpage! (check length to avoid mistakes)
843 if( strlen( $tag ) > 2 ) {
844 $userpage->doEdit( $tag, $reason, EDIT_MINOR );
845 }
846 if( strlen( $talkTag ) > 2 ) {
847 $usertalk->doEdit( $talkTag, $reason, EDIT_MINOR );
848 }
849 }
850 return $safeUsers;
851 }
852 }