d943f26c6456a37cc137cda500dc3ecdccc475e2
[friendica-addons.git] / 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\PConfig;
11
12 function blockem_install() {
13         Addon::registerHook('prepare_body', 'addon/blockem/blockem.php', 'blockem_prepare_body');
14         Addon::registerHook('display_item', 'addon/blockem/blockem.php', 'blockem_display_item');
15         Addon::registerHook('addon_settings', 'addon/blockem/blockem.php', 'blockem_addon_settings');
16         Addon::registerHook('addon_settings_post', 'addon/blockem/blockem.php', 'blockem_addon_settings_post');
17         Addon::registerHook('conversation_start', 'addon/blockem/blockem.php', 'blockem_conversation_start');
18         Addon::registerHook('item_photo_menu', 'addon/blockem/blockem.php', 'blockem_item_photo_menu');
19         Addon::registerHook('enotify_store', 'addon/blockem/blockem.php', 'blockem_enotify_store');
20 }
21
22 function blockem_uninstall() {
23         Addon::unregisterHook('prepare_body', 'addon/blockem/blockem.php', 'blockem_prepare_body');
24         Addon::unregisterHook('display_item', 'addon/blockem/blockem.php', 'blockem_display_item');
25         Addon::unregisterHook('addon_settings', 'addon/blockem/blockem.php', 'blockem_addon_settings');
26         Addon::unregisterHook('addon_settings_post', 'addon/blockem/blockem.php', 'blockem_addon_settings_post');
27         Addon::unregisterHook('conversation_start', 'addon/blockem/blockem.php', 'blockem_conversation_start');
28         Addon::unregisterHook('item_photo_menu', 'addon/blockem/blockem.php', 'blockem_item_photo_menu');
29         Addon::unregisterHook('enotify_store', 'addon/blockem/blockem.php', 'blockem_enotify_store');
30 }
31
32 function blockem_addon_settings(&$a, &$s)
33 {
34
35         if(! local_user())
36                 return;
37
38     /* Add our stylesheet to the page so we can make our settings look nice */
39
40     $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/blockem/blockem.css' . '" media="all" />' . "\r\n";
41
42
43         $words = PConfig::get(local_user(), 'blockem', 'words');
44         if(! $words)
45                 $words = '';
46
47     $s .= '<span id="settings_blockem_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_blockem_expanded\'); openClose(\'settings_blockem_inflated\');">';
48     $s .= '<h3>' . t('"Blockem"') . '</h3>';
49     $s .= '</span>';
50     $s .= '<div id="settings_blockem_expanded" class="settings-block" style="display: none;">';
51     $s .= '<span class="fakelink" onclick="openClose(\'settings_blockem_expanded\'); openClose(\'settings_blockem_inflated\');">';
52     $s .= '<h3>' . t('"Blockem"') . '</h3>';
53     $s .= '</span>';
54
55     $s .= '<div id="blockem-wrapper">';
56     $s .= '<label id="blockem-label" for="blockem-words">' . t('Comma separated profile URLS to block') . ' </label>';
57     $s .= '<textarea id="blockem-words" type="text" name="blockem-words" >' . htmlspecialchars($words) . '</textarea>';
58     $s .= '</div><div class="clear"></div>';
59
60     $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="blockem-submit" name="blockem-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div></div>';
61
62         return;
63
64 }
65
66 function blockem_addon_settings_post(&$a,&$b) {
67
68         if(! local_user())
69                 return;
70
71         if($_POST['blockem-submit']) {
72                 PConfig::set(local_user(),'blockem','words',trim($_POST['blockem-words']));
73                 info( t('BLOCKEM Settings saved.') . EOL);
74         }
75 }
76
77 function blockem_enotify_store(&$a,&$b) {
78
79         $words = PConfig::get($b['uid'],'blockem','words');
80         if($words) {
81                 $arr = explode(',',$words);
82         }
83         else {
84                 return;
85         }
86
87         $found = false;
88         if(count($arr)) {
89                 foreach($arr as $word) {
90                         if(! strlen(trim($word))) {
91                                 continue;
92                         }
93
94                         if(link_compare($b['url'],$word)) {
95                                 $found = true;
96                                 break;
97                         }
98                 }
99         }
100         if($found) {
101                 $b['abort'] = true;
102         }
103 }
104
105 function blockem_prepare_body(&$a,&$b) {
106
107         if(! local_user())
108                 return;
109
110         $words = null;
111         if(local_user()) {
112                 $words = PConfig::get(local_user(),'blockem','words');
113         }
114         if($words) {
115                 $arr = explode(',',$words);
116         }
117         else {
118                 return;
119         }
120
121         $found = false;
122         if(count($arr)) {
123                 foreach($arr as $word) {
124                         if(! strlen(trim($word))) {
125                                 continue;
126                         }
127
128                         if(link_compare($b['item']['author-link'],$word)) {
129                                 $found = true;
130                                 break;
131                         }
132                 }
133         }
134         if($found) {
135                 $rnd = random_string(8);
136                 $b['html'] = '<div id="blockem-wrap-' . $rnd . '" class="fakelink" onclick=openClose(\'blockem-' . $rnd . '\'); >' . sprintf( t('Blocked %s - Click to open/close'),$word ) . '</div><div id="blockem-' . $rnd . '" style="display: none; " >' . $b['html'] . '</div>';
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'][ t('Unblock Author')] = 'javascript:blockemUnblock(\'' . $author . '\');';
190         else
191                 $b['menu'][ 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( t('blockem settings updated') . EOL );
224         killme();
225 }