3 * Name: Buffer Post Connector
4 * Description: Post to Buffer (Facebook, Google+, LinkedIn, Twitter)
6 * Author: Michael Vogel <http://pirati.ca/profile/heluecht>
8 require 'addon/buffer/bufferapp.php';
11 use Friendica\Content\Text\Plaintext;
12 use Friendica\Core\Addon;
13 use Friendica\Core\Config;
14 use Friendica\Core\L10n;
15 use Friendica\Core\Logger;
16 use Friendica\Core\PConfig;
17 use Friendica\Core\Protocol;
18 use Friendica\Core\Renderer;
19 use Friendica\Database\DBA;
20 use Friendica\Model\ItemContent;
21 use Friendica\Util\Proxy as ProxyUtils;
23 function buffer_install()
25 Addon::registerHook('post_local', 'addon/buffer/buffer.php', 'buffer_post_local');
26 Addon::registerHook('notifier_normal', 'addon/buffer/buffer.php', 'buffer_send');
27 Addon::registerHook('jot_networks', 'addon/buffer/buffer.php', 'buffer_jot_nets');
28 Addon::registerHook('connector_settings', 'addon/buffer/buffer.php', 'buffer_settings');
29 Addon::registerHook('connector_settings_post', 'addon/buffer/buffer.php', 'buffer_settings_post');
32 function buffer_uninstall()
34 Addon::unregisterHook('post_local', 'addon/buffer/buffer.php', 'buffer_post_local');
35 Addon::unregisterHook('notifier_normal', 'addon/buffer/buffer.php', 'buffer_send');
36 Addon::unregisterHook('jot_networks', 'addon/buffer/buffer.php', 'buffer_jot_nets');
37 Addon::unregisterHook('connector_settings', 'addon/buffer/buffer.php', 'buffer_settings');
38 Addon::unregisterHook('connector_settings_post', 'addon/buffer/buffer.php', 'buffer_settings_post');
41 function buffer_module()
45 function buffer_content(App $a)
48 notice(L10n::t('Permission denied.') . EOL);
52 require_once "mod/settings.php";
55 if (isset($a->argv[1])) {
56 switch ($a->argv[1]) {
58 $o = buffer_connect($a);
62 $o = print_r($a->argv, true);
66 $o = buffer_connect($a);
72 function buffer_addon_admin(App $a, &$o)
74 $t = Renderer::getMarkupTemplate("admin.tpl", "addon/buffer/");
76 $o = Renderer::replaceMacros($t, [
77 '$submit' => L10n::t('Save Settings'),
78 // name, label, value, help, [extra values]
79 '$client_id' => ['client_id', L10n::t('Client ID'), Config::get('buffer', 'client_id'), ''],
80 '$client_secret' => ['client_secret', L10n::t('Client Secret'), Config::get('buffer', 'client_secret'), ''],
84 function buffer_addon_admin_post(App $a)
86 $client_id = ((!empty($_POST['client_id'])) ? notags(trim($_POST['client_id'])) : '');
87 $client_secret = ((!empty($_POST['client_secret'])) ? notags(trim($_POST['client_secret'])) : '');
89 Config::set('buffer', 'client_id' , $client_id);
90 Config::set('buffer', 'client_secret', $client_secret);
92 info(L10n::t('Settings updated.'). EOL);
95 function buffer_connect(App $a)
97 if (isset($_REQUEST["error"])) {
98 $o = L10n::t('Error when registering buffer connection:')." ".$_REQUEST["error"];
102 // Start a session. This is necessary to hold on to a few keys the callback script will also need
105 // Define the needed keys
106 $client_id = Config::get('buffer','client_id');
107 $client_secret = Config::get('buffer','client_secret');
109 // The callback URL is the script that gets called after the user authenticates with buffer
110 $callback_url = $a->getBaseURL()."/buffer/connect";
112 $buffer = new BufferApp($client_id, $client_secret, $callback_url);
115 $o .= '<a href="' . $buffer->get_login_url() . '">Connect to Buffer!</a>';
117 Logger::log("buffer_connect: authenticated");
118 $o .= L10n::t("You are now authenticated to buffer. ");
119 $o .= '<br /><a href="' . $a->getBaseURL() . '/settings/connectors">' . L10n::t("return to the connector page") . '</a>';
120 PConfig::set(local_user(), 'buffer','access_token', $buffer->access_token);
126 function buffer_jot_nets(App $a, &$b)
132 $buffer_post = PConfig::get(local_user(), 'buffer', 'post');
134 if (intval($buffer_post) == 1) {
135 $buffer_defpost = PConfig::get(local_user(), 'buffer', 'post_by_default');
136 $selected = ((intval($buffer_defpost) == 1) ? ' checked="checked" ' : '');
137 $b .= '<div class="profile-jot-net"><input type="checkbox" name="buffer_enable"' . $selected . ' value="1" /> '
138 . L10n::t('Post to Buffer') . '</div>';
142 function buffer_settings(App $a, &$s)
144 if (! local_user()) {
148 /* Add our stylesheet to the page so we can make our settings look nice */
150 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->getBaseURL() . '/addon/buffer/buffer.css' . '" media="all" />' . "\r\n";
152 /* Get the current state of our config variables */
154 $enabled = PConfig::get(local_user(),'buffer','post');
155 $checked = (($enabled) ? ' checked="checked" ' : '');
156 $css = (($enabled) ? '' : '-disabled');
158 $def_enabled = PConfig::get(local_user(),'buffer','post_by_default');
159 $def_checked = (($def_enabled) ? ' checked="checked" ' : '');
161 /* Add some HTML to the existing form */
163 $s .= '<span id="settings_buffer_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_buffer_expanded\'); openClose(\'settings_buffer_inflated\');">';
164 $s .= '<img class="connector'.$css.'" src="images/buffer.png" /><h3 class="connector">'. L10n::t('Buffer Export').'</h3>';
166 $s .= '<div id="settings_buffer_expanded" class="settings-block" style="display: none;">';
167 $s .= '<span class="fakelink" onclick="openClose(\'settings_buffer_expanded\'); openClose(\'settings_buffer_inflated\');">';
168 $s .= '<img class="connector'.$css.'" src="images/buffer.png" /><h3 class="connector">'. L10n::t('Buffer Export').'</h3>';
171 $client_id = Config::get("buffer", "client_id");
172 $client_secret = Config::get("buffer", "client_secret");
173 $access_token = PConfig::get(local_user(), "buffer", "access_token");
175 $s .= '<div id="buffer-password-wrapper">';
177 if ($access_token == "") {
178 $s .= '<div id="buffer-authenticate-wrapper">';
179 $s .= '<a href="'.$a->getBaseURL().'/buffer/connect">'.L10n::t("Authenticate your Buffer connection").'</a>';
180 $s .= '</div><div class="clear"></div>';
182 $s .= '<div id="buffer-enable-wrapper">';
183 $s .= '<label id="buffer-enable-label" for="buffer-checkbox">' . L10n::t('Enable Buffer Post Addon') . '</label>';
184 $s .= '<input id="buffer-checkbox" type="checkbox" name="buffer" value="1" ' . $checked . '/>';
185 $s .= '</div><div class="clear"></div>';
187 $s .= '<div id="buffer-bydefault-wrapper">';
188 $s .= '<label id="buffer-bydefault-label" for="buffer-bydefault">' . L10n::t('Post to Buffer by default') . '</label>';
189 $s .= '<input id="buffer-bydefault" type="checkbox" name="buffer_bydefault" value="1" ' . $def_checked . '/>';
190 $s .= '</div><div class="clear"></div>';
192 $s .= '<div id="buffer-delete-wrapper">';
193 $s .= '<label id="buffer-delete-label" for="buffer-delete">' . L10n::t('Check to delete this preset') . '</label>';
194 $s .= '<input id="buffer-delete" type="checkbox" name="buffer_delete" value="1" />';
195 $s .= '</div><div class="clear"></div>';
197 // The callback URL is the script that gets called after the user authenticates with buffer
198 $callback_url = $a->getBaseURL() . '/buffer/connect';
200 $buffer = new BufferApp($client_id, $client_secret, $callback_url, $access_token);
202 $profiles = $buffer->go('/profiles');
203 if (is_array($profiles)) {
204 $s .= '<div id="buffer-accounts-wrapper">';
205 $s .= L10n::t("Posts are going to all accounts that are enabled by default:");
207 foreach ($profiles as $profile) {
208 if (!$profile->default)
211 //$s .= "<img src='".$profile->avatar_https."' width='16' />";
212 $s .= " ".$profile->formatted_username." (".$profile->formatted_service.")";
216 $s .= '</div><div class="clear"></div>';
221 $s .= '</div><div class="clear"></div>';
223 /* provide a submit button */
225 $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="buffer-submit" name="buffer-submit" class="settings-submit" value="' . L10n::t('Save Settings') . '" /></div></div>';
229 function buffer_settings_post(App $a, array &$b)
231 if (!empty($_POST['buffer-submit'])) {
232 if (!empty($_POST['buffer_delete'])) {
233 PConfig::set(local_user(), 'buffer', 'access_token' , '');
234 PConfig::set(local_user(), 'buffer', 'post' , false);
235 PConfig::set(local_user(), 'buffer', 'post_by_default', false);
237 PConfig::set(local_user(), 'buffer', 'post' , intval($_POST['buffer']));
238 PConfig::set(local_user(), 'buffer', 'post_by_default', intval($_POST['buffer_bydefault']));
243 function buffer_post_local(App $a, array &$b)
245 if (!local_user() || (local_user() != $b['uid'])) {
249 $buffer_post = intval(PConfig::get(local_user(),'buffer','post'));
251 $buffer_enable = (($buffer_post && !empty($_REQUEST['buffer_enable'])) ? intval($_REQUEST['buffer_enable']) : 0);
253 if ($b['api_source'] && intval(PConfig::get(local_user(),'buffer','post_by_default'))) {
257 if (!$buffer_enable) {
261 if (strlen($b['postopts'])) {
262 $b['postopts'] .= ',';
265 $b['postopts'] .= 'buffer';
268 function buffer_send(App $a, array &$b)
270 if ($b['deleted'] || $b['private'] || ($b['created'] !== $b['edited'])) {
274 if (!strstr($b['postopts'],'buffer')) {
278 if ($b['parent'] != $b['id']) {
282 // Dont't post if the post doesn't belong to us.
283 // This is a check for forum postings
284 $self = DBA::selectFirst('contact', ['id'], ['uid' => $b['uid'], 'self' => true]);
285 if ($b['contact-id'] != $self['id']) {
289 // if post comes from buffer don't send it back
290 //if($b['app'] == "Buffer")
293 $client_id = Config::get("buffer", "client_id");
294 $client_secret = Config::get("buffer", "client_secret");
295 $access_token = PConfig::get($b['uid'], "buffer","access_token");
299 $buffer = new BufferApp($client_id, $client_secret, $callback_url, $access_token);
301 $profiles = $buffer->go('/profiles');
302 if (is_array($profiles)) {
303 Logger::log("Will send these parameter ".print_r($b, true), Logger::DEBUG);
305 foreach ($profiles as $profile) {
306 if (!$profile->default)
311 switch ($profile->service) {
313 $send = ($b["extid"] != Protocol::FACEBOOK);
316 $includedlinks = false;
321 $send = ($b["extid"] != Protocol::GPLUS);
324 $includedlinks = false;
329 $send = ($b["extid"] != Protocol::TWITTER);
332 $includedlinks = true;
337 $send = ($b["extid"] != Protocol::LINKEDIN);
340 $includedlinks = true;
350 // Markup for Google+
352 if ($item["title"] != "") {
353 $item["title"] = "*" . $item["title"] . "*";
356 $item["body"] = preg_replace("(\[b\](.*?)\[\/b\])ism", '*$1*', $item["body"]);
357 $item["body"] = preg_replace("(\[i\](.*?)\[\/i\])ism", '_$1_', $item["body"]);
358 $item["body"] = preg_replace("(\[s\](.*?)\[\/s\])ism", '-$1-', $item["body"]);
361 $post = ItemContent::getPlaintextPost($item, $limit, $includedlinks, $htmlmode);
362 Logger::log("buffer_send: converted message ".$b["id"]." result: ".print_r($post, true), Logger::DEBUG);
364 // The image proxy is used as a sanitizer. Buffer seems to be really picky about pictures
365 if (isset($post["image"])) {
366 $post["image"] = ProxyUtils::proxifyUrl($post["image"]);
369 if (isset($post["preview"])) {
370 $post["preview"] = ProxyUtils::proxifyUrl($post["preview"]);
373 // Seems like a bug to me
374 // Buffer doesn't add links to Twitter (but pictures)
375 if (($profile->service == "twitter") && isset($post["url"]) && ($post["type"] != "photo")) {
376 $post["text"] .= " " . $post["url"];
377 } elseif ($profile->service == "google") {
378 $post["text"] .= html_entity_decode(" ", ENT_QUOTES, 'UTF-8'); // Send a special blank to identify the post through the "fromgplus" addon
382 $message["text"] = $post["text"];
383 $message["profile_ids[]"] = $profile->id;
384 $message["shorten"] = false;
385 $message["now"] = true;
387 if (isset($post["title"])) {
388 $message["media[title]"] = $post["title"];
391 if (isset($post["description"])) {
392 $message["media[description]"] = $post["description"];
395 if (isset($post["url"]) && ($post["type"] != "photo")) {
396 $message["media[link]"] = $post["url"];
399 if (isset($post["image"])) {
400 $message["media[picture]"] = $post["image"];
402 if ($post["type"] == "photo") {
403 $message["media[thumbnail]"] = $post["image"];
407 if (isset($post["preview"])) {
408 $message["media[thumbnail]"] = $post["preview"];
412 Logger::log("buffer_send: data for message " . $b["id"] . ": " . print_r($message, true), Logger::DEBUG);
413 $ret = $buffer->go('/updates/create', $message);
414 Logger::log("buffer_send: send message " . $b["id"] . " result: " . print_r($ret, true), Logger::DEBUG);