4 * Description: block people
6 * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
9 use Friendica\Core\Hook;
10 use Friendica\Core\L10n;
11 use Friendica\Core\PConfig;
13 use Friendica\Util\Strings;
15 function superblock_install()
17 Hook::register('addon_settings', 'addon/superblock/superblock.php', 'superblock_addon_settings');
18 Hook::register('addon_settings_post', 'addon/superblock/superblock.php', 'superblock_addon_settings_post');
19 Hook::register('conversation_start', 'addon/superblock/superblock.php', 'superblock_conversation_start');
20 Hook::register('item_photo_menu', 'addon/superblock/superblock.php', 'superblock_item_photo_menu');
21 Hook::register('enotify_store', 'addon/superblock/superblock.php', 'superblock_enotify_store');
24 function superblock_uninstall()
26 Hook::unregister('addon_settings', 'addon/superblock/superblock.php', 'superblock_addon_settings');
27 Hook::unregister('addon_settings_post', 'addon/superblock/superblock.php', 'superblock_addon_settings_post');
28 Hook::unregister('conversation_start', 'addon/superblock/superblock.php', 'superblock_conversation_start');
29 Hook::unregister('item_photo_menu', 'addon/superblock/superblock.php', 'superblock_item_photo_menu');
30 Hook::unregister('enotify_store', 'addon/superblock/superblock.php', 'superblock_enotify_store');
33 function superblock_addon_settings(&$a, &$s)
39 /* Add our stylesheet to the page so we can make our settings look nice */
41 DI::page()['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . DI::baseUrl()->get() . '/addon/superblock/superblock.css' . '" media="all" />' . "\r\n";
43 $words = DI::pConfig()->get(local_user(), 'system', 'blocked');
48 $s .= '<span id="settings_superblock_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_superblock_expanded\'); openClose(\'settings_superblock_inflated\');">';
49 $s .= '<h3>' . L10n::t('Superblock') . '</h3>';
51 $s .= '<div id="settings_superblock_expanded" class="settings-block" style="display: none;">';
52 $s .= '<span class="fakelink" onclick="openClose(\'settings_superblock_expanded\'); openClose(\'settings_superblock_inflated\');">';
53 $s .= '<h3>' . L10n::t('Superblock') . '</h3>';
55 $s .= '<div id="superblock-wrapper">';
56 $s .= '<label id="superblock-label" for="superblock-words">' . L10n::t('Comma separated profile URLS to block') . ' </label>';
57 $s .= '<textarea id="superblock-words" type="text" name="superblock-words" >' . htmlspecialchars($words) . '</textarea>';
58 $s .= '</div><div class="clear"></div>';
60 $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="superblock-submit" name="superblock-submit" class="settings-submit" value="' . L10n::t('Save Settings') . '" /></div></div>';
65 function superblock_addon_settings_post(&$a, &$b)
71 if (!empty($_POST['superblock-submit'])) {
72 PConfig::set(local_user(), 'system', 'blocked',trim($_POST['superblock-words']));
73 info(L10n::t('SUPERBLOCK Settings saved.') . EOL);
77 function superblock_enotify_store(&$a,&$b) {
79 $words = DI::pConfig()->get($b['uid'], 'system', 'blocked');
81 $arr = explode(',', $words);
88 foreach ($arr as $word) {
89 if (!strlen(trim($word))) {
93 if (Strings::compareLink($b['url'], $word)) {
105 function superblock_conversation_start(&$a, &$b)
111 $words = DI::pConfig()->get(local_user(), 'system', 'blocked');
113 $a->data['superblock'] = explode(',', $words);
115 DI::page()['htmlhead'] .= <<< EOT
118 function superblockBlock(author) {
119 $.get('superblock?block=' +author, function(data) {
120 location.reload(true);
129 function superblock_item_photo_menu(&$a, &$b)
131 if (!local_user() || $b['item']['self']) {
136 $author = $b['item']['author-link'];
137 if (!empty($a->data['superblock'])) {
138 foreach ($a->data['superblock'] as $bloke) {
139 if (Strings::compareLink($bloke, $author)) {
146 $b['menu'][L10n::t('Block Completely')] = 'javascript:superblockBlock(\'' . $author . '\'); return false;';
149 function superblock_module() {}
152 function superblock_init(&$a)
158 $words = DI::pConfig()->get(local_user(), 'system', 'blocked');
160 if (array_key_exists('block', $_GET) && $_GET['block']) {
163 $words .= trim($_GET['block']);
166 PConfig::set(local_user(), 'system', 'blocked', $words);
167 info(L10n::t('superblock settings updated') . EOL );