buffer/buffer.php

   1 <?php
   2 /**
   3  * Name: Buffer Post Connector
   4  * Description: Post to Buffer (Facebook, Google+, LinkedIn, Twitter)
   5  * Version: 0.2
   6  * Author: Michael Vogel <http://pirati.ca/profile/heluecht>
   7  */
   8 require 'addon/buffer/bufferapp.php';
   9
  10 use Friendica\App;
  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\Database\DBA;
  19 use Friendica\Model\ItemContent;
  20 use Friendica\Util\Proxy as ProxyUtils;
  21
  22 function buffer_install()
  23 {
  24         Addon::registerHook('post_local',           'addon/buffer/buffer.php', 'buffer_post_local');
  25         Addon::registerHook('notifier_normal',      'addon/buffer/buffer.php', 'buffer_send');
  26         Addon::registerHook('jot_networks',         'addon/buffer/buffer.php', 'buffer_jot_nets');
  27         Addon::registerHook('connector_settings',      'addon/buffer/buffer.php', 'buffer_settings');
  28         Addon::registerHook('connector_settings_post', 'addon/buffer/buffer.php', 'buffer_settings_post');
  29 }
  30
  31 function buffer_uninstall()
  32 {
  33         Addon::unregisterHook('post_local',              'addon/buffer/buffer.php', 'buffer_post_local');
  34         Addon::unregisterHook('notifier_normal',         'addon/buffer/buffer.php', 'buffer_send');
  35         Addon::unregisterHook('jot_networks',            'addon/buffer/buffer.php', 'buffer_jot_nets');
  36         Addon::unregisterHook('connector_settings',      'addon/buffer/buffer.php', 'buffer_settings');
  37         Addon::unregisterHook('connector_settings_post', 'addon/buffer/buffer.php', 'buffer_settings_post');
  38 }
  39
  40 function buffer_module()
  41 {
  42 }
  43
  44 function buffer_content(App $a)
  45 {
  46         if (! local_user()) {
  47                 notice(L10n::t('Permission denied.') . EOL);
  48                 return '';
  49         }
  50
  51         require_once "mod/settings.php";
  52         settings_init($a);
  53
  54         if (isset($a->argv[1])) {
  55                 switch ($a->argv[1]) {
  56                         case "connect":
  57                                 $o = buffer_connect($a);
  58                                 break;
  59
  60                         default:
  61                                 $o = print_r($a->argv, true);
  62                                 break;
  63                 }
  64         } else {
  65                 $o = buffer_connect($a);
  66         }
  67
  68         return $o;
  69 }
  70
  71 function buffer_addon_admin(App $a, &$o)
  72 {
  73         $t = get_markup_template("admin.tpl", "addon/buffer/");
  74
  75         $o = replace_macros($t, [
  76                 '$submit' => L10n::t('Save Settings'),
  77                 // name, label, value, help, [extra values]
  78                 '$client_id' => ['client_id', L10n::t('Client ID'), Config::get('buffer', 'client_id'), ''],
  79                 '$client_secret' => ['client_secret', L10n::t('Client Secret'), Config::get('buffer', 'client_secret'), ''],
  80         ]);
  81 }
  82
  83 function buffer_addon_admin_post(App $a)
  84 {
  85         $client_id     = ((!empty($_POST['client_id']))     ? notags(trim($_POST['client_id']))     : '');
  86         $client_secret = ((!empty($_POST['client_secret'])) ? notags(trim($_POST['client_secret'])) : '');
  87
  88         Config::set('buffer', 'client_id'    , $client_id);
  89         Config::set('buffer', 'client_secret', $client_secret);
  90
  91         info(L10n::t('Settings updated.'). EOL);
  92 }
  93
  94 function buffer_connect(App $a)
  95 {
  96         if (isset($_REQUEST["error"])) {
  97                 $o = L10n::t('Error when registering buffer connection:')." ".$_REQUEST["error"];
  98                 return $o;
  99         }
 100
 101         // Start a session.  This is necessary to hold on to  a few keys the callback script will also need
 102         session_start();
 103
 104         // Define the needed keys
 105         $client_id = Config::get('buffer','client_id');
 106         $client_secret = Config::get('buffer','client_secret');
 107
 108         // The callback URL is the script that gets called after the user authenticates with buffer
 109         $callback_url = $a->getBaseURL()."/buffer/connect";
 110
 111         $buffer = new BufferApp($client_id, $client_secret, $callback_url);
 112
 113         if (!$buffer->ok) {
 114                 $o .= '<a href="' . $buffer->get_login_url() . '">Connect to Buffer!</a>';
 115         } else {
 116                 Logger::log("buffer_connect: authenticated");
 117                 $o .= L10n::t("You are now authenticated to buffer. ");
 118                 $o .= '<br /><a href="' . $a->getBaseURL() . '/settings/connectors">' . L10n::t("return to the connector page") . '</a>';
 119                 PConfig::set(local_user(), 'buffer','access_token', $buffer->access_token);
 120         }
 121
 122         return $o;
 123 }
 124
 125 function buffer_jot_nets(App $a, &$b)
 126 {
 127         if (!local_user()) {
 128                 return;
 129         }
 130
 131         $buffer_post = PConfig::get(local_user(), 'buffer', 'post');
 132
 133         if (intval($buffer_post) == 1) {
 134                 $buffer_defpost = PConfig::get(local_user(), 'buffer', 'post_by_default');
 135                 $selected = ((intval($buffer_defpost) == 1) ? ' checked="checked" ' : '');
 136                 $b .= '<div class="profile-jot-net"><input type="checkbox" name="buffer_enable"' . $selected . ' value="1" /> '
 137                     . L10n::t('Post to Buffer') . '</div>';
 138         }
 139 }
 140
 141 function buffer_settings(App $a, &$s)
 142 {
 143         if (! local_user()) {
 144                 return;
 145         }
 146
 147         /* Add our stylesheet to the page so we can make our settings look nice */
 148
 149         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->getBaseURL() . '/addon/buffer/buffer.css' . '" media="all" />' . "\r\n";
 150
 151         /* Get the current state of our config variables */
 152
 153         $enabled = PConfig::get(local_user(),'buffer','post');
 154         $checked = (($enabled) ? ' checked="checked" ' : '');
 155         $css = (($enabled) ? '' : '-disabled');
 156
 157         $def_enabled = PConfig::get(local_user(),'buffer','post_by_default');
 158         $def_checked = (($def_enabled) ? ' checked="checked" ' : '');
 159
 160         /* Add some HTML to the existing form */
 161
 162         $s .= '<span id="settings_buffer_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_buffer_expanded\'); openClose(\'settings_buffer_inflated\');">';
 163         $s .= '<img class="connector'.$css.'" src="images/buffer.png" /><h3 class="connector">'. L10n::t('Buffer Export').'</h3>';
 164         $s .= '</span>';
 165         $s .= '<div id="settings_buffer_expanded" class="settings-block" style="display: none;">';
 166         $s .= '<span class="fakelink" onclick="openClose(\'settings_buffer_expanded\'); openClose(\'settings_buffer_inflated\');">';
 167         $s .= '<img class="connector'.$css.'" src="images/buffer.png" /><h3 class="connector">'. L10n::t('Buffer Export').'</h3>';
 168         $s .= '</span>';
 169
 170         $client_id = Config::get("buffer", "client_id");
 171         $client_secret = Config::get("buffer", "client_secret");
 172         $access_token = PConfig::get(local_user(), "buffer", "access_token");
 173
 174         $s .= '<div id="buffer-password-wrapper">';
 175
 176         if ($access_token == "") {
 177                 $s .= '<div id="buffer-authenticate-wrapper">';
 178                 $s .= '<a href="'.$a->getBaseURL().'/buffer/connect">'.L10n::t("Authenticate your Buffer connection").'</a>';
 179                 $s .= '</div><div class="clear"></div>';
 180         } else {
 181                 $s .= '<div id="buffer-enable-wrapper">';
 182                 $s .= '<label id="buffer-enable-label" for="buffer-checkbox">' . L10n::t('Enable Buffer Post Addon') . '</label>';
 183                 $s .= '<input id="buffer-checkbox" type="checkbox" name="buffer" value="1" ' . $checked . '/>';
 184                 $s .= '</div><div class="clear"></div>';
 185
 186                 $s .= '<div id="buffer-bydefault-wrapper">';
 187                 $s .= '<label id="buffer-bydefault-label" for="buffer-bydefault">' . L10n::t('Post to Buffer by default') . '</label>';
 188                 $s .= '<input id="buffer-bydefault" type="checkbox" name="buffer_bydefault" value="1" ' . $def_checked . '/>';
 189                 $s .= '</div><div class="clear"></div>';
 190
 191                 $s .= '<div id="buffer-delete-wrapper">';
 192                 $s .= '<label id="buffer-delete-label" for="buffer-delete">' . L10n::t('Check to delete this preset') . '</label>';
 193                 $s .= '<input id="buffer-delete" type="checkbox" name="buffer_delete" value="1" />';
 194                 $s .= '</div><div class="clear"></div>';
 195
 196                 // The callback URL is the script that gets called after the user authenticates with buffer
 197                 $callback_url = $a->getBaseURL() . '/buffer/connect';
 198
 199                 $buffer = new BufferApp($client_id, $client_secret, $callback_url, $access_token);
 200
 201                 $profiles = $buffer->go('/profiles');
 202                 if (is_array($profiles)) {
 203                         $s .= '<div id="buffer-accounts-wrapper">';
 204                         $s .= L10n::t("Posts are going to all accounts that are enabled by default:");
 205                         $s .= "<ul>";
 206                         foreach ($profiles as $profile) {
 207                                 if (!$profile->default)
 208                                         continue;
 209                                 $s .= "<li>";
 210                                 //$s .= "<img src='".$profile->avatar_https."' width='16' />";
 211                                 $s .= " ".$profile->formatted_username." (".$profile->formatted_service.")";
 212                                 $s .= "</li>";
 213                         }
 214                         $s .= "</ul>";
 215                         $s .= '</div><div class="clear"></div>';
 216                 }
 217
 218         }
 219
 220         $s .= '</div><div class="clear"></div>';
 221
 222         /* provide a submit button */
 223
 224         $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>';
 225 }
 226
 227
 228 function buffer_settings_post(App $a, array &$b)
 229 {
 230         if (!empty($_POST['buffer-submit'])) {
 231                 if (!empty($_POST['buffer_delete'])) {
 232                         PConfig::set(local_user(), 'buffer', 'access_token'   , '');
 233                         PConfig::set(local_user(), 'buffer', 'post'           , false);
 234                         PConfig::set(local_user(), 'buffer', 'post_by_default', false);
 235                 } else {
 236                         PConfig::set(local_user(), 'buffer', 'post'           , intval($_POST['buffer']));
 237                         PConfig::set(local_user(), 'buffer', 'post_by_default', intval($_POST['buffer_bydefault']));
 238                 }
 239         }
 240 }
 241
 242 function buffer_post_local(App $a, array &$b)
 243 {
 244         if (!local_user() || (local_user() != $b['uid'])) {
 245                 return;
 246         }
 247
 248         $buffer_post   = intval(PConfig::get(local_user(),'buffer','post'));
 249
 250         $buffer_enable = (($buffer_post && !empty($_REQUEST['buffer_enable'])) ? intval($_REQUEST['buffer_enable']) : 0);
 251
 252         if ($b['api_source'] && intval(PConfig::get(local_user(),'buffer','post_by_default'))) {
 253                 $buffer_enable = 1;
 254         }
 255
 256         if (!$buffer_enable) {
 257                 return;
 258         }
 259
 260         if (strlen($b['postopts'])) {
 261                 $b['postopts'] .= ',';
 262         }
 263
 264         $b['postopts'] .= 'buffer';
 265 }
 266
 267 function buffer_send(App $a, array &$b)
 268 {
 269         if ($b['deleted'] || $b['private'] || ($b['created'] !== $b['edited'])) {
 270                 return;
 271         }
 272
 273         if (!strstr($b['postopts'],'buffer')) {
 274                 return;
 275         }
 276
 277         if ($b['parent'] != $b['id']) {
 278                 return;
 279         }
 280
 281         // Dont't post if the post doesn't belong to us.
 282         // This is a check for forum postings
 283         $self = DBA::selectFirst('contact', ['id'], ['uid' => $b['uid'], 'self' => true]);
 284         if ($b['contact-id'] != $self['id']) {
 285                 return;
 286         }
 287
 288         // if post comes from buffer don't send it back
 289         //if($b['app'] == "Buffer")
 290         //      return;
 291
 292         $client_id = Config::get("buffer", "client_id");
 293         $client_secret = Config::get("buffer", "client_secret");
 294         $access_token = PConfig::get($b['uid'], "buffer","access_token");
 295         $callback_url = "";
 296
 297         if ($access_token) {
 298                 $buffer = new BufferApp($client_id, $client_secret, $callback_url, $access_token);
 299
 300                 $profiles = $buffer->go('/profiles');
 301                 if (is_array($profiles)) {
 302                         Logger::log("Will send these parameter ".print_r($b, true), LOGGER_DEBUG);
 303
 304                         foreach ($profiles as $profile) {
 305                                 if (!$profile->default)
 306                                         continue;
 307
 308                                 $send = false;
 309
 310                                 switch ($profile->service) {
 311                                         case 'facebook':
 312                                                 $send = ($b["extid"] != Protocol::FACEBOOK);
 313                                                 $limit = 0;
 314                                                 $markup = false;
 315                                                 $includedlinks = false;
 316                                                 $htmlmode = 9;
 317                                                 break;
 318
 319                                         case 'google':
 320                                                 $send = ($b["extid"] != Protocol::GPLUS);
 321                                                 $limit = 0;
 322                                                 $markup = true;
 323                                                 $includedlinks = false;
 324                                                 $htmlmode = 9;
 325                                                 break;
 326
 327                                         case 'twitter':
 328                                                 $send = ($b["extid"] != Protocol::TWITTER);
 329                                                 $limit = 280;
 330                                                 $markup = false;
 331                                                 $includedlinks = true;
 332                                                 $htmlmode = 8;
 333                                                 break;
 334
 335                                         case 'linkedin':
 336                                                 $send = ($b["extid"] != Protocol::LINKEDIN);
 337                                                 $limit = 700;
 338                                                 $markup = false;
 339                                                 $includedlinks = true;
 340                                                 $htmlmode = 2;
 341                                                 break;
 342                                 }
 343
 344                                 if (!$send)
 345                                         continue;
 346
 347                                 $item = $b;
 348
 349                                 // Markup for Google+
 350                                 if ($markup) {
 351                                         if ($item["title"] != "") {
 352                                                 $item["title"] = "*" . $item["title"] . "*";
 353                                         }
 354
 355                                         $item["body"] = preg_replace("(\[b\](.*?)\[\/b\])ism", '*$1*', $item["body"]);
 356                                         $item["body"] = preg_replace("(\[i\](.*?)\[\/i\])ism", '_$1_', $item["body"]);
 357                                         $item["body"] = preg_replace("(\[s\](.*?)\[\/s\])ism", '-$1-', $item["body"]);
 358                                 }
 359
 360                                 $post = ItemContent::getPlaintextPost($item, $limit, $includedlinks, $htmlmode);
 361                                 Logger::log("buffer_send: converted message ".$b["id"]." result: ".print_r($post, true), LOGGER_DEBUG);
 362
 363                                 // The image proxy is used as a sanitizer. Buffer seems to be really picky about pictures
 364                                 if (isset($post["image"])) {
 365                                         $post["image"] = ProxyUtils::proxifyUrl($post["image"]);
 366                                 }
 367
 368                                 if (isset($post["preview"])) {
 369                                         $post["preview"] = ProxyUtils::proxifyUrl($post["preview"]);
 370                                 }
 371
 372                                 // Seems like a bug to me
 373                                 // Buffer doesn't add links to Twitter (but pictures)
 374                                 if (($profile->service == "twitter") && isset($post["url"]) && ($post["type"] != "photo")) {
 375                                         $post["text"] .= " " . $post["url"];
 376                                 } elseif ($profile->service == "google") {
 377                                         $post["text"] .= html_entity_decode("&#x00A0;", ENT_QUOTES, 'UTF-8'); // Send a special blank to identify the post through the "fromgplus" addon
 378                                 }
 379
 380                                 $message = [];
 381                                 $message["text"] = $post["text"];
 382                                 $message["profile_ids[]"] = $profile->id;
 383                                 $message["shorten"] = false;
 384                                 $message["now"] = true;
 385
 386                                 if (isset($post["title"])) {
 387                                         $message["media[title]"] = $post["title"];
 388                                 }
 389
 390                                 if (isset($post["description"])) {
 391                                         $message["media[description]"] = $post["description"];
 392                                 }
 393
 394                                 if (isset($post["url"]) && ($post["type"] != "photo")) {
 395                                         $message["media[link]"] = $post["url"];
 396                                 }
 397
 398                                 if (isset($post["image"])) {
 399                                         $message["media[picture]"] = $post["image"];
 400
 401                                         if ($post["type"] == "photo") {
 402                                                 $message["media[thumbnail]"] = $post["image"];
 403                                         }
 404                                 }
 405
 406                                 if (isset($post["preview"])) {
 407                                         $message["media[thumbnail]"] = $post["preview"];
 408                                 }
 409
 410                                 //print_r($message);
 411                                 Logger::log("buffer_send: data for message " . $b["id"] . ": " . print_r($message, true), LOGGER_DEBUG);
 412                                 $ret = $buffer->go('/updates/create', $message);
 413                                 Logger::log("buffer_send: send message " . $b["id"] . " result: " . print_r($ret, true), LOGGER_DEBUG);
 414                         }
 415                 }
 416         }
 417 }