forked from GNUsocial/gnu-social
559 lines
17 KiB
PHP
559 lines
17 KiB
PHP
<?php
|
|
/**
|
|
* StatusNet, the distributed open-source microblogging tool
|
|
*
|
|
* Plugin to prevent use of nicknames or URLs on a blacklist
|
|
*
|
|
* PHP version 5
|
|
*
|
|
* LICENCE: This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Affero General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Affero General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
* @category Action
|
|
* @package StatusNet
|
|
* @author Evan Prodromou <evan@status.net>
|
|
* @copyright 2010 StatusNet Inc.
|
|
* @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
|
|
* @link http://status.net/
|
|
*/
|
|
|
|
if (!defined('STATUSNET')) {
|
|
exit(1);
|
|
}
|
|
|
|
/**
|
|
* Plugin to prevent use of nicknames or URLs on a blacklist
|
|
*
|
|
* @category Plugin
|
|
* @package StatusNet
|
|
* @author Evan Prodromou <evan@status.net>
|
|
* @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
|
|
* @link http://status.net/
|
|
*/
|
|
class BlacklistPlugin extends Plugin
|
|
{
|
|
const VERSION = STATUSNET_VERSION;
|
|
|
|
public $nicknames = array();
|
|
public $urls = array();
|
|
public $canAdmin = true;
|
|
|
|
function _getNicknamePatterns()
|
|
{
|
|
$confNicknames = $this->_configArray('blacklist', 'nicknames');
|
|
|
|
$dbNicknames = Nickname_blacklist::getPatterns();
|
|
|
|
return array_merge($this->nicknames,
|
|
$confNicknames,
|
|
$dbNicknames);
|
|
}
|
|
|
|
function _getUrlPatterns()
|
|
{
|
|
$confURLs = $this->_configArray('blacklist', 'urls');
|
|
|
|
$dbURLs = Homepage_blacklist::getPatterns();
|
|
|
|
return array_merge($this->urls,
|
|
$confURLs,
|
|
$dbURLs);
|
|
}
|
|
|
|
/**
|
|
* Database schema setup
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onCheckSchema()
|
|
{
|
|
$schema = Schema::get();
|
|
|
|
// For storing blacklist patterns for nicknames
|
|
$schema->ensureTable('nickname_blacklist',
|
|
array(new ColumnDef('pattern',
|
|
'varchar',
|
|
255,
|
|
false,
|
|
'PRI'),
|
|
new ColumnDef('created',
|
|
'datetime',
|
|
null,
|
|
false)));
|
|
|
|
$schema->ensureTable('homepage_blacklist',
|
|
array(new ColumnDef('pattern',
|
|
'varchar',
|
|
255,
|
|
false,
|
|
'PRI'),
|
|
new ColumnDef('created',
|
|
'datetime',
|
|
null,
|
|
false)));
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Retrieve an array from configuration
|
|
*
|
|
* Carefully checks a section.
|
|
*
|
|
* @param string $section Configuration section
|
|
* @param string $setting Configuration setting
|
|
*
|
|
* @return array configuration values
|
|
*/
|
|
function _configArray($section, $setting)
|
|
{
|
|
$config = common_config($section, $setting);
|
|
|
|
if (empty($config)) {
|
|
return array();
|
|
} else if (is_array($config)) {
|
|
return $config;
|
|
} else if (is_string($config)) {
|
|
return explode("\r\n", $config);
|
|
} else {
|
|
// TRANS: Exception thrown if the Blacklist plugin configuration is incorrect.
|
|
// TRANS: %1$s is a configuration section, %2$s is a configuration setting.
|
|
throw new Exception(sprintf(_m('Unknown data type for config %1$s + %2$s.'),$section, $setting));
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Hook registration to prevent blacklisted homepages or nicknames
|
|
*
|
|
* Throws an exception if there's a blacklisted homepage or nickname.
|
|
*
|
|
* @param Action $action Action being called (usually register)
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onStartRegisterUser(&$user, &$profile)
|
|
{
|
|
$homepage = strtolower($profile->homepage);
|
|
|
|
if (!empty($homepage)) {
|
|
if (!$this->_checkUrl($homepage)) {
|
|
// TRANS: Validation failure for URL. %s is the URL.
|
|
$msg = sprintf(_m("You may not register with homepage \"%s\"."),
|
|
$homepage);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
$nickname = strtolower($profile->nickname);
|
|
|
|
if (!empty($nickname)) {
|
|
if (!$this->_checkNickname($nickname)) {
|
|
// TRANS: Validation failure for nickname. %s is the nickname.
|
|
$msg = sprintf(_m("You may not register with nickname \"%s\"."),
|
|
$nickname);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Hook profile update to prevent blacklisted homepages or nicknames
|
|
*
|
|
* Throws an exception if there's a blacklisted homepage or nickname.
|
|
*
|
|
* @param Action $action Action being called (usually register)
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onStartProfileSaveForm($action)
|
|
{
|
|
$homepage = strtolower($action->trimmed('homepage'));
|
|
|
|
if (!empty($homepage)) {
|
|
if (!$this->_checkUrl($homepage)) {
|
|
// TRANS: Validation failure for URL. %s is the URL.
|
|
$msg = sprintf(_m("You may not use homepage \"%s\"."),
|
|
$homepage);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
$nickname = strtolower($action->trimmed('nickname'));
|
|
|
|
if (!empty($nickname)) {
|
|
if (!$this->_checkNickname($nickname)) {
|
|
// TRANS: Validation failure for nickname. %s is the nickname.
|
|
$msg = sprintf(_m("You may not use nickname \"%s\"."),
|
|
$nickname);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Hook notice save to prevent blacklisted urls
|
|
*
|
|
* Throws an exception if there's a blacklisted url in the content.
|
|
*
|
|
* @param Notice &$notice Notice being saved
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onStartNoticeSave(&$notice)
|
|
{
|
|
common_replace_urls_callback($notice->content,
|
|
array($this, 'checkNoticeUrl'));
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Helper callback for notice save
|
|
*
|
|
* Throws an exception if there's a blacklisted url in the content.
|
|
*
|
|
* @param string $url URL in the notice content
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function checkNoticeUrl($url)
|
|
{
|
|
// It comes in special'd, so we unspecial it
|
|
// before comparing against patterns
|
|
|
|
$url = htmlspecialchars_decode($url);
|
|
|
|
if (!$this->_checkUrl($url)) {
|
|
// TRANS: Validation failure for URL. %s is the URL.
|
|
$msg = sprintf(_m("You may not use URL \"%s\" in notices."),
|
|
$url);
|
|
throw new ClientException($msg);
|
|
}
|
|
|
|
return $url;
|
|
}
|
|
|
|
/**
|
|
* Helper for checking URLs
|
|
*
|
|
* Checks an URL against our patterns for a match.
|
|
*
|
|
* @param string $url URL to check
|
|
*
|
|
* @return boolean true means it's OK, false means it's bad
|
|
*/
|
|
private function _checkUrl($url)
|
|
{
|
|
$patterns = $this->_getUrlPatterns();
|
|
|
|
foreach ($patterns as $pattern) {
|
|
if ($pattern != '' && preg_match("/$pattern/", $url)) {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Helper for checking nicknames
|
|
*
|
|
* Checks a nickname against our patterns for a match.
|
|
*
|
|
* @param string $nickname nickname to check
|
|
*
|
|
* @return boolean true means it's OK, false means it's bad
|
|
*/
|
|
private function _checkNickname($nickname)
|
|
{
|
|
$patterns = $this->_getNicknamePatterns();
|
|
|
|
foreach ($patterns as $pattern) {
|
|
if ($pattern != '' && preg_match("/$pattern/", $nickname)) {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Add our actions to the URL router
|
|
*
|
|
* @param Net_URL_Mapper $m URL mapper for this hit
|
|
*
|
|
* @return boolean hook return
|
|
*/
|
|
function onRouterInitialized($m)
|
|
{
|
|
$m->connect('panel/blacklist', array('action' => 'blacklistadminpanel'));
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Auto-load our classes if called
|
|
*
|
|
* @param string $cls Class to load
|
|
*
|
|
* @return boolean hook return
|
|
*/
|
|
function onAutoload($cls)
|
|
{
|
|
switch (strtolower($cls))
|
|
{
|
|
case 'nickname_blacklist':
|
|
case 'homepage_blacklist':
|
|
include_once INSTALLDIR.'/plugins/Blacklist/'.ucfirst($cls).'.php';
|
|
return false;
|
|
case 'blacklistadminpanelaction':
|
|
$base = strtolower(mb_substr($cls, 0, -6));
|
|
include_once INSTALLDIR.'/plugins/Blacklist/'.$base.'.php';
|
|
return false;
|
|
default:
|
|
return true;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Plugin version data
|
|
*
|
|
* @param array &$versions array of version blocks
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onPluginVersion(&$versions)
|
|
{
|
|
$versions[] = array('name' => 'Blacklist',
|
|
'version' => self::VERSION,
|
|
'author' => 'Evan Prodromou',
|
|
'homepage' =>
|
|
'http://status.net/wiki/Plugin:Blacklist',
|
|
'description' =>
|
|
// TRANS: Plugin description.
|
|
_m('Keeps a blacklist of forbidden nickname '.
|
|
'and URL patterns.'));
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Determines if our admin panel can be shown
|
|
*
|
|
* @param string $name name of the admin panel
|
|
* @param boolean &$isOK result
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onAdminPanelCheck($name, &$isOK)
|
|
{
|
|
if ($name == 'blacklist') {
|
|
$isOK = $this->canAdmin;
|
|
return false;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Add our tab to the admin panel
|
|
*
|
|
* @param Widget $nav Admin panel nav
|
|
*
|
|
* @return boolean hook value
|
|
*/
|
|
function onEndAdminPanelNav($nav)
|
|
{
|
|
if (AdminPanelAction::canAdmin('blacklist')) {
|
|
|
|
$action_name = $nav->action->trimmed('action');
|
|
|
|
$nav->out->menuItem(common_local_url('blacklistadminpanel'),
|
|
// TRANS: Menu item in admin panel.
|
|
_m('MENU','Blacklist'),
|
|
// TRANS: Tooltip for menu item in admin panel.
|
|
_m('TOOLTIP','Blacklist configuration.'),
|
|
$action_name == 'blacklistadminpanel',
|
|
'nav_blacklist_admin_panel');
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
function onEndDeleteUserForm($action, $user)
|
|
{
|
|
$cur = common_current_user();
|
|
|
|
if (empty($cur) || !$cur->hasRight(Right::CONFIGURESITE)) {
|
|
return;
|
|
}
|
|
|
|
$profile = $user->getProfile();
|
|
|
|
if (empty($profile)) {
|
|
return;
|
|
}
|
|
|
|
$action->elementStart('ul', 'form_data');
|
|
$action->elementStart('li');
|
|
$this->checkboxAndText($action,
|
|
'blacklistnickname',
|
|
// TRANS: Checkbox label in the blacklist user form.
|
|
_m('Add this nickname pattern to blacklist'),
|
|
'blacklistnicknamepattern',
|
|
$this->patternizeNickname($user->nickname));
|
|
$action->elementEnd('li');
|
|
|
|
if (!empty($profile->homepage)) {
|
|
$action->elementStart('li');
|
|
$this->checkboxAndText($action,
|
|
'blacklisthomepage',
|
|
// TRANS: Checkbox label in the blacklist user form.
|
|
_m('Add this homepage pattern to blacklist'),
|
|
'blacklisthomepagepattern',
|
|
$this->patternizeHomepage($profile->homepage));
|
|
$action->elementEnd('li');
|
|
}
|
|
|
|
$action->elementEnd('ul');
|
|
}
|
|
|
|
function onEndDeleteUser($action, $user)
|
|
{
|
|
if ($action->boolean('blacklisthomepage')) {
|
|
$pattern = $action->trimmed('blacklisthomepagepattern');
|
|
Homepage_blacklist::ensurePattern($pattern);
|
|
}
|
|
|
|
if ($action->boolean('blacklistnickname')) {
|
|
$pattern = $action->trimmed('blacklistnicknamepattern');
|
|
Nickname_blacklist::ensurePattern($pattern);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
function checkboxAndText($action, $checkID, $label, $textID, $value)
|
|
{
|
|
$action->element('input', array('name' => $checkID,
|
|
'type' => 'checkbox',
|
|
'class' => 'checkbox',
|
|
'id' => $checkID));
|
|
|
|
$action->text(' ');
|
|
|
|
$action->element('label', array('class' => 'checkbox',
|
|
'for' => $checkID),
|
|
$label);
|
|
|
|
$action->text(' ');
|
|
|
|
$action->element('input', array('name' => $textID,
|
|
'type' => 'text',
|
|
'id' => $textID,
|
|
'value' => $value));
|
|
}
|
|
|
|
function patternizeNickname($nickname)
|
|
{
|
|
return $nickname;
|
|
}
|
|
|
|
function patternizeHomepage($homepage)
|
|
{
|
|
$hostname = parse_url($homepage, PHP_URL_HOST);
|
|
return $hostname;
|
|
}
|
|
|
|
function onStartHandleFeedEntry($activity)
|
|
{
|
|
return $this->_checkActivity($activity);
|
|
}
|
|
|
|
function onStartHandleSalmon($activity)
|
|
{
|
|
return $this->_checkActivity($activity);
|
|
}
|
|
|
|
function _checkActivity($activity)
|
|
{
|
|
$actor = $activity->actor;
|
|
|
|
if (empty($actor)) {
|
|
return true;
|
|
}
|
|
|
|
$homepage = strtolower($actor->link);
|
|
|
|
if (!empty($homepage)) {
|
|
if (!$this->_checkUrl($homepage)) {
|
|
// TRANS: Exception thrown trying to post a notice while having set a blocked homepage URL. %s is the blocked URL.
|
|
$msg = sprintf(_m("Users from \"%s\" are blocked."),
|
|
$homepage);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
if (!empty($actor->poco)) {
|
|
$nickname = strtolower($actor->poco->preferredUsername);
|
|
|
|
if (!empty($nickname)) {
|
|
if (!$this->_checkNickname($nickname)) {
|
|
// TRANS: Exception thrown trying to post a notice while having a blocked nickname. %s is the blocked nickname.
|
|
$msg = sprintf(_m("Notices from nickname \"%s\" disallowed."),
|
|
$nickname);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Check URLs and homepages for blacklisted users.
|
|
*/
|
|
function onStartSubscribe($subscriber, $other)
|
|
{
|
|
foreach (array($other->profileurl, $other->homepage) as $url) {
|
|
|
|
if (empty($url)) {
|
|
continue;
|
|
}
|
|
|
|
$url = strtolower($url);
|
|
|
|
if (!$this->_checkUrl($url)) {
|
|
// TRANS: Client exception thrown trying to subscribe to a person with a blocked homepage or site URL. %s is the blocked URL.
|
|
$msg = sprintf(_m("Users from \"%s\" are blocked."),
|
|
$url);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
$nickname = $other->nickname;
|
|
|
|
if (!empty($nickname)) {
|
|
if (!$this->_checkNickname($nickname)) {
|
|
// TRANS: Client exception thrown trying to subscribe to a person with a blocked nickname. %s is the blocked nickname.
|
|
$msg = sprintf(_m("Cannot subscribe to nickname \"%s\"."),
|
|
$nickname);
|
|
throw new ClientException($msg);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
}
|