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', 'addon/blockem/blockem.php', 'blockem_prepare_body');
  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', 'addon/blockem/blockem.php', 'blockem_prepare_body');
  27         Addon::unregisterHook('display_item', 'addon/blockem/blockem.php', 'blockem_display_item');
  28         Addon::unregisterHook('addon_settings', 'addon/blockem/blockem.php', 'blockem_addon_settings');
  29         Addon::unregisterHook('addon_settings_post', 'addon/blockem/blockem.php', 'blockem_addon_settings_post');
  30         Addon::unregisterHook('conversation_start', 'addon/blockem/blockem.php', 'blockem_conversation_start');
  31         Addon::unregisterHook('item_photo_menu', 'addon/blockem/blockem.php', 'blockem_item_photo_menu');
  32         Addon::unregisterHook('enotify_store', 'addon/blockem/blockem.php', 'blockem_enotify_store');
  33 }
  34
  35 function blockem_addon_settings(&$a, &$s)
  36 {
  37
  38         if(! local_user())
  39                 return;
  40
  41     /* Add our stylesheet to the page so we can make our settings look nice */
  42
  43     $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/blockem/blockem.css' . '" media="all" />' . "\r\n";
  44
  45
  46         $words = PConfig::get(local_user(), 'blockem', 'words');
  47         if(! $words)
  48                 $words = '';
  49
  50     $s .= '<span id="settings_blockem_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_blockem_expanded\'); openClose(\'settings_blockem_inflated\');">';
  51     $s .= '<h3>' . L10n::t('"Blockem"') . '</h3>';
  52     $s .= '</span>';
  53     $s .= '<div id="settings_blockem_expanded" class="settings-block" style="display: none;">';
  54     $s .= '<span class="fakelink" onclick="openClose(\'settings_blockem_expanded\'); openClose(\'settings_blockem_inflated\');">';
  55     $s .= '<h3>' . L10n::t('"Blockem"') . '</h3>';
  56     $s .= '</span>';
  57
  58     $s .= '<div id="blockem-wrapper">';
  59     $s .= '<div id="blockem-desc">'. L10n::t("Hides user's content by collapsing posts. Also replaces their avatar with generic image.") . ' </div>';
  60     $s .= '<label id="blockem-label" for="blockem-words">' . L10n::t('Comma separated profile URLS:') . ' </label>';
  61     $s .= '<textarea id="blockem-words" type="text" name="blockem-words" >' . htmlspecialchars($words) . '</textarea>';
  62     $s .= '</div><div class="clear"></div>';
  63
  64     $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>';
  65
  66         return;
  67
  68 }
  69
  70 function blockem_addon_settings_post(&$a,&$b) {
  71
  72         if(! local_user())
  73                 return;
  74
  75         if($_POST['blockem-submit']) {
  76                 PConfig::set(local_user(),'blockem','words',trim($_POST['blockem-words']));
  77                 info(L10n::t('BLOCKEM Settings saved.') . EOL);
  78         }
  79 }
  80
  81 function blockem_enotify_store(&$a,&$b) {
  82
  83         $words = PConfig::get($b['uid'],'blockem','words');
  84         if($words) {
  85                 $arr = explode(',',$words);
  86         }
  87         else {
  88                 return;
  89         }
  90
  91         $found = false;
  92         if(count($arr)) {
  93                 foreach($arr as $word) {
  94                         if(! strlen(trim($word))) {
  95                                 continue;
  96                         }
  97
  98                         if(link_compare($b['url'],$word)) {
  99                                 $found = true;
 100                                 break;
 101                         }
 102                 }
 103         }
 104         if($found) {
 105                 $b['abort'] = true;
 106         }
 107 }
 108
 109 function blockem_prepare_body(&$a,&$b) {
 110
 111         if(! local_user())
 112                 return;
 113
 114         $words = null;
 115         if(local_user()) {
 116                 $words = PConfig::get(local_user(),'blockem','words');
 117         }
 118         if($words) {
 119                 $arr = explode(',',$words);
 120         }
 121         else {
 122                 return;
 123         }
 124
 125         $found = false;
 126         if(count($arr)) {
 127                 foreach($arr as $word) {
 128                         if(! strlen(trim($word))) {
 129                                 continue;
 130                         }
 131
 132                         if(link_compare($b['item']['author-link'],$word)) {
 133                                 $found = true;
 134                                 break;
 135                         }
 136                 }
 137         }
 138         if($found) {
 139                 $rnd = random_string(8);
 140                 $b['html'] = '<div id="blockem-wrap-' . $rnd . '" class="fakelink" onclick=openClose(\'blockem-' . $rnd . '\'); >' . L10n::t('Hidden content by %s - Click to open/close', $word) . '</div><div id="blockem-' . $rnd . '" style="display: none; " >' . $b['html'] . '</div>';
 141         }
 142 }
 143
 144 function blockem_display_item(&$a,&$b) {
 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(is_array($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 }