[global] CR request: Moved proxify*() methods to separate class
[friendica-addons.git/.git] / mastodoncustomemojis / mastodoncustomemojis.php
1 <?php
2
3 /*
4  * Name: Mastodon Custom Emojis
5  * Description: Replace emojis shortcodes in Mastodon posts with their originating server custom emojis images.
6  * Version: 1.0
7  * Author: Hypolite Petovan
8  * Author: Roland Haeder
9  */
10
11 use Friendica\App;
12 use Friendica\Content\Smilies;
13 use Friendica\Core\Addon;
14 use Friendica\Core\Cache;
15 use Friendica\Core\Config;
16 use Friendica\Core\Protocol;
17 use Friendica\Util\Network;
18 use Friendica\Util\ProxyUtils;
19
20 function mastodoncustomemojis_install()
21 {
22         Addon::registerHook('put_item_in_cache',  __FILE__, 'mastodoncustomemojis_put_item_in_cache');
23         Addon::registerHook('network_mod_init',   __FILE__, 'mastodoncustomemojis_css_hook');
24         Addon::registerHook('display_mod_init',   __FILE__, 'mastodoncustomemojis_css_hook');
25         Addon::registerHook('search_mod_init',    __FILE__, 'mastodoncustomemojis_css_hook');
26         Addon::registerHook('community_mod_init', __FILE__, 'mastodoncustomemojis_css_hook');
27         Addon::registerHook('contacts_mod_init',  __FILE__, 'mastodoncustomemojis_css_hook');
28 }
29
30 function mastodoncustomemojis_uninstall()
31 {
32         Addon::unregisterHook('put_item_in_cache',  __FILE__, 'mastodoncustomemojis_put_item_in_cache');
33         Addon::unregisterHook('network_mod_init',   __FILE__, 'mastodoncustomemojis_css_hook');
34         Addon::unregisterHook('display_mod_init',   __FILE__, 'mastodoncustomemojis_css_hook');
35         Addon::unregisterHook('search_mod_init',    __FILE__, 'mastodoncustomemojis_css_hook');
36         Addon::unregisterHook('community_mod_init', __FILE__, 'mastodoncustomemojis_css_hook');
37         Addon::unregisterHook('contacts_mod_init',  __FILE__, 'mastodoncustomemojis_css_hook');
38 }
39
40 function mastodoncustomemojis_css_hook(App $a)
41 {
42         $a->page['htmlhead'] .= <<<HTML
43 <!-- Style added by mastodoncustomemojis -->
44 <style type="text/css">
45         .emoji.mastodon {
46                 height: 1.2em;
47                 vertical-align: middle;
48         }
49 </style>
50
51
52 HTML;
53 }
54
55 function mastodoncustomemojis_put_item_in_cache(App $a, array &$hook_data)
56 {
57         // Mastodon uses OStatus, skipping other network protocols
58         if (empty($hook_data['item']['author-link']) || ($hook_data['item']['network'] != Protocol::OSTATUS)) {
59                 return;
60         }
61
62         $emojis = mastodoncustomemojis_get_custom_emojis_for_author($hook_data['item']['author-link']);
63
64         $hook_data["rendered-html"] = Smilies::replaceFromArray($hook_data["rendered-html"], $emojis);
65 }
66
67 function mastodoncustomemojis_get_custom_emojis_for_author($author_link)
68 {
69         $return = ['texts' => [], 'icons' => []];
70
71         $url_parts = parse_url($author_link);
72
73         $api_base_url = $url_parts['scheme'] . '://' . $url_parts['host'] . (isset($url_parts['port']) ? ':' . $url_parts['port'] : '');
74
75         $cache_key = 'mastodoncustomemojis:' . $api_base_url;
76
77         $emojis = Cache::get($cache_key);
78         if (empty($emojis['texts']) || Config::get('system', 'ignore_cache')) {
79                 // Reset the emojis array
80                 $emojis = $return;
81
82                 $api_url = $api_base_url . '/api/v1/custom_emojis';
83
84                 $ret = Network::fetchUrlFull($api_url);
85
86                 if ($ret['success']) {
87                         $emojis_array = json_decode($ret['body'], true);
88
89                         if (is_array($emojis_array)) {
90                                 foreach ($emojis_array as $emoji) {
91                                         $emojis['texts'][] = ':' . $emoji['shortcode'] . ':';
92                                         $emojis['icons'][] = '<img class="emoji mastodon" src="' . ProxyUtils::proxifyUrl($emoji['static_url']) . '" alt=":' . $emoji['shortcode'] . ':" title=":' . $emoji['shortcode'] . ':"/>';
93                                 }
94                         }
95
96                         $ttl = Cache::WEEK;
97                 } else {
98                         $ttl = Cache::HALF_HOUR;
99                 }
100
101                 Cache::set($cache_key, $emojis, $ttl);
102
103                 $return = $emojis;
104         }
105
106         return $return;
107 }