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 (empty($b['output']['body'])) {
 142                 return;
 143         }
 144
 145         if(strstr($b['output']['body'],'id="blockem-wrap-'))
 146                 $b['output']['thumb'] = $a->get_baseurl() . "/images/person-80.jpg";
 147 }
 148
 149 function blockem_conversation_start(&$a,&$b) {
 150
 151         if(! local_user())
 152                 return;
 153
 154         $words = PConfig::get(local_user(),'blockem','words');
 155         if($words) {
 156                 $a->data['blockem'] = explode(',',$words);
 157         }
 158         $a->page['htmlhead'] .= <<< EOT
 159
 160 <script>
 161 function blockemBlock(author) {
 162         $.get('blockem?block=' +author, function(data) {
 163                 location.reload(true);
 164         });
 165 }
 166 function blockemUnblock(author) {
 167         $.get('blockem?unblock=' +author, function(data) {
 168                 location.reload(true);
 169         });
 170 }
 171 </script>
 172
 173 EOT;
 174
 175 }
 176
 177 function blockem_item_photo_menu(&$a,&$b) {
 178
 179         if((! local_user()) || ($b['item']['self']))
 180                 return;
 181
 182         $blocked = false;
 183         $author = $b['item']['author-link'];
 184         if(!empty($a->data['blockem'])) {
 185                 foreach($a->data['blockem'] as $bloke) {
 186                         if(link_compare($bloke,$author)) {
 187                                 $blocked = true;
 188                                 break;
 189                         }
 190                 }
 191         }
 192         if($blocked)
 193                 $b['menu'][L10n::t('Unblock Author')] = 'javascript:blockemUnblock(\'' . $author . '\');';
 194         else
 195                 $b['menu'][L10n::t('Block Author')] = 'javascript:blockemBlock(\'' . $author . '\');';
 196 }
 197
 198 function blockem_module() {}
 199
 200
 201 function blockem_init(&$a) {
 202
 203         if(! local_user())
 204                 return;
 205
 206         $words = PConfig::get(local_user(),'blockem','words');
 207
 208         if(array_key_exists('block',$_GET) && $_GET['block']) {
 209                 if(strlen($words))
 210                         $words .= ',';
 211                 $words .= trim($_GET['block']);
 212         }
 213         if(array_key_exists('unblock',$_GET) && $_GET['unblock']) {
 214                 $arr = explode(',',$words);
 215                 $newarr = [];
 216
 217                 if(count($arr)) {
 218                         foreach($arr as $x) {
 219                                 if(! link_compare(trim($x),trim($_GET['unblock'])))
 220                                         $newarr[] = $x;
 221                         }
 222                 }
 223                 $words = implode(',',$newarr);
 224         }
 225
 226         PConfig::set(local_user(),'blockem','words',$words);
 227         info(L10n::t('blockem settings updated') . EOL );
 228         killme();
 229 }