blockem/blockem.php

   1 <?php
   2 /**
   3  * Name: blockem
   4  * Description: block people
   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 .= '<label id="blockem-label" for="blockem-words">' . L10n::t('Comma separated profile URLS to block') . ' </label>';
  60     $s .= '<textarea id="blockem-words" type="text" name="blockem-words" >' . htmlspecialchars($words) . '</textarea>';
  61     $s .= '</div><div class="clear"></div>';
  62
  63     $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>';
  64
  65         return;
  66
  67 }
  68
  69 function blockem_addon_settings_post(&$a,&$b) {
  70
  71         if(! local_user())
  72                 return;
  73
  74         if($_POST['blockem-submit']) {
  75                 PConfig::set(local_user(),'blockem','words',trim($_POST['blockem-words']));
  76                 info(L10n::t('BLOCKEM Settings saved.') . EOL);
  77         }
  78 }
  79
  80 function blockem_enotify_store(&$a,&$b) {
  81
  82         $words = PConfig::get($b['uid'],'blockem','words');
  83         if($words) {
  84                 $arr = explode(',',$words);
  85         }
  86         else {
  87                 return;
  88         }
  89
  90         $found = false;
  91         if(count($arr)) {
  92                 foreach($arr as $word) {
  93                         if(! strlen(trim($word))) {
  94                                 continue;
  95                         }
  96
  97                         if(link_compare($b['url'],$word)) {
  98                                 $found = true;
  99                                 break;
 100                         }
 101                 }
 102         }
 103         if($found) {
 104                 $b['abort'] = true;
 105         }
 106 }
 107
 108 function blockem_prepare_body(&$a,&$b) {
 109
 110         if(! local_user())
 111                 return;
 112
 113         $words = null;
 114         if(local_user()) {
 115                 $words = PConfig::get(local_user(),'blockem','words');
 116         }
 117         if($words) {
 118                 $arr = explode(',',$words);
 119         }
 120         else {
 121                 return;
 122         }
 123
 124         $found = false;
 125         if(count($arr)) {
 126                 foreach($arr as $word) {
 127                         if(! strlen(trim($word))) {
 128                                 continue;
 129                         }
 130
 131                         if(link_compare($b['item']['author-link'],$word)) {
 132                                 $found = true;
 133                                 break;
 134                         }
 135                 }
 136         }
 137         if($found) {
 138                 $rnd = random_string(8);
 139                 $b['html'] = '<div id="blockem-wrap-' . $rnd . '" class="fakelink" onclick=openClose(\'blockem-' . $rnd . '\'); >' . L10n::t('Blocked %s - Click to open/close', $word) . '</div><div id="blockem-' . $rnd . '" style="display: none; " >' . $b['html'] . '</div>';
 140         }
 141 }
 142
 143 function blockem_display_item(&$a,&$b) {
 144         if(strstr($b['output']['body'],'id="blockem-wrap-'))
 145                 $b['output']['thumb'] = $a->get_baseurl() . "/images/person-80.jpg";
 146 }
 147
 148 function blockem_conversation_start(&$a,&$b) {
 149
 150         if(! local_user())
 151                 return;
 152
 153         $words = PConfig::get(local_user(),'blockem','words');
 154         if($words) {
 155                 $a->data['blockem'] = explode(',',$words);
 156         }
 157         $a->page['htmlhead'] .= <<< EOT
 158
 159 <script>
 160 function blockemBlock(author) {
 161         $.get('blockem?block=' +author, function(data) {
 162                 location.reload(true);
 163         });
 164 }
 165 function blockemUnblock(author) {
 166         $.get('blockem?unblock=' +author, function(data) {
 167                 location.reload(true);
 168         });
 169 }
 170 </script>
 171
 172 EOT;
 173
 174 }
 175
 176 function blockem_item_photo_menu(&$a,&$b) {
 177
 178         if((! local_user()) || ($b['item']['self']))
 179                 return;
 180
 181         $blocked = false;
 182         $author = $b['item']['author-link'];
 183         if(is_array($a->data['blockem'])) {
 184                 foreach($a->data['blockem'] as $bloke) {
 185                         if(link_compare($bloke,$author)) {
 186                                 $blocked = true;
 187                                 break;
 188                         }
 189                 }
 190         }
 191         if($blocked)
 192                 $b['menu'][L10n::t('Unblock Author')] = 'javascript:blockemUnblock(\'' . $author . '\');';
 193         else
 194                 $b['menu'][L10n::t('Block Author')] = 'javascript:blockemBlock(\'' . $author . '\');';
 195 }
 196
 197 function blockem_module() {}
 198
 199
 200 function blockem_init(&$a) {
 201
 202         if(! local_user())
 203                 return;
 204
 205         $words = PConfig::get(local_user(),'blockem','words');
 206
 207         if(array_key_exists('block',$_GET) && $_GET['block']) {
 208                 if(strlen($words))
 209                         $words .= ',';
 210                 $words .= trim($_GET['block']);
 211         }
 212         if(array_key_exists('unblock',$_GET) && $_GET['unblock']) {
 213                 $arr = explode(',',$words);
 214                 $newarr = [];
 215
 216                 if(count($arr)) {
 217                         foreach($arr as $x) {
 218                                 if(! link_compare(trim($x),trim($_GET['unblock'])))
 219                                         $newarr[] = $x;
 220                         }
 221                 }
 222                 $words = implode(',',$newarr);
 223         }
 224
 225         PConfig::set(local_user(),'blockem','words',$words);
 226         info(L10n::t('blockem settings updated') . EOL );
 227         killme();
 228 }