trailing whitespace removal
[lhc/web/wiklou.git] / includes / SpecialBlockme.php
1 <?php
2 /**
3 *
4 * @package MediaWiki
5 * @subpackage SpecialPage
6 */
7
8 /**
9 *
10 */
11 function wfSpecialBlockme()
12 {
13 global $wgBlockOpenProxies, $wgOut, $wgProxyKey;
14
15 $ip = wfGetIP();
16
17 if ( !$wgBlockOpenProxies || $_REQUEST['ip'] != md5( $ip . $wgProxyKey ) ) {
18 $wgOut->addWikiText( wfMsg( "disabled" ) );
19 return;
20 }
21
22 $blockerName = wfMsg( "proxyblocker" );
23 $reason = wfMsg( "proxyblockreason" );
24 $success = wfMsg( "proxyblocksuccess" );
25
26 $u = User::newFromName( $blockerName );
27 $id = $u->idForName();
28 if ( !$id ) {
29 $u = User::newFromName( $blockerName );
30 $u->addToDatabase();
31 $u->setPassword( bin2hex( mt_rand(0, 0x7fffffff ) ) );
32 $u->saveSettings();
33 $id = $u->getID();
34 }
35
36 $block = new Block( $ip, 0, $id, $reason, wfTimestampNow() );
37 $block->insert();
38
39 $wgOut->addWikiText( $success );
40 }
41 ?>