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