3 * StatusNet - the distributed open-source microblogging tool
4 * Copyright (C) 2010, StatusNet, Inc.
6 * Throttle registration by IP address
10 * This program is free software: you can redistribute it and/or modify
11 * it under the terms of the GNU Affero General Public License as published by
12 * the Free Software Foundation, either version 3 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU Affero General Public License for more details.
20 * You should have received a copy of the GNU Affero General Public License
21 * along with this program. If not, see <http://www.gnu.org/licenses/>.
25 * @author Evan Prodromou <evan@status.net>
26 * @copyright 2010 StatusNet, Inc.
27 * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html AGPL 3.0
28 * @link http://status.net/
31 if (!defined('GNUSOCIAL')) { exit(1); }
34 * Throttle registration by IP address
36 * We a) record IP address of registrants and b) throttle registrations.
40 * @author Evan Prodromou <evan@status.net>
41 * @copyright 2010 StatusNet, Inc.
42 * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html AGPL 3.0
43 * @link http://status.net/
46 class RegisterThrottlePlugin extends Plugin
49 * Array of time spans in seconds to limits.
51 * Default is 3 registrations per hour, 5 per day, 10 per week.
53 public $regLimits = array(604800 => 10, // per week
54 86400 => 5, // per day
55 3600 => 3); // per hour
58 * Disallow registration if a silenced user has registered from
61 public $silenced = true;
64 * Whether we're enabled; prevents recursion.
66 static private $enabled = true;
69 * Database schema setup
71 * We store user registrations in a table registration_ip.
73 * @return boolean hook value; true means continue processing, false means stop.
75 public function onCheckSchema()
77 $schema = Schema::get();
79 // For storing user-submitted flags on profiles
80 $schema->ensureTable('registration_ip', Registration_ip::schemaDef());
85 * Called when someone tries to register.
87 * We check the IP here to determine if it goes over any of our
90 * @param Action $action Action that is being executed
92 * @return boolean hook value
94 public function onStartRegistrationTry($action)
96 $ipaddress = $this->_getIpAddress();
98 if (empty($ipaddress)) {
99 // TRANS: Server exception thrown when no IP address can be found for a registation attempt.
100 throw new ServerException(_m('Cannot find IP address.'));
103 foreach ($this->regLimits as $seconds => $limit) {
105 $this->debug("Checking $seconds ($limit)");
107 $reg = $this->_getNthReg($ipaddress, $limit);
110 $this->debug("Got a {$limit}th registration.");
111 $regtime = strtotime($reg->created);
113 $this->debug("Comparing {$regtime} to {$now}");
114 if ($now - $regtime < $seconds) {
115 // TRANS: Exception thrown when too many user have registered from one IP address within a given time frame.
116 throw new Exception(_m('Too many registrations. Take a break and try again later.'));
121 // Check for silenced users
123 if ($this->silenced) {
124 $ids = Registration_ip::usersByIP($ipaddress);
125 foreach ($ids as $id) {
126 $profile = Profile::getKV('id', $id);
127 if ($profile && $profile->isSilenced()) {
128 // TRANS: Exception thrown when attempting to register from an IP address from which silenced users have registered.
129 throw new Exception(_m('A banned user has registered from this address.'));
137 function onEndShowSections(Action $action)
139 if (!$action instanceof ShowstreamAction) {
140 // early return for actions we're not interested in
144 $scoped = $action->getScoped();
145 if (!$scoped instanceof Profile || !$scoped->hasRight(self::VIEWMODLOG)) {
146 // only continue if we are allowed to VIEWMODLOG
150 $ri = Registration_ip::getKV('user_id', $profile->id);
152 if ($ri instanceof Registration_ip) {
153 $ipaddress = $ri->ipaddress;
157 $action->elementStart('div', array('id' => 'entity_mod_log',
158 'class' => 'section'));
160 $action->element('h2', null, _('Registration IP'));
162 $action->element('strong', null, _('Registered from:'));
163 $action->element('span', ['class'=>'ipaddress'], $ipaddress ?: 'unknown');
165 $action->elementEnd('div');
169 * Called after someone registers, by any means.
171 * We record the successful registration and IP address.
173 * @param Profile $profile new user's profile
175 * @return boolean hook value
177 public function onEndUserRegister(Profile $profile)
179 $ipaddress = $this->_getIpAddress();
181 if (empty($ipaddress)) {
182 // User registration can happen from command-line scripts etc.
186 $reg = new Registration_ip();
188 $reg->user_id = $profile->id;
189 $reg->ipaddress = $ipaddress;
190 $reg->created = common_sql_now();
192 $result = $reg->insert();
194 if ($result === false) {
195 common_log_db_error($reg, 'INSERT', __FILE__);
196 // @todo throw an exception?
203 * Check the version of the plugin.
205 * @param array &$versions Version array.
207 * @return boolean hook value
209 public function onPluginVersion(array &$versions)
211 $versions[] = array('name' => 'RegisterThrottle',
212 'version' => GNUSOCIAL_VERSION,
213 'author' => 'Evan Prodromou',
214 'homepage' => 'http://status.net/wiki/Plugin:RegisterThrottle',
216 // TRANS: Plugin description.
217 _m('Throttles excessive registration from a single IP address.'));
222 * Gets the current IP address.
224 * @return string IP address or null if not found.
226 private function _getIpAddress()
228 $keys = array('HTTP_X_FORWARDED_FOR',
233 foreach ($keys as $k) {
234 if (!empty($_SERVER[$k])) {
243 * Gets the Nth registration with the given IP address.
245 * @param string $ipaddress Address to key on
246 * @param integer $n Nth address
248 * @return Registration_ip nth registration or null if not found.
250 private function _getNthReg($ipaddress, $n)
252 $reg = new Registration_ip();
254 $reg->ipaddress = $ipaddress;
256 $reg->orderBy('created DESC');
257 $reg->limit($n - 1, 1);
259 if ($reg->find(true)) {
267 * When silencing a user, silence all other users registered from that IP
270 * @param Profile $profile Person getting a new role
271 * @param string $role Role being assigned like 'moderator' or 'silenced'
273 * @return boolean hook value
275 public function onEndGrantRole($profile, $role)
277 if (!self::$enabled) {
281 if ($role != Profile_role::SILENCED) {
285 if (!$this->silenced) {
289 $ri = Registration_ip::getKV('user_id', $profile->id);
295 $ids = Registration_ip::usersByIP($ri->ipaddress);
297 foreach ($ids as $id) {
298 if ($id == $profile->id) {
302 $other = Profile::getKV('id', $id);
308 if ($other->isSilenced()) {
312 $old = self::$enabled;
313 self::$enabled = false;
315 self::$enabled = $old;