Merge "Drop "left in" debugging var_dump from WikiImporter"
[lhc/web/wiklou.git] / includes / Block.php
1 <?php
2 /**
3 * Blocks and bans object
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 * http://www.gnu.org/copyleft/gpl.html
19 *
20 * @file
21 */
22 class Block {
23 /** @var string */
24 public $mReason;
25
26 /** @var bool|string */
27 public $mTimestamp;
28
29 /** @var int */
30 public $mAuto;
31
32 /** @var bool|string */
33 public $mExpiry;
34
35 public $mHideName;
36
37 /** @var int */
38 public $mParentBlockId;
39
40 /** @var int */
41 protected $mId;
42
43 /** @var bool */
44 protected $mFromMaster;
45
46 /** @var bool */
47 protected $mBlockEmail;
48
49 /** @var bool */
50 protected $mDisableUsertalk;
51
52 /** @var bool */
53 protected $mCreateAccount;
54
55 /** @var User|string */
56 protected $target;
57
58 /** @var int Hack for foreign blocking (CentralAuth) */
59 protected $forcedTargetID;
60
61 /** @var int Block::TYPE_ constant. Can only be USER, IP or RANGE internally */
62 protected $type;
63
64 /** @var User */
65 protected $blocker;
66
67 /** @var bool */
68 protected $isHardblock = true;
69
70 /** @var bool */
71 protected $isAutoblocking = true;
72
73 # TYPE constants
74 const TYPE_USER = 1;
75 const TYPE_IP = 2;
76 const TYPE_RANGE = 3;
77 const TYPE_AUTO = 4;
78 const TYPE_ID = 5;
79
80 /**
81 * @todo FIXME: Don't know what the best format to have for this constructor
82 * is, but fourteen optional parameters certainly isn't it.
83 * @param string $address
84 * @param int $user
85 * @param int $by
86 * @param string $reason
87 * @param mixed $timestamp
88 * @param int $auto
89 * @param string $expiry
90 * @param int $anonOnly
91 * @param int $createAccount
92 * @param int $enableAutoblock
93 * @param int $hideName
94 * @param int $blockEmail
95 * @param int $allowUsertalk
96 * @param string $byText
97 */
98 function __construct( $address = '', $user = 0, $by = 0, $reason = '',
99 $timestamp = 0, $auto = 0, $expiry = '', $anonOnly = 0, $createAccount = 0, $enableAutoblock = 0,
100 $hideName = 0, $blockEmail = 0, $allowUsertalk = 0, $byText = ''
101 ) {
102 if ( $timestamp === 0 ) {
103 $timestamp = wfTimestampNow();
104 }
105
106 if ( count( func_get_args() ) > 0 ) {
107 # Soon... :D
108 # wfDeprecated( __METHOD__ . " with arguments" );
109 }
110
111 $this->setTarget( $address );
112 if ( $this->target instanceof User && $user ) {
113 $this->forcedTargetID = $user; // needed for foreign users
114 }
115 if ( $by ) { // local user
116 $this->setBlocker( User::newFromID( $by ) );
117 } else { // foreign user
118 $this->setBlocker( $byText );
119 }
120 $this->mReason = $reason;
121 $this->mTimestamp = wfTimestamp( TS_MW, $timestamp );
122 $this->mAuto = $auto;
123 $this->isHardblock( !$anonOnly );
124 $this->prevents( 'createaccount', $createAccount );
125 if ( $expiry == 'infinity' || $expiry == wfGetDB( DB_SLAVE )->getInfinity() ) {
126 $this->mExpiry = 'infinity';
127 } else {
128 $this->mExpiry = wfTimestamp( TS_MW, $expiry );
129 }
130 $this->isAutoblocking( $enableAutoblock );
131 $this->mHideName = $hideName;
132 $this->prevents( 'sendemail', $blockEmail );
133 $this->prevents( 'editownusertalk', !$allowUsertalk );
134
135 $this->mFromMaster = false;
136 }
137
138 /**
139 * Load a blocked user from their block id.
140 *
141 * @param int $id Block id to search for
142 * @return Block|null
143 */
144 public static function newFromID( $id ) {
145 $dbr = wfGetDB( DB_SLAVE );
146 $res = $dbr->selectRow(
147 'ipblocks',
148 self::selectFields(),
149 array( 'ipb_id' => $id ),
150 __METHOD__
151 );
152 if ( $res ) {
153 return self::newFromRow( $res );
154 } else {
155 return null;
156 }
157 }
158
159 /**
160 * Return the list of ipblocks fields that should be selected to create
161 * a new block.
162 * @return array
163 */
164 public static function selectFields() {
165 return array(
166 'ipb_id',
167 'ipb_address',
168 'ipb_by',
169 'ipb_by_text',
170 'ipb_reason',
171 'ipb_timestamp',
172 'ipb_auto',
173 'ipb_anon_only',
174 'ipb_create_account',
175 'ipb_enable_autoblock',
176 'ipb_expiry',
177 'ipb_deleted',
178 'ipb_block_email',
179 'ipb_allow_usertalk',
180 'ipb_parent_block_id',
181 );
182 }
183
184 /**
185 * Check if two blocks are effectively equal. Doesn't check irrelevant things like
186 * the blocking user or the block timestamp, only things which affect the blocked user
187 *
188 * @param Block $block
189 *
190 * @return bool
191 */
192 public function equals( Block $block ) {
193 return (
194 (string)$this->target == (string)$block->target
195 && $this->type == $block->type
196 && $this->mAuto == $block->mAuto
197 && $this->isHardblock() == $block->isHardblock()
198 && $this->prevents( 'createaccount' ) == $block->prevents( 'createaccount' )
199 && $this->mExpiry == $block->mExpiry
200 && $this->isAutoblocking() == $block->isAutoblocking()
201 && $this->mHideName == $block->mHideName
202 && $this->prevents( 'sendemail' ) == $block->prevents( 'sendemail' )
203 && $this->prevents( 'editownusertalk' ) == $block->prevents( 'editownusertalk' )
204 && $this->mReason == $block->mReason
205 );
206 }
207
208 /**
209 * Load a block from the database which affects the already-set $this->target:
210 * 1) A block directly on the given user or IP
211 * 2) A rangeblock encompassing the given IP (smallest first)
212 * 3) An autoblock on the given IP
213 * @param User|string $vagueTarget Also search for blocks affecting this target. Doesn't
214 * make any sense to use TYPE_AUTO / TYPE_ID here. Leave blank to skip IP lookups.
215 * @throws MWException
216 * @return bool Whether a relevant block was found
217 */
218 protected function newLoad( $vagueTarget = null ) {
219 $db = wfGetDB( $this->mFromMaster ? DB_MASTER : DB_SLAVE );
220
221 if ( $this->type !== null ) {
222 $conds = array(
223 'ipb_address' => array( (string)$this->target ),
224 );
225 } else {
226 $conds = array( 'ipb_address' => array() );
227 }
228
229 # Be aware that the != '' check is explicit, since empty values will be
230 # passed by some callers (bug 29116)
231 if ( $vagueTarget != '' ) {
232 list( $target, $type ) = self::parseTarget( $vagueTarget );
233 switch ( $type ) {
234 case self::TYPE_USER:
235 # Slightly weird, but who are we to argue?
236 $conds['ipb_address'][] = (string)$target;
237 break;
238
239 case self::TYPE_IP:
240 $conds['ipb_address'][] = (string)$target;
241 $conds[] = self::getRangeCond( IP::toHex( $target ) );
242 $conds = $db->makeList( $conds, LIST_OR );
243 break;
244
245 case self::TYPE_RANGE:
246 list( $start, $end ) = IP::parseRange( $target );
247 $conds['ipb_address'][] = (string)$target;
248 $conds[] = self::getRangeCond( $start, $end );
249 $conds = $db->makeList( $conds, LIST_OR );
250 break;
251
252 default:
253 throw new MWException( "Tried to load block with invalid type" );
254 }
255 }
256
257 $res = $db->select( 'ipblocks', self::selectFields(), $conds, __METHOD__ );
258
259 # This result could contain a block on the user, a block on the IP, and a russian-doll
260 # set of rangeblocks. We want to choose the most specific one, so keep a leader board.
261 $bestRow = null;
262
263 # Lower will be better
264 $bestBlockScore = 100;
265
266 # This is begging for $this = $bestBlock, but that's not allowed in PHP :(
267 $bestBlockPreventsEdit = null;
268
269 foreach ( $res as $row ) {
270 $block = self::newFromRow( $row );
271
272 # Don't use expired blocks
273 if ( $block->deleteIfExpired() ) {
274 continue;
275 }
276
277 # Don't use anon only blocks on users
278 if ( $this->type == self::TYPE_USER && !$block->isHardblock() ) {
279 continue;
280 }
281
282 if ( $block->getType() == self::TYPE_RANGE ) {
283 # This is the number of bits that are allowed to vary in the block, give
284 # or take some floating point errors
285 $end = wfBaseconvert( $block->getRangeEnd(), 16, 10 );
286 $start = wfBaseconvert( $block->getRangeStart(), 16, 10 );
287 $size = log( $end - $start + 1, 2 );
288
289 # This has the nice property that a /32 block is ranked equally with a
290 # single-IP block, which is exactly what it is...
291 $score = self::TYPE_RANGE - 1 + ( $size / 128 );
292
293 } else {
294 $score = $block->getType();
295 }
296
297 if ( $score < $bestBlockScore ) {
298 $bestBlockScore = $score;
299 $bestRow = $row;
300 $bestBlockPreventsEdit = $block->prevents( 'edit' );
301 }
302 }
303
304 if ( $bestRow !== null ) {
305 $this->initFromRow( $bestRow );
306 $this->prevents( 'edit', $bestBlockPreventsEdit );
307 return true;
308 } else {
309 return false;
310 }
311 }
312
313 /**
314 * Get a set of SQL conditions which will select rangeblocks encompassing a given range
315 * @param string $start Hexadecimal IP representation
316 * @param string $end Hexadecimal IP representation, or null to use $start = $end
317 * @return string
318 */
319 public static function getRangeCond( $start, $end = null ) {
320 if ( $end === null ) {
321 $end = $start;
322 }
323 # Per bug 14634, we want to include relevant active rangeblocks; for
324 # rangeblocks, we want to include larger ranges which enclose the given
325 # range. We know that all blocks must be smaller than $wgBlockCIDRLimit,
326 # so we can improve performance by filtering on a LIKE clause
327 $chunk = self::getIpFragment( $start );
328 $dbr = wfGetDB( DB_SLAVE );
329 $like = $dbr->buildLike( $chunk, $dbr->anyString() );
330
331 # Fairly hard to make a malicious SQL statement out of hex characters,
332 # but stranger things have happened...
333 $safeStart = $dbr->addQuotes( $start );
334 $safeEnd = $dbr->addQuotes( $end );
335
336 return $dbr->makeList(
337 array(
338 "ipb_range_start $like",
339 "ipb_range_start <= $safeStart",
340 "ipb_range_end >= $safeEnd",
341 ),
342 LIST_AND
343 );
344 }
345
346 /**
347 * Get the component of an IP address which is certain to be the same between an IP
348 * address and a rangeblock containing that IP address.
349 * @param string $hex Hexadecimal IP representation
350 * @return string
351 */
352 protected static function getIpFragment( $hex ) {
353 global $wgBlockCIDRLimit;
354 if ( substr( $hex, 0, 3 ) == 'v6-' ) {
355 return 'v6-' . substr( substr( $hex, 3 ), 0, floor( $wgBlockCIDRLimit['IPv6'] / 4 ) );
356 } else {
357 return substr( $hex, 0, floor( $wgBlockCIDRLimit['IPv4'] / 4 ) );
358 }
359 }
360
361 /**
362 * Given a database row from the ipblocks table, initialize
363 * member variables
364 * @param stdClass $row A row from the ipblocks table
365 */
366 protected function initFromRow( $row ) {
367 $this->setTarget( $row->ipb_address );
368 if ( $row->ipb_by ) { // local user
369 $this->setBlocker( User::newFromID( $row->ipb_by ) );
370 } else { // foreign user
371 $this->setBlocker( $row->ipb_by_text );
372 }
373
374 $this->mReason = $row->ipb_reason;
375 $this->mTimestamp = wfTimestamp( TS_MW, $row->ipb_timestamp );
376 $this->mAuto = $row->ipb_auto;
377 $this->mHideName = $row->ipb_deleted;
378 $this->mId = $row->ipb_id;
379 $this->mParentBlockId = $row->ipb_parent_block_id;
380
381 // I wish I didn't have to do this
382 $db = wfGetDB( DB_SLAVE );
383 if ( $row->ipb_expiry == $db->getInfinity() ) {
384 $this->mExpiry = 'infinity';
385 } else {
386 $this->mExpiry = wfTimestamp( TS_MW, $row->ipb_expiry );
387 }
388
389 $this->isHardblock( !$row->ipb_anon_only );
390 $this->isAutoblocking( $row->ipb_enable_autoblock );
391
392 $this->prevents( 'createaccount', $row->ipb_create_account );
393 $this->prevents( 'sendemail', $row->ipb_block_email );
394 $this->prevents( 'editownusertalk', !$row->ipb_allow_usertalk );
395 }
396
397 /**
398 * Create a new Block object from a database row
399 * @param stdClass $row Row from the ipblocks table
400 * @return Block
401 */
402 public static function newFromRow( $row ) {
403 $block = new Block;
404 $block->initFromRow( $row );
405 return $block;
406 }
407
408 /**
409 * Delete the row from the IP blocks table.
410 *
411 * @throws MWException
412 * @return bool
413 */
414 public function delete() {
415 if ( wfReadOnly() ) {
416 return false;
417 }
418
419 if ( !$this->getId() ) {
420 throw new MWException( "Block::delete() requires that the mId member be filled\n" );
421 }
422
423 $dbw = wfGetDB( DB_MASTER );
424 $dbw->delete( 'ipblocks', array( 'ipb_parent_block_id' => $this->getId() ), __METHOD__ );
425 $dbw->delete( 'ipblocks', array( 'ipb_id' => $this->getId() ), __METHOD__ );
426
427 return $dbw->affectedRows() > 0;
428 }
429
430 /**
431 * Insert a block into the block table. Will fail if there is a conflicting
432 * block (same name and options) already in the database.
433 *
434 * @param DatabaseBase $dbw If you have one available
435 * @return bool|array False on failure, assoc array on success:
436 * ('id' => block ID, 'autoIds' => array of autoblock IDs)
437 */
438 public function insert( $dbw = null ) {
439 wfDebug( "Block::insert; timestamp {$this->mTimestamp}\n" );
440
441 if ( $dbw === null ) {
442 $dbw = wfGetDB( DB_MASTER );
443 }
444
445 # Don't collide with expired blocks
446 Block::purgeExpired();
447
448 $row = $this->getDatabaseArray();
449 $row['ipb_id'] = $dbw->nextSequenceValue( "ipblocks_ipb_id_seq" );
450
451 $dbw->insert(
452 'ipblocks',
453 $row,
454 __METHOD__,
455 array( 'IGNORE' )
456 );
457 $affected = $dbw->affectedRows();
458 $this->mId = $dbw->insertId();
459
460 if ( $affected ) {
461 $auto_ipd_ids = $this->doRetroactiveAutoblock();
462 return array( 'id' => $this->mId, 'autoIds' => $auto_ipd_ids );
463 }
464
465 return false;
466 }
467
468 /**
469 * Update a block in the DB with new parameters.
470 * The ID field needs to be loaded first.
471 *
472 * @return bool|array False on failure, array on success:
473 * ('id' => block ID, 'autoIds' => array of autoblock IDs)
474 */
475 public function update() {
476 wfDebug( "Block::update; timestamp {$this->mTimestamp}\n" );
477 $dbw = wfGetDB( DB_MASTER );
478
479 $dbw->startAtomic( __METHOD__ );
480
481 $dbw->update(
482 'ipblocks',
483 $this->getDatabaseArray( $dbw ),
484 array( 'ipb_id' => $this->getId() ),
485 __METHOD__
486 );
487
488 $affected = $dbw->affectedRows();
489
490 if ( $this->isAutoblocking() ) {
491 // update corresponding autoblock(s) (bug 48813)
492 $dbw->update(
493 'ipblocks',
494 $this->getAutoblockUpdateArray(),
495 array( 'ipb_parent_block_id' => $this->getId() ),
496 __METHOD__
497 );
498 } else {
499 // autoblock no longer required, delete corresponding autoblock(s)
500 $dbw->delete(
501 'ipblocks',
502 array( 'ipb_parent_block_id' => $this->getId() ),
503 __METHOD__
504 );
505 }
506
507 $dbw->endAtomic( __METHOD__ );
508
509 if ( $affected ) {
510 $auto_ipd_ids = $this->doRetroactiveAutoblock();
511 return array( 'id' => $this->mId, 'autoIds' => $auto_ipd_ids );
512 }
513
514 return false;
515 }
516
517 /**
518 * Get an array suitable for passing to $dbw->insert() or $dbw->update()
519 * @param DatabaseBase $db
520 * @return array
521 */
522 protected function getDatabaseArray( $db = null ) {
523 if ( !$db ) {
524 $db = wfGetDB( DB_SLAVE );
525 }
526 $expiry = $db->encodeExpiry( $this->mExpiry );
527
528 if ( $this->forcedTargetID ) {
529 $uid = $this->forcedTargetID;
530 } else {
531 $uid = $this->target instanceof User ? $this->target->getID() : 0;
532 }
533
534 $a = array(
535 'ipb_address' => (string)$this->target,
536 'ipb_user' => $uid,
537 'ipb_by' => $this->getBy(),
538 'ipb_by_text' => $this->getByName(),
539 'ipb_reason' => $this->mReason,
540 'ipb_timestamp' => $db->timestamp( $this->mTimestamp ),
541 'ipb_auto' => $this->mAuto,
542 'ipb_anon_only' => !$this->isHardblock(),
543 'ipb_create_account' => $this->prevents( 'createaccount' ),
544 'ipb_enable_autoblock' => $this->isAutoblocking(),
545 'ipb_expiry' => $expiry,
546 'ipb_range_start' => $this->getRangeStart(),
547 'ipb_range_end' => $this->getRangeEnd(),
548 'ipb_deleted' => intval( $this->mHideName ), // typecast required for SQLite
549 'ipb_block_email' => $this->prevents( 'sendemail' ),
550 'ipb_allow_usertalk' => !$this->prevents( 'editownusertalk' ),
551 'ipb_parent_block_id' => $this->mParentBlockId
552 );
553
554 return $a;
555 }
556
557 /**
558 * @return array
559 */
560 protected function getAutoblockUpdateArray() {
561 return array(
562 'ipb_by' => $this->getBy(),
563 'ipb_by_text' => $this->getByName(),
564 'ipb_reason' => $this->mReason,
565 'ipb_create_account' => $this->prevents( 'createaccount' ),
566 'ipb_deleted' => (int)$this->mHideName, // typecast required for SQLite
567 'ipb_allow_usertalk' => !$this->prevents( 'editownusertalk' ),
568 );
569 }
570
571 /**
572 * Retroactively autoblocks the last IP used by the user (if it is a user)
573 * blocked by this Block.
574 *
575 * @return array Block IDs of retroactive autoblocks made
576 */
577 protected function doRetroactiveAutoblock() {
578 $blockIds = array();
579 # If autoblock is enabled, autoblock the LAST IP(s) used
580 if ( $this->isAutoblocking() && $this->getType() == self::TYPE_USER ) {
581 wfDebug( "Doing retroactive autoblocks for " . $this->getTarget() . "\n" );
582
583 $continue = wfRunHooks(
584 'PerformRetroactiveAutoblock', array( $this, &$blockIds ) );
585
586 if ( $continue ) {
587 self::defaultRetroactiveAutoblock( $this, $blockIds );
588 }
589 }
590 return $blockIds;
591 }
592
593 /**
594 * Retroactively autoblocks the last IP used by the user (if it is a user)
595 * blocked by this Block. This will use the recentchanges table.
596 *
597 * @param Block $block
598 * @param array &$blockIds
599 * @return array Block IDs of retroactive autoblocks made
600 */
601 protected static function defaultRetroactiveAutoblock( Block $block, array &$blockIds ) {
602 global $wgPutIPinRC;
603
604 // No IPs are in recentchanges table, so nothing to select
605 if ( !$wgPutIPinRC ) {
606 return;
607 }
608
609 $dbr = wfGetDB( DB_SLAVE );
610
611 $options = array( 'ORDER BY' => 'rc_timestamp DESC' );
612 $conds = array( 'rc_user_text' => (string)$block->getTarget() );
613
614 // Just the last IP used.
615 $options['LIMIT'] = 1;
616
617 $res = $dbr->select( 'recentchanges', array( 'rc_ip' ), $conds,
618 __METHOD__, $options );
619
620 if ( !$res->numRows() ) {
621 # No results, don't autoblock anything
622 wfDebug( "No IP found to retroactively autoblock\n" );
623 } else {
624 foreach ( $res as $row ) {
625 if ( $row->rc_ip ) {
626 $id = $block->doAutoblock( $row->rc_ip );
627 if ( $id ) {
628 $blockIds[] = $id;
629 }
630 }
631 }
632 }
633 }
634
635 /**
636 * Checks whether a given IP is on the autoblock whitelist.
637 * TODO: this probably belongs somewhere else, but not sure where...
638 *
639 * @param string $ip The IP to check
640 * @return bool
641 */
642 public static function isWhitelistedFromAutoblocks( $ip ) {
643 global $wgMemc;
644
645 // Try to get the autoblock_whitelist from the cache, as it's faster
646 // than getting the msg raw and explode()'ing it.
647 $key = wfMemcKey( 'ipb', 'autoblock', 'whitelist' );
648 $lines = $wgMemc->get( $key );
649 if ( !$lines ) {
650 $lines = explode( "\n", wfMessage( 'autoblock_whitelist' )->inContentLanguage()->plain() );
651 $wgMemc->set( $key, $lines, 3600 * 24 );
652 }
653
654 wfDebug( "Checking the autoblock whitelist..\n" );
655
656 foreach ( $lines as $line ) {
657 # List items only
658 if ( substr( $line, 0, 1 ) !== '*' ) {
659 continue;
660 }
661
662 $wlEntry = substr( $line, 1 );
663 $wlEntry = trim( $wlEntry );
664
665 wfDebug( "Checking $ip against $wlEntry..." );
666
667 # Is the IP in this range?
668 if ( IP::isInRange( $ip, $wlEntry ) ) {
669 wfDebug( " IP $ip matches $wlEntry, not autoblocking\n" );
670 return true;
671 } else {
672 wfDebug( " No match\n" );
673 }
674 }
675
676 return false;
677 }
678
679 /**
680 * Autoblocks the given IP, referring to this Block.
681 *
682 * @param string $autoblockIP The IP to autoblock.
683 * @return int|bool Block ID if an autoblock was inserted, false if not.
684 */
685 public function doAutoblock( $autoblockIP ) {
686 # If autoblocks are disabled, go away.
687 if ( !$this->isAutoblocking() ) {
688 return false;
689 }
690
691 # Check for presence on the autoblock whitelist.
692 if ( self::isWhitelistedFromAutoblocks( $autoblockIP ) ) {
693 return false;
694 }
695
696 # Allow hooks to cancel the autoblock.
697 if ( !wfRunHooks( 'AbortAutoblock', array( $autoblockIP, &$this ) ) ) {
698 wfDebug( "Autoblock aborted by hook.\n" );
699 return false;
700 }
701
702 # It's okay to autoblock. Go ahead and insert/update the block...
703
704 # Do not add a *new* block if the IP is already blocked.
705 $ipblock = Block::newFromTarget( $autoblockIP );
706 if ( $ipblock ) {
707 # Check if the block is an autoblock and would exceed the user block
708 # if renewed. If so, do nothing, otherwise prolong the block time...
709 if ( $ipblock->mAuto && // @todo Why not compare $ipblock->mExpiry?
710 $this->mExpiry > Block::getAutoblockExpiry( $ipblock->mTimestamp )
711 ) {
712 # Reset block timestamp to now and its expiry to
713 # $wgAutoblockExpiry in the future
714 $ipblock->updateTimestamp();
715 }
716 return false;
717 }
718
719 # Make a new block object with the desired properties.
720 $autoblock = new Block;
721 wfDebug( "Autoblocking {$this->getTarget()}@" . $autoblockIP . "\n" );
722 $autoblock->setTarget( $autoblockIP );
723 $autoblock->setBlocker( $this->getBlocker() );
724 $autoblock->mReason = wfMessage( 'autoblocker', $this->getTarget(), $this->mReason )
725 ->inContentLanguage()->plain();
726 $timestamp = wfTimestampNow();
727 $autoblock->mTimestamp = $timestamp;
728 $autoblock->mAuto = 1;
729 $autoblock->prevents( 'createaccount', $this->prevents( 'createaccount' ) );
730 # Continue suppressing the name if needed
731 $autoblock->mHideName = $this->mHideName;
732 $autoblock->prevents( 'editownusertalk', $this->prevents( 'editownusertalk' ) );
733 $autoblock->mParentBlockId = $this->mId;
734
735 if ( $this->mExpiry == 'infinity' ) {
736 # Original block was indefinite, start an autoblock now
737 $autoblock->mExpiry = Block::getAutoblockExpiry( $timestamp );
738 } else {
739 # If the user is already blocked with an expiry date, we don't
740 # want to pile on top of that.
741 $autoblock->mExpiry = min( $this->mExpiry, Block::getAutoblockExpiry( $timestamp ) );
742 }
743
744 # Insert the block...
745 $status = $autoblock->insert();
746 return $status
747 ? $status['id']
748 : false;
749 }
750
751 /**
752 * Check if a block has expired. Delete it if it is.
753 * @return bool
754 */
755 public function deleteIfExpired() {
756 wfProfileIn( __METHOD__ );
757
758 if ( $this->isExpired() ) {
759 wfDebug( "Block::deleteIfExpired() -- deleting\n" );
760 $this->delete();
761 $retVal = true;
762 } else {
763 wfDebug( "Block::deleteIfExpired() -- not expired\n" );
764 $retVal = false;
765 }
766
767 wfProfileOut( __METHOD__ );
768 return $retVal;
769 }
770
771 /**
772 * Has the block expired?
773 * @return bool
774 */
775 public function isExpired() {
776 $timestamp = wfTimestampNow();
777 wfDebug( "Block::isExpired() checking current " . $timestamp . " vs $this->mExpiry\n" );
778
779 if ( !$this->mExpiry ) {
780 return false;
781 } else {
782 return $timestamp > $this->mExpiry;
783 }
784 }
785
786 /**
787 * Is the block address valid (i.e. not a null string?)
788 * @return bool
789 */
790 public function isValid() {
791 return $this->getTarget() != null;
792 }
793
794 /**
795 * Update the timestamp on autoblocks.
796 */
797 public function updateTimestamp() {
798 if ( $this->mAuto ) {
799 $this->mTimestamp = wfTimestamp();
800 $this->mExpiry = Block::getAutoblockExpiry( $this->mTimestamp );
801
802 $dbw = wfGetDB( DB_MASTER );
803 $dbw->update( 'ipblocks',
804 array( /* SET */
805 'ipb_timestamp' => $dbw->timestamp( $this->mTimestamp ),
806 'ipb_expiry' => $dbw->timestamp( $this->mExpiry ),
807 ),
808 array( /* WHERE */
809 'ipb_address' => (string)$this->getTarget()
810 ),
811 __METHOD__
812 );
813 }
814 }
815
816 /**
817 * Get the IP address at the start of the range in Hex form
818 * @throws MWException
819 * @return string IP in Hex form
820 */
821 public function getRangeStart() {
822 switch ( $this->type ) {
823 case self::TYPE_USER:
824 return '';
825 case self::TYPE_IP:
826 return IP::toHex( $this->target );
827 case self::TYPE_RANGE:
828 list( $start, /*...*/ ) = IP::parseRange( $this->target );
829 return $start;
830 default:
831 throw new MWException( "Block with invalid type" );
832 }
833 }
834
835 /**
836 * Get the IP address at the end of the range in Hex form
837 * @throws MWException
838 * @return string IP in Hex form
839 */
840 public function getRangeEnd() {
841 switch ( $this->type ) {
842 case self::TYPE_USER:
843 return '';
844 case self::TYPE_IP:
845 return IP::toHex( $this->target );
846 case self::TYPE_RANGE:
847 list( /*...*/, $end ) = IP::parseRange( $this->target );
848 return $end;
849 default:
850 throw new MWException( "Block with invalid type" );
851 }
852 }
853
854 /**
855 * Get the user id of the blocking sysop
856 *
857 * @return int (0 for foreign users)
858 */
859 public function getBy() {
860 $blocker = $this->getBlocker();
861 return ( $blocker instanceof User )
862 ? $blocker->getId()
863 : 0;
864 }
865
866 /**
867 * Get the username of the blocking sysop
868 *
869 * @return string
870 */
871 public function getByName() {
872 $blocker = $this->getBlocker();
873 return ( $blocker instanceof User )
874 ? $blocker->getName()
875 : (string)$blocker; // username
876 }
877
878 /**
879 * Get the block ID
880 * @return int
881 */
882 public function getId() {
883 return $this->mId;
884 }
885
886 /**
887 * Get/set a flag determining whether the master is used for reads
888 *
889 * @param bool $x
890 * @return bool
891 */
892 public function fromMaster( $x = null ) {
893 return wfSetVar( $this->mFromMaster, $x );
894 }
895
896 /**
897 * Get/set whether the Block is a hardblock (affects logged-in users on a given IP/range
898 * @param bool $x
899 * @return bool
900 */
901 public function isHardblock( $x = null ) {
902 wfSetVar( $this->isHardblock, $x );
903
904 # You can't *not* hardblock a user
905 return $this->getType() == self::TYPE_USER
906 ? true
907 : $this->isHardblock;
908 }
909
910 public function isAutoblocking( $x = null ) {
911 wfSetVar( $this->isAutoblocking, $x );
912
913 # You can't put an autoblock on an IP or range as we don't have any history to
914 # look over to get more IPs from
915 return $this->getType() == self::TYPE_USER
916 ? $this->isAutoblocking
917 : false;
918 }
919
920 /**
921 * Get/set whether the Block prevents a given action
922 * @param string $action
923 * @param bool $x
924 * @return bool
925 */
926 public function prevents( $action, $x = null ) {
927 switch ( $action ) {
928 case 'edit':
929 # For now... <evil laugh>
930 return true;
931
932 case 'createaccount':
933 return wfSetVar( $this->mCreateAccount, $x );
934
935 case 'sendemail':
936 return wfSetVar( $this->mBlockEmail, $x );
937
938 case 'editownusertalk':
939 return wfSetVar( $this->mDisableUsertalk, $x );
940
941 default:
942 return null;
943 }
944 }
945
946 /**
947 * Get the block name, but with autoblocked IPs hidden as per standard privacy policy
948 * @return string Text is escaped
949 */
950 public function getRedactedName() {
951 if ( $this->mAuto ) {
952 return Html::rawElement(
953 'span',
954 array( 'class' => 'mw-autoblockid' ),
955 wfMessage( 'autoblockid', $this->mId )
956 );
957 } else {
958 return htmlspecialchars( $this->getTarget() );
959 }
960 }
961
962 /**
963 * Get a timestamp of the expiry for autoblocks
964 *
965 * @param string|int $timestamp
966 * @return string
967 */
968 public static function getAutoblockExpiry( $timestamp ) {
969 global $wgAutoblockExpiry;
970
971 return wfTimestamp( TS_MW, wfTimestamp( TS_UNIX, $timestamp ) + $wgAutoblockExpiry );
972 }
973
974 /**
975 * Purge expired blocks from the ipblocks table
976 */
977 public static function purgeExpired() {
978 if ( wfReadOnly() ) {
979 return;
980 }
981
982 $method = __METHOD__;
983 $dbw = wfGetDB( DB_MASTER );
984 $dbw->onTransactionIdle( function () use ( $dbw, $method ) {
985 $dbw->delete( 'ipblocks',
986 array( 'ipb_expiry < ' . $dbw->addQuotes( $dbw->timestamp() ) ), $method );
987 } );
988 }
989
990 /**
991 * Given a target and the target's type, get an existing Block object if possible.
992 * @param string|User|int $specificTarget A block target, which may be one of several types:
993 * * A user to block, in which case $target will be a User
994 * * An IP to block, in which case $target will be a User generated by using
995 * User::newFromName( $ip, false ) to turn off name validation
996 * * An IP range, in which case $target will be a String "123.123.123.123/18" etc
997 * * The ID of an existing block, in the format "#12345" (since pure numbers are valid
998 * usernames
999 * Calling this with a user, IP address or range will not select autoblocks, and will
1000 * only select a block where the targets match exactly (so looking for blocks on
1001 * 1.2.3.4 will not select 1.2.0.0/16 or even 1.2.3.4/32)
1002 * @param string|User|int $vagueTarget As above, but we will search for *any* block which
1003 * affects that target (so for an IP address, get ranges containing that IP; and also
1004 * get any relevant autoblocks). Leave empty or blank to skip IP-based lookups.
1005 * @param bool $fromMaster Whether to use the DB_MASTER database
1006 * @return Block|null (null if no relevant block could be found). The target and type
1007 * of the returned Block will refer to the actual block which was found, which might
1008 * not be the same as the target you gave if you used $vagueTarget!
1009 */
1010 public static function newFromTarget( $specificTarget, $vagueTarget = null, $fromMaster = false ) {
1011
1012 list( $target, $type ) = self::parseTarget( $specificTarget );
1013 if ( $type == Block::TYPE_ID || $type == Block::TYPE_AUTO ) {
1014 return Block::newFromID( $target );
1015
1016 } elseif ( $target === null && $vagueTarget == '' ) {
1017 # We're not going to find anything useful here
1018 # Be aware that the == '' check is explicit, since empty values will be
1019 # passed by some callers (bug 29116)
1020 return null;
1021
1022 } elseif ( in_array(
1023 $type,
1024 array( Block::TYPE_USER, Block::TYPE_IP, Block::TYPE_RANGE, null ) )
1025 ) {
1026 $block = new Block();
1027 $block->fromMaster( $fromMaster );
1028
1029 if ( $type !== null ) {
1030 $block->setTarget( $target );
1031 }
1032
1033 if ( $block->newLoad( $vagueTarget ) ) {
1034 return $block;
1035 }
1036 }
1037 return null;
1038 }
1039
1040 /**
1041 * Get all blocks that match any IP from an array of IP addresses
1042 *
1043 * @param array $ipChain List of IPs (strings), usually retrieved from the
1044 * X-Forwarded-For header of the request
1045 * @param bool $isAnon Exclude anonymous-only blocks if false
1046 * @param bool $fromMaster Whether to query the master or slave database
1047 * @return array Array of Blocks
1048 * @since 1.22
1049 */
1050 public static function getBlocksForIPList( array $ipChain, $isAnon, $fromMaster = false ) {
1051 if ( !count( $ipChain ) ) {
1052 return array();
1053 }
1054
1055 wfProfileIn( __METHOD__ );
1056 $conds = array();
1057 foreach ( array_unique( $ipChain ) as $ipaddr ) {
1058 # Discard invalid IP addresses. Since XFF can be spoofed and we do not
1059 # necessarily trust the header given to us, make sure that we are only
1060 # checking for blocks on well-formatted IP addresses (IPv4 and IPv6).
1061 # Do not treat private IP spaces as special as it may be desirable for wikis
1062 # to block those IP ranges in order to stop misbehaving proxies that spoof XFF.
1063 if ( !IP::isValid( $ipaddr ) ) {
1064 continue;
1065 }
1066 # Don't check trusted IPs (includes local squids which will be in every request)
1067 if ( IP::isTrustedProxy( $ipaddr ) ) {
1068 continue;
1069 }
1070 # Check both the original IP (to check against single blocks), as well as build
1071 # the clause to check for rangeblocks for the given IP.
1072 $conds['ipb_address'][] = $ipaddr;
1073 $conds[] = self::getRangeCond( IP::toHex( $ipaddr ) );
1074 }
1075
1076 if ( !count( $conds ) ) {
1077 wfProfileOut( __METHOD__ );
1078 return array();
1079 }
1080
1081 if ( $fromMaster ) {
1082 $db = wfGetDB( DB_MASTER );
1083 } else {
1084 $db = wfGetDB( DB_SLAVE );
1085 }
1086 $conds = $db->makeList( $conds, LIST_OR );
1087 if ( !$isAnon ) {
1088 $conds = array( $conds, 'ipb_anon_only' => 0 );
1089 }
1090 $selectFields = array_merge(
1091 array( 'ipb_range_start', 'ipb_range_end' ),
1092 Block::selectFields()
1093 );
1094 $rows = $db->select( 'ipblocks',
1095 $selectFields,
1096 $conds,
1097 __METHOD__
1098 );
1099
1100 $blocks = array();
1101 foreach ( $rows as $row ) {
1102 $block = self::newFromRow( $row );
1103 if ( !$block->deleteIfExpired() ) {
1104 $blocks[] = $block;
1105 }
1106 }
1107
1108 wfProfileOut( __METHOD__ );
1109 return $blocks;
1110 }
1111
1112 /**
1113 * From a list of multiple blocks, find the most exact and strongest Block.
1114 * The logic for finding the "best" block is:
1115 * - Blocks that match the block's target IP are preferred over ones in a range
1116 * - Hardblocks are chosen over softblocks that prevent account creation
1117 * - Softblocks that prevent account creation are chosen over other softblocks
1118 * - Other softblocks are chosen over autoblocks
1119 * - If there are multiple exact or range blocks at the same level, the one chosen
1120 * is random
1121 *
1122 * @param array $blocks Array of blocks
1123 * @param array $ipChain List of IPs (strings). This is used to determine how "close"
1124 * a block is to the server, and if a block matches exactly, or is in a range.
1125 * The order is furthest from the server to nearest e.g., (Browser, proxy1, proxy2,
1126 * local-squid, ...)
1127 * @return Block|null The "best" block from the list
1128 */
1129 public static function chooseBlock( array $blocks, array $ipChain ) {
1130 if ( !count( $blocks ) ) {
1131 return null;
1132 } elseif ( count( $blocks ) == 1 ) {
1133 return $blocks[0];
1134 }
1135
1136 wfProfileIn( __METHOD__ );
1137
1138 // Sort hard blocks before soft ones and secondarily sort blocks
1139 // that disable account creation before those that don't.
1140 usort( $blocks, function ( Block $a, Block $b ) {
1141 $aWeight = (int)$a->isHardblock() . (int)$a->prevents( 'createaccount' );
1142 $bWeight = (int)$b->isHardblock() . (int)$b->prevents( 'createaccount' );
1143 return strcmp( $bWeight, $aWeight ); // highest weight first
1144 } );
1145
1146 $blocksListExact = array(
1147 'hard' => false,
1148 'disable_create' => false,
1149 'other' => false,
1150 'auto' => false
1151 );
1152 $blocksListRange = array(
1153 'hard' => false,
1154 'disable_create' => false,
1155 'other' => false,
1156 'auto' => false
1157 );
1158 $ipChain = array_reverse( $ipChain );
1159
1160 foreach ( $blocks as $block ) {
1161 // Stop searching if we have already have a "better" block. This
1162 // is why the order of the blocks matters
1163 if ( !$block->isHardblock() && $blocksListExact['hard'] ) {
1164 break;
1165 } elseif ( !$block->prevents( 'createaccount' ) && $blocksListExact['disable_create'] ) {
1166 break;
1167 }
1168
1169 foreach ( $ipChain as $checkip ) {
1170 $checkipHex = IP::toHex( $checkip );
1171 if ( (string)$block->getTarget() === $checkip ) {
1172 if ( $block->isHardblock() ) {
1173 $blocksListExact['hard'] = $blocksListExact['hard'] ?: $block;
1174 } elseif ( $block->prevents( 'createaccount' ) ) {
1175 $blocksListExact['disable_create'] = $blocksListExact['disable_create'] ?: $block;
1176 } elseif ( $block->mAuto ) {
1177 $blocksListExact['auto'] = $blocksListExact['auto'] ?: $block;
1178 } else {
1179 $blocksListExact['other'] = $blocksListExact['other'] ?: $block;
1180 }
1181 // We found closest exact match in the ip list, so go to the next Block
1182 break;
1183 } elseif ( array_filter( $blocksListExact ) == array()
1184 && $block->getRangeStart() <= $checkipHex
1185 && $block->getRangeEnd() >= $checkipHex
1186 ) {
1187 if ( $block->isHardblock() ) {
1188 $blocksListRange['hard'] = $blocksListRange['hard'] ?: $block;
1189 } elseif ( $block->prevents( 'createaccount' ) ) {
1190 $blocksListRange['disable_create'] = $blocksListRange['disable_create'] ?: $block;
1191 } elseif ( $block->mAuto ) {
1192 $blocksListRange['auto'] = $blocksListRange['auto'] ?: $block;
1193 } else {
1194 $blocksListRange['other'] = $blocksListRange['other'] ?: $block;
1195 }
1196 break;
1197 }
1198 }
1199 }
1200
1201 if ( array_filter( $blocksListExact ) == array() ) {
1202 $blocksList = &$blocksListRange;
1203 } else {
1204 $blocksList = &$blocksListExact;
1205 }
1206
1207 $chosenBlock = null;
1208 if ( $blocksList['hard'] ) {
1209 $chosenBlock = $blocksList['hard'];
1210 } elseif ( $blocksList['disable_create'] ) {
1211 $chosenBlock = $blocksList['disable_create'];
1212 } elseif ( $blocksList['other'] ) {
1213 $chosenBlock = $blocksList['other'];
1214 } elseif ( $blocksList['auto'] ) {
1215 $chosenBlock = $blocksList['auto'];
1216 } else {
1217 wfProfileOut( __METHOD__ );
1218 throw new MWException( "Proxy block found, but couldn't be classified." );
1219 }
1220
1221 wfProfileOut( __METHOD__ );
1222 return $chosenBlock;
1223 }
1224
1225 /**
1226 * From an existing Block, get the target and the type of target.
1227 * Note that, except for null, it is always safe to treat the target
1228 * as a string; for User objects this will return User::__toString()
1229 * which in turn gives User::getName().
1230 *
1231 * @param string|int|User|null $target
1232 * @return array( User|String|null, Block::TYPE_ constant|null )
1233 */
1234 public static function parseTarget( $target ) {
1235 # We may have been through this before
1236 if ( $target instanceof User ) {
1237 if ( IP::isValid( $target->getName() ) ) {
1238 return array( $target, self::TYPE_IP );
1239 } else {
1240 return array( $target, self::TYPE_USER );
1241 }
1242 } elseif ( $target === null ) {
1243 return array( null, null );
1244 }
1245
1246 $target = trim( $target );
1247
1248 if ( IP::isValid( $target ) ) {
1249 # We can still create a User if it's an IP address, but we need to turn
1250 # off validation checking (which would exclude IP addresses)
1251 return array(
1252 User::newFromName( IP::sanitizeIP( $target ), false ),
1253 Block::TYPE_IP
1254 );
1255
1256 } elseif ( IP::isValidBlock( $target ) ) {
1257 # Can't create a User from an IP range
1258 return array( IP::sanitizeRange( $target ), Block::TYPE_RANGE );
1259 }
1260
1261 # Consider the possibility that this is not a username at all
1262 # but actually an old subpage (bug #29797)
1263 if ( strpos( $target, '/' ) !== false ) {
1264 # An old subpage, drill down to the user behind it
1265 $parts = explode( '/', $target );
1266 $target = $parts[0];
1267 }
1268
1269 $userObj = User::newFromName( $target );
1270 if ( $userObj instanceof User ) {
1271 # Note that since numbers are valid usernames, a $target of "12345" will be
1272 # considered a User. If you want to pass a block ID, prepend a hash "#12345",
1273 # since hash characters are not valid in usernames or titles generally.
1274 return array( $userObj, Block::TYPE_USER );
1275
1276 } elseif ( preg_match( '/^#\d+$/', $target ) ) {
1277 # Autoblock reference in the form "#12345"
1278 return array( substr( $target, 1 ), Block::TYPE_AUTO );
1279
1280 } else {
1281 # WTF?
1282 return array( null, null );
1283 }
1284 }
1285
1286 /**
1287 * Get the type of target for this particular block
1288 * @return int Block::TYPE_ constant, will never be TYPE_ID
1289 */
1290 public function getType() {
1291 return $this->mAuto
1292 ? self::TYPE_AUTO
1293 : $this->type;
1294 }
1295
1296 /**
1297 * Get the target and target type for this particular Block. Note that for autoblocks,
1298 * this returns the unredacted name; frontend functions need to call $block->getRedactedName()
1299 * in this situation.
1300 * @return array( User|String, Block::TYPE_ constant )
1301 * @todo FIXME: This should be an integral part of the Block member variables
1302 */
1303 public function getTargetAndType() {
1304 return array( $this->getTarget(), $this->getType() );
1305 }
1306
1307 /**
1308 * Get the target for this particular Block. Note that for autoblocks,
1309 * this returns the unredacted name; frontend functions need to call $block->getRedactedName()
1310 * in this situation.
1311 * @return User|string
1312 */
1313 public function getTarget() {
1314 return $this->target;
1315 }
1316
1317 /**
1318 * @since 1.19
1319 *
1320 * @return mixed|string
1321 */
1322 public function getExpiry() {
1323 return $this->mExpiry;
1324 }
1325
1326 /**
1327 * Set the target for this block, and update $this->type accordingly
1328 * @param mixed $target
1329 */
1330 public function setTarget( $target ) {
1331 list( $this->target, $this->type ) = self::parseTarget( $target );
1332 }
1333
1334 /**
1335 * Get the user who implemented this block
1336 * @return User|string Local User object or string for a foreign user
1337 */
1338 public function getBlocker() {
1339 return $this->blocker;
1340 }
1341
1342 /**
1343 * Set the user who implemented (or will implement) this block
1344 * @param User|string $user Local User object or username string for foreign users
1345 */
1346 public function setBlocker( $user ) {
1347 $this->blocker = $user;
1348 }
1349
1350 /**
1351 * Get the key and parameters for the corresponding error message.
1352 *
1353 * @since 1.22
1354 * @param IContextSource $context
1355 * @return array
1356 */
1357 public function getPermissionsError( IContextSource $context ) {
1358 $blocker = $this->getBlocker();
1359 if ( $blocker instanceof User ) { // local user
1360 $blockerUserpage = $blocker->getUserPage();
1361 $link = "[[{$blockerUserpage->getPrefixedText()}|{$blockerUserpage->getText()}]]";
1362 } else { // foreign user
1363 $link = $blocker;
1364 }
1365
1366 $reason = $this->mReason;
1367 if ( $reason == '' ) {
1368 $reason = $context->msg( 'blockednoreason' )->text();
1369 }
1370
1371 /* $ip returns who *is* being blocked, $intended contains who was meant to be blocked.
1372 * This could be a username, an IP range, or a single IP. */
1373 $intended = $this->getTarget();
1374
1375 $lang = $context->getLanguage();
1376 return array(
1377 $this->mAuto ? 'autoblockedtext' : 'blockedtext',
1378 $link,
1379 $reason,
1380 $context->getRequest()->getIP(),
1381 $this->getByName(),
1382 $this->getId(),
1383 $lang->formatExpiry( $this->mExpiry ),
1384 (string)$intended,
1385 $lang->userTimeAndDate( $this->mTimestamp, $context->getUser() ),
1386 );
1387 }
1388 }