make it a bit cleared: users should not modify the file
[lhc/web/wiklou.git] / includes / SpecialBlockip.php
1 <?php
2 /**
3 * Constructor for Special:Blockip page
4 *
5 * @package MediaWiki
6 * @subpackage SpecialPage
7 */
8
9 /**
10 * Constructor
11 */
12 function wfSpecialBlockip( $par ) {
13 global $wgUser, $wgOut, $wgRequest;
14
15 if ( ! $wgUser->isAllowed('block') ) {
16 $wgOut->sysopRequired();
17 return;
18 }
19 $ipb = new IPBlockForm( $par );
20
21 $action = $wgRequest->getVal( 'action' );
22 if ( 'success' == $action ) {
23 $ipb->showSuccess();
24 } else if ( $wgRequest->wasPosted() && 'submit' == $action &&
25 $wgUser->matchEditToken( $wgRequest->getVal( 'wpEditToken' ) ) ) {
26 $ipb->doSubmit();
27 } else {
28 $ipb->showForm( '' );
29 }
30 }
31
32 /**
33 * Form object
34 *
35 * @package MediaWiki
36 * @subpackage SpecialPage
37 */
38 class IPBlockForm {
39 var $BlockAddress, $BlockExpiry, $BlockReason;
40
41 function IPBlockForm( $par ) {
42 global $wgRequest;
43
44 $this->BlockAddress = $wgRequest->getVal( 'wpBlockAddress', $wgRequest->getVal( 'ip', $par ) );
45 $this->BlockReason = $wgRequest->getText( 'wpBlockReason' );
46 $this->BlockExpiry = $wgRequest->getVal( 'wpBlockExpiry', wfMsg('ipbotheroption') );
47 $this->BlockOther = $wgRequest->getVal( 'wpBlockOther', '' );
48 }
49
50 function showForm( $err ) {
51 global $wgOut, $wgUser, $wgRequest, $wgSysopUserBans;
52
53 $wgOut->setPagetitle( wfMsg( 'blockip' ) );
54 $wgOut->addWikiText( wfMsg( 'blockiptext' ) );
55
56 if($wgSysopUserBans) {
57 $mIpaddress = wfMsgHtml( 'ipadressorusername' );
58 } else {
59 $mIpaddress = wfMsgHtml( 'ipaddress' );
60 }
61 $mIpbexpiry = wfMsgHtml( 'ipbexpiry' );
62 $mIpbother = wfMsgHtml( 'ipbother' );
63 $mIpbothertime = wfMsgHtml( 'ipbotheroption' );
64 $mIpbreason = wfMsgHtml( 'ipbreason' );
65 $mIpbsubmit = wfMsgHtml( 'ipbsubmit' );
66 $titleObj = Title::makeTitle( NS_SPECIAL, 'Blockip' );
67 $action = $titleObj->escapeLocalURL( "action=submit" );
68
69 if ( "" != $err ) {
70 $wgOut->setSubtitle( wfMsgHtml( 'formerror' ) );
71 $wgOut->addHTML( "<p class='error'>{$err}</p>\n" );
72 }
73
74 $scBlockAddress = htmlspecialchars( $this->BlockAddress );
75 $scBlockExpiry = htmlspecialchars( $this->BlockExpiry );
76 $scBlockReason = htmlspecialchars( $this->BlockReason );
77 $scBlockOtherTime = htmlspecialchars( $this->BlockOther );
78 $scBlockExpiryOptions = htmlspecialchars( wfMsgForContent( 'ipboptions' ) );
79
80 $showblockoptions = $scBlockExpiryOptions != '-';
81 if (!$showblockoptions)
82 $mIpbother = $mIpbexpiry;
83
84 $blockExpiryFormOptions = "<option value=\"other\">$mIpbothertime</option>";
85 foreach (explode(',', $scBlockExpiryOptions) as $option) {
86 if ( strpos($option, ":") === false ) $option = "$option:$option";
87 list($show, $value) = explode(":", $option);
88 $show = htmlspecialchars($show);
89 $value = htmlspecialchars($value);
90 $selected = "";
91 if ($this->BlockExpiry === $value)
92 $selected = ' selected="selected"';
93 $blockExpiryFormOptions .= "<option value=\"$value\"$selected>$show</option>";
94 }
95
96 $token = htmlspecialchars( $wgUser->editToken() );
97
98 $wgOut->addHTML( "
99 <form id=\"blockip\" method=\"post\" action=\"{$action}\">
100 <table border='0'>
101 <tr>
102 <td align=\"right\">{$mIpaddress}:</td>
103 <td align=\"left\">
104 <input tabindex='1' type='text' size='20' name=\"wpBlockAddress\" value=\"{$scBlockAddress}\" />
105 </td>
106 </tr>
107 <tr>");
108 if ($showblockoptions) {
109 $wgOut->addHTML("
110 <td align=\"right\">{$mIpbexpiry}:</td>
111 <td align=\"left\">
112 <select tabindex='2' id='wpBlockExpiry' name=\"wpBlockExpiry\" onchange=\"considerChangingExpiryFocus()\">
113 $blockExpiryFormOptions
114 </select>
115 </td>
116 ");
117 }
118 $wgOut->addHTML("
119 </tr>
120 <tr id='wpBlockOther'>
121 <td align=\"right\">{$mIpbother}:</td>
122 <td align=\"left\">
123 <input tabindex='3' type='text' size='40' name=\"wpBlockOther\" value=\"{$scBlockOtherTime}\" />
124 </td>
125 </tr>
126 <tr>
127 <td align=\"right\">{$mIpbreason}:</td>
128 <td align=\"left\">
129 <input tabindex='3' type='text' size='40' name=\"wpBlockReason\" value=\"{$scBlockReason}\" />
130 </td>
131 </tr>
132 <tr>
133 <td>&nbsp;</td>
134 <td align=\"left\">
135 <input tabindex='4' type='submit' name=\"wpBlock\" value=\"{$mIpbsubmit}\" />
136 </td>
137 </tr>
138 </table>
139 <input type='hidden' name='wpEditToken' value=\"{$token}\" />
140 </form>\n" );
141
142 }
143
144 function doSubmit() {
145 global $wgOut, $wgUser, $wgSysopUserBans, $wgSysopRangeBans;
146
147 $userId = 0;
148 $this->BlockAddress = trim( $this->BlockAddress );
149 $rxIP = '\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}';
150
151 # Check for invalid specifications
152 if ( ! preg_match( "/^$rxIP$/", $this->BlockAddress ) ) {
153 if ( preg_match( "/^($rxIP)\\/(\\d{1,2})$/", $this->BlockAddress, $matches ) ) {
154 if ( $wgSysopRangeBans ) {
155 if ( $matches[2] > 31 || $matches[2] < 16 ) {
156 $this->showForm( wfMsg( 'ip_range_invalid' ) );
157 return;
158 }
159 $this->BlockAddress = Block::normaliseRange( $this->BlockAddress );
160 } else {
161 # Range block illegal
162 $this->showForm( wfMsg( 'range_block_disabled' ) );
163 return;
164 }
165 } else {
166 # Username block
167 if ( $wgSysopUserBans ) {
168 $userId = User::idFromName( $this->BlockAddress );
169 if ( $userId == 0 ) {
170 $this->showForm( wfMsg( 'nosuchusershort', htmlspecialchars( $this->BlockAddress ) ) );
171 return;
172 }
173 } else {
174 $this->showForm( wfMsg( 'badipaddress' ) );
175 return;
176 }
177 }
178 }
179
180 $expirestr = $this->BlockExpiry;
181 if( $expirestr == 'other' )
182 $expirestr = $this->BlockOther;
183
184 if (strlen($expirestr) == 0) {
185 $this->showForm( wfMsg( 'ipb_expiry_invalid' ) );
186 return;
187 }
188
189 if ( $expirestr == 'infinite' || $expirestr == 'indefinite' ) {
190 $expiry = '';
191 } else {
192 # Convert GNU-style date, on error returns -1 for PHP <5.1 and false for PHP >=5.1
193 $expiry = strtotime( $expirestr );
194
195 if ( $expiry < 0 || $expiry === false ) {
196 $this->showForm( wfMsg( 'ipb_expiry_invalid' ) );
197 return;
198 }
199
200 $expiry = wfTimestamp( TS_MW, $expiry );
201
202 }
203
204 # Create block
205 # Note: for a user block, ipb_address is only for display purposes
206
207 $ban = new Block( $this->BlockAddress, $userId, $wgUser->getID(),
208 $this->BlockReason, wfTimestampNow(), 0, $expiry );
209
210 if (wfRunHooks('BlockIp', array(&$ban, &$wgUser))) {
211
212 $ban->insert();
213
214 wfRunHooks('BlockIpComplete', array($ban, $wgUser));
215
216 # Make log entry
217 $log = new LogPage( 'block' );
218 $log->addEntry( 'block', Title::makeTitle( NS_USER, $this->BlockAddress ),
219 $this->BlockReason, $expirestr );
220
221 # Report to the user
222 $titleObj = Title::makeTitle( NS_SPECIAL, 'Blockip' );
223 $wgOut->redirect( $titleObj->getFullURL( 'action=success&ip=' .
224 urlencode( $this->BlockAddress ) ) );
225 }
226 }
227
228 function showSuccess() {
229 global $wgOut, $wgUser;
230
231 $wgOut->setPagetitle( wfMsg( 'blockip' ) );
232 $wgOut->setSubtitle( wfMsg( 'blockipsuccesssub' ) );
233 $text = wfMsg( 'blockipsuccesstext', $this->BlockAddress );
234 $wgOut->addWikiText( $text );
235 }
236 }
237
238 ?>