libertree/libertree.php

   1 <?php
   2 /**
   3  * Name: Libertree Post Connector
   4  * Description: Post to libertree accounts
   5  * Version: 1.0
   6  * Author: Tony Baldwin <https://free-haven.org/u/tony>
   7  */
   8
   9 use Friendica\App;
  10 use Friendica\Content\Text\BBCode;
  11 use Friendica\Core\Hook;
  12 use Friendica\Core\Logger;
  13 use Friendica\Core\Renderer;
  14 use Friendica\Database\DBA;
  15 use Friendica\DI;
  16 use Friendica\Model\Post;
  17
  18 function libertree_install()
  19 {
  20         Hook::register('hook_fork',            'addon/libertree/libertree.php', 'libertree_hook_fork');
  21         Hook::register('post_local',           'addon/libertree/libertree.php', 'libertree_post_local');
  22         Hook::register('notifier_normal',      'addon/libertree/libertree.php', 'libertree_send');
  23         Hook::register('jot_networks',         'addon/libertree/libertree.php', 'libertree_jot_nets');
  24         Hook::register('connector_settings',      'addon/libertree/libertree.php', 'libertree_settings');
  25         Hook::register('connector_settings_post', 'addon/libertree/libertree.php', 'libertree_settings_post');
  26 }
  27
  28 function libertree_jot_nets(array &$jotnets_fields)
  29 {
  30         if (!DI::userSession()->getLocalUserId()) {
  31                 return;
  32         }
  33
  34         if (DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'libertree', 'post')) {
  35                 $jotnets_fields[] = [
  36                         'type' => 'checkbox',
  37                         'field' => [
  38                                 'libertree_enable',
  39                                 DI::l10n()->t('Post to libertree'),
  40                                 DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'libertree', 'post_by_default'),
  41                         ],
  42                 ];
  43         }
  44 }
  45
  46 function libertree_settings(array &$data)
  47 {
  48         if (!DI::userSession()->getLocalUserId()) {
  49                 return;
  50         }
  51
  52         $enabled         = DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'libertree', 'post', false);
  53         $ltree_api_token = DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'libertree', 'libertree_api_token');
  54         $ltree_url       = DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'libertree', 'libertree_url');
  55         $def_enabled     = DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'libertree', 'post_by_default');
  56
  57         $t    = Renderer::getMarkupTemplate('connector_settings.tpl', 'addon/libertree/');
  58         $html = Renderer::replaceMacros($t, [
  59                 '$enabled'         => ['libertree', DI::l10n()->t('Enable Libertree Post Addon'), $enabled],
  60                 '$ltree_url'       => ['libertree_url', DI::l10n()->t('Libertree site URL'), $ltree_url],
  61                 '$ltree_api_token' => ['libertree_api_token', DI::l10n()->t('Libertree API token'), $ltree_api_token],
  62                 '$bydefault'       => ['ij_bydefault', DI::l10n()->t('Post to Libertree by default'), $def_enabled],
  63         ]);
  64
  65         $data = [
  66                 'connector' => 'libertree',
  67                 'title'     => DI::l10n()->t('Libertree Export'),
  68                 'image'     => 'images/libertree.png',
  69                 'enabled'   => $enabled,
  70                 'html'      => $html,
  71         ];
  72 }
  73
  74 function libertree_settings_post(array &$b)
  75 {
  76         if (!empty($_POST['libertree-submit'])) {
  77                 DI::pConfig()->set(DI::userSession()->getLocalUserId(),'libertree','post',intval($_POST['libertree']));
  78                 DI::pConfig()->set(DI::userSession()->getLocalUserId(),'libertree','post_by_default',intval($_POST['libertree_bydefault']));
  79                 DI::pConfig()->set(DI::userSession()->getLocalUserId(),'libertree','libertree_api_token',trim($_POST['libertree_api_token']));
  80                 DI::pConfig()->set(DI::userSession()->getLocalUserId(),'libertree','libertree_url',trim($_POST['libertree_url']));
  81
  82         }
  83
  84 }
  85
  86 function libertree_hook_fork(array &$b)
  87 {
  88         if ($b['name'] != 'notifier_normal') {
  89                 return;
  90         }
  91
  92         $post = $b['data'];
  93
  94         if ($post['deleted'] || $post['private'] || ($post['created'] !== $post['edited']) ||
  95                 !strstr($post['postopts'], 'libertree') || ($post['parent'] != $post['id'])) {
  96                 $b['execute'] = false;
  97                 return;
  98         }
  99 }
 100
 101 function libertree_post_local(array &$b)
 102 {
 103
 104         // This can probably be changed to allow editing by pointing to a different API endpoint
 105
 106         if ($b['edit']) {
 107                 return;
 108         }
 109
 110         if (!DI::userSession()->getLocalUserId() || (DI::userSession()->getLocalUserId() != $b['uid'])) {
 111                 return;
 112         }
 113
 114         if ($b['private'] || $b['parent']) {
 115                 return;
 116         }
 117
 118         $ltree_post   = intval(DI::pConfig()->get(DI::userSession()->getLocalUserId(),'libertree','post'));
 119
 120         $ltree_enable = (($ltree_post && !empty($_REQUEST['libertree_enable'])) ? intval($_REQUEST['libertree_enable']) : 0);
 121
 122         if ($b['api_source'] && intval(DI::pConfig()->get(DI::userSession()->getLocalUserId(),'libertree','post_by_default'))) {
 123                 $ltree_enable = 1;
 124         }
 125
 126         if (!$ltree_enable) {
 127                 return;
 128         }
 129
 130         if (strlen($b['postopts'])) {
 131                 $b['postopts'] .= ',';
 132         }
 133
 134         $b['postopts'] .= 'libertree';
 135 }
 136
 137 function libertree_send(array &$b)
 138 {
 139         Logger::notice('libertree_send: invoked');
 140
 141         if ($b['deleted'] || $b['private'] || ($b['created'] !== $b['edited'])) {
 142                 return;
 143         }
 144
 145         if (! strstr($b['postopts'],'libertree')) {
 146                 return;
 147         }
 148
 149         if ($b['parent'] != $b['id']) {
 150                 return;
 151         }
 152
 153         // Dont't post if the post doesn't belong to us.
 154         // This is a check for group postings
 155         $self = DBA::selectFirst('contact', ['id'], ['uid' => $b['uid'], 'self' => true]);
 156         if ($b['contact-id'] != $self['id']) {
 157                 return;
 158         }
 159
 160         $b['body'] = Post\Media::addAttachmentsToBody($b['uri-id'], DI::contentItem()->addSharedPost($b));
 161
 162         $ltree_api_token = DI::pConfig()->get($b['uid'],'libertree','libertree_api_token');
 163         $ltree_url = DI::pConfig()->get($b['uid'],'libertree','libertree_url');
 164         $ltree_blog = "$ltree_url/api/v1/posts/create/?token=$ltree_api_token";
 165         $ltree_source = DI::baseUrl()->getHost();
 166
 167         if ($b['app'] != "")
 168                 $ltree_source .= " (".$b['app'].")";
 169
 170         if($ltree_url && $ltree_api_token && $ltree_blog && $ltree_source) {
 171                 $title = $b['title'];
 172                 $body = $b['body'];
 173                 // Insert a newline before and after a quote
 174                 $body = str_ireplace("[quote", "\n\n[quote", $body);
 175                 $body = str_ireplace("[/quote]", "[/quote]\n\n", $body);
 176
 177                 // Removal of tags and mentions
 178                 // #-tags
 179                 $body = preg_replace('/#\[url\=(\w+.*?)\](\w+.*?)\[\/url\]/i', '#$2', $body);
 180                 // @-mentions
 181                 $body = preg_replace('/@\[url\=(\w+.*?)\](\w+.*?)\[\/url\]/i', '@$2', $body);
 182
 183                 // remove multiple newlines
 184                 do {
 185                         $oldbody = $body;
 186                         $body = str_replace("\n\n\n", "\n\n", $body);
 187                 } while ($oldbody != $body);
 188
 189                 // convert to markdown
 190                 $body = BBCode::toMarkdown($body, false);
 191
 192                 // Adding the title
 193                 if (strlen($title)) {
 194                         $body = '## ' . html_entity_decode($title) . "\n\n" . $body;
 195                 }
 196
 197
 198                 $params = [
 199                         'text' => $body,
 200                         'source' => $ltree_source
 201                 //      'token' => $ltree_api_token
 202                 ];
 203
 204                 $result = DI::httpClient()->post($ltree_blog, $params)->getBody();
 205                 Logger::notice('libertree: ' . $result);
 206         }
 207 }