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