GPL Headers for all!
[lhc/web/wiklou.git] / includes / specials / SpecialBlockme.php
1 <?php
2 /**
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License along
15 * with this program; if not, write to the Free Software Foundation, Inc.,
16 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17 * http://www.gnu.org/copyleft/gpl.html
18 */
19
20 /**
21 * @file
22 * @ingroup SpecialPage
23 */
24
25 function wfSpecialBlockme() {
26 global $wgRequest, $wgBlockOpenProxies, $wgOut, $wgProxyKey;
27
28 $ip = wfGetIP();
29
30 if( !$wgBlockOpenProxies || $wgRequest->getText( 'ip' ) != md5( $ip . $wgProxyKey ) ) {
31 $wgOut->addWikiMsg( 'proxyblocker-disabled' );
32 return;
33 }
34
35 $blockerName = wfMsg( "proxyblocker" );
36 $reason = wfMsg( "proxyblockreason" );
37
38 $u = User::newFromName( $blockerName );
39 $id = $u->idForName();
40 if ( !$id ) {
41 $u = User::newFromName( $blockerName );
42 $u->addToDatabase();
43 $u->setPassword( bin2hex( mt_rand(0, 0x7fffffff ) ) );
44 $u->saveSettings();
45 $id = $u->getID();
46 }
47
48 $block = new Block( $ip, 0, $id, $reason, wfTimestampNow() );
49 $block->insert();
50
51 $wgOut->addWikiMsg( "proxyblocksuccess" );
52 }