buffer/buffer.php

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