blockem/blockem.php

   1 <?php
   2 /**
   3  * Name: blockem
   4  * Description: Allows users to hide content by collapsing posts and replies.
   5  * Version: 1.0
   6  * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
   7  *
   8  */
   9 use Friendica\Core\Addon;
  10 use Friendica\Core\L10n;
  11 use Friendica\Core\PConfig;
  12
  13 function blockem_install()
  14 {
  15         Addon::registerHook('prepare_body_content_filter', 'addon/blockem/blockem.php', 'blockem_prepare_body_content_filter');
  16         Addon::registerHook('display_item', 'addon/blockem/blockem.php', 'blockem_display_item');
  17         Addon::registerHook('addon_settings', 'addon/blockem/blockem.php', 'blockem_addon_settings');
  18         Addon::registerHook('addon_settings_post', 'addon/blockem/blockem.php', 'blockem_addon_settings_post');
  19         Addon::registerHook('conversation_start', 'addon/blockem/blockem.php', 'blockem_conversation_start');
  20         Addon::registerHook('item_photo_menu', 'addon/blockem/blockem.php', 'blockem_item_photo_menu');
  21         Addon::registerHook('enotify_store', 'addon/blockem/blockem.php', 'blockem_enotify_store');
  22 }
  23
  24 function blockem_uninstall()
  25 {
  26         Addon::unregisterHook('prepare_body_content_filter', 'addon/blockem/blockem.php', 'blockem_prepare_body_content_filter');
  27         Addon::unregisterHook('prepare_body', 'addon/blockem/blockem.php', 'blockem_prepare_body');
  28         Addon::unregisterHook('display_item', 'addon/blockem/blockem.php', 'blockem_display_item');
  29         Addon::unregisterHook('addon_settings', 'addon/blockem/blockem.php', 'blockem_addon_settings');
  30         Addon::unregisterHook('addon_settings_post', 'addon/blockem/blockem.php', 'blockem_addon_settings_post');
  31         Addon::unregisterHook('conversation_start', 'addon/blockem/blockem.php', 'blockem_conversation_start');
  32         Addon::unregisterHook('item_photo_menu', 'addon/blockem/blockem.php', 'blockem_item_photo_menu');
  33         Addon::unregisterHook('enotify_store', 'addon/blockem/blockem.php', 'blockem_enotify_store');
  34 }
  35
  36 function blockem_addon_settings(&$a, &$s)
  37 {
  38
  39         if(! local_user())
  40                 return;
  41
  42     /* Add our stylesheet to the page so we can make our settings look nice */
  43
  44     $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/blockem/blockem.css' . '" media="all" />' . "\r\n";
  45
  46
  47         $words = PConfig::get(local_user(), 'blockem', 'words');
  48         if(! $words)
  49                 $words = '';
  50
  51     $s .= '<span id="settings_blockem_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_blockem_expanded\'); openClose(\'settings_blockem_inflated\');">';
  52     $s .= '<h3>' . L10n::t('"Blockem"') . '</h3>';
  53     $s .= '</span>';
  54     $s .= '<div id="settings_blockem_expanded" class="settings-block" style="display: none;">';
  55     $s .= '<span class="fakelink" onclick="openClose(\'settings_blockem_expanded\'); openClose(\'settings_blockem_inflated\');">';
  56     $s .= '<h3>' . L10n::t('"Blockem"') . '</h3>';
  57     $s .= '</span>';
  58
  59     $s .= '<div id="blockem-wrapper">';
  60     $s .= '<div id="blockem-desc">'. L10n::t("Hides user's content by collapsing posts. Also replaces their avatar with generic image.") . ' </div>';
  61     $s .= '<label id="blockem-label" for="blockem-words">' . L10n::t('Comma separated profile URLS:') . ' </label>';
  62     $s .= '<textarea id="blockem-words" type="text" name="blockem-words" >' . htmlspecialchars($words) . '</textarea>';
  63     $s .= '</div><div class="clear"></div>';
  64
  65     $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="blockem-submit" name="blockem-submit" class="settings-submit" value="' . L10n::t('Save Settings') . '" /></div></div>';
  66
  67         return;
  68
  69 }
  70
  71 function blockem_addon_settings_post(&$a,&$b) {
  72
  73         if(! local_user())
  74                 return;
  75
  76         if($_POST['blockem-submit']) {
  77                 PConfig::set(local_user(),'blockem','words',trim($_POST['blockem-words']));
  78                 info(L10n::t('BLOCKEM Settings saved.') . EOL);
  79         }
  80 }
  81
  82 function blockem_enotify_store(&$a,&$b) {
  83
  84         $words = PConfig::get($b['uid'],'blockem','words');
  85         if($words) {
  86                 $arr = explode(',',$words);
  87         }
  88         else {
  89                 return;
  90         }
  91
  92         $found = false;
  93         if(count($arr)) {
  94                 foreach($arr as $word) {
  95                         if(! strlen(trim($word))) {
  96                                 continue;
  97                         }
  98
  99                         if(link_compare($b['url'],$word)) {
 100                                 $found = true;
 101                                 break;
 102                         }
 103                 }
 104         }
 105         if($found) {
 106                 $b['abort'] = true;
 107         }
 108 }
 109
 110 function blockem_prepare_body_content_filter(\Friendica\App $a, &$hook_data)
 111 {
 112         if (!local_user()) {
 113                 return;
 114         }
 115
 116         $profiles_string = null;
 117         if (local_user()) {
 118                 $profiles_string = PConfig::get(local_user(), 'blockem', 'words');
 119         }
 120
 121         if ($profiles_string) {
 122                 $profiles_array = explode(',', $profiles_string);
 123         } else {
 124                 return;
 125         }
 126
 127         $found = false;
 128         foreach ($profiles_array as $word) {
 129                 if (link_compare($hook_data['item']['author-link'], trim($word))) {
 130                         $found = true;
 131                         break;
 132                 }
 133         }
 134
 135         if ($found) {
 136                 $hook_data['filter_reasons'][] = L10n::t('Filtered user: %s', $hook_data['item']['author-name']);
 137         }
 138 }
 139
 140 function blockem_display_item(&$a,&$b) {
 141         if(strstr($b['output']['body'],'id="blockem-wrap-'))
 142                 $b['output']['thumb'] = $a->get_baseurl() . "/images/person-80.jpg";
 143 }
 144
 145 function blockem_conversation_start(&$a,&$b) {
 146
 147         if(! local_user())
 148                 return;
 149
 150         $words = PConfig::get(local_user(),'blockem','words');
 151         if($words) {
 152                 $a->data['blockem'] = explode(',',$words);
 153         }
 154         $a->page['htmlhead'] .= <<< EOT
 155
 156 <script>
 157 function blockemBlock(author) {
 158         $.get('blockem?block=' +author, function(data) {
 159                 location.reload(true);
 160         });
 161 }
 162 function blockemUnblock(author) {
 163         $.get('blockem?unblock=' +author, function(data) {
 164                 location.reload(true);
 165         });
 166 }
 167 </script>
 168
 169 EOT;
 170
 171 }
 172
 173 function blockem_item_photo_menu(&$a,&$b) {
 174
 175         if((! local_user()) || ($b['item']['self']))
 176                 return;
 177
 178         $blocked = false;
 179         $author = $b['item']['author-link'];
 180         if(is_array($a->data['blockem'])) {
 181                 foreach($a->data['blockem'] as $bloke) {
 182                         if(link_compare($bloke,$author)) {
 183                                 $blocked = true;
 184                                 break;
 185                         }
 186                 }
 187         }
 188         if($blocked)
 189                 $b['menu'][L10n::t('Unblock Author')] = 'javascript:blockemUnblock(\'' . $author . '\');';
 190         else
 191                 $b['menu'][L10n::t('Block Author')] = 'javascript:blockemBlock(\'' . $author . '\');';
 192 }
 193
 194 function blockem_module() {}
 195
 196
 197 function blockem_init(&$a) {
 198
 199         if(! local_user())
 200                 return;
 201
 202         $words = PConfig::get(local_user(),'blockem','words');
 203
 204         if(array_key_exists('block',$_GET) && $_GET['block']) {
 205                 if(strlen($words))
 206                         $words .= ',';
 207                 $words .= trim($_GET['block']);
 208         }
 209         if(array_key_exists('unblock',$_GET) && $_GET['unblock']) {
 210                 $arr = explode(',',$words);
 211                 $newarr = [];
 212
 213                 if(count($arr)) {
 214                         foreach($arr as $x) {
 215                                 if(! link_compare(trim($x),trim($_GET['unblock'])))
 216                                         $newarr[] = $x;
 217                         }
 218                 }
 219                 $words = implode(',',$newarr);
 220         }
 221
 222         PConfig::set(local_user(),'blockem','words',$words);
 223         info(L10n::t('blockem settings updated') . EOL );
 224         killme();
 225 }