* Author: Michael Vogel <http://pirati.ca/profile/heluecht>
*
*/
-//use DOMDocument;
-//use DOMXPath;
use Friendica\App;
use Friendica\Core\Hook;
-use Friendica\Core\L10n;
use Friendica\Core\Logger;
-use Friendica\Core\PConfig;
+use Friendica\Core\Renderer;
use Friendica\Core\Protocol;
use Friendica\Database\DBA;
+use Friendica\DI;
use Friendica\Model\Contact;
-use Friendica\Util\XML;
use Friendica\Content\Text\Markdown;
use Friendica\Util\Network;
use Friendica\Util\Strings;
Use Friendica\Util\DateTimeFormat;
+/* Todo:
+ * - Obtaining API tokens to be able to read non public posts as well
+ * - Handling duplicates (possibly using some non visible marker)
+ * - Fetching missing posts
+ * - Fetch topic information
+ * - Support mail free mode when write tokens are available
+ * - Fix incomplete (relative) links (hosts are missing)
+*/
+
function discourse_install()
{
- Hook::register('email_getmessage', __FILE__, 'discourse_email_getmessage');
- Hook::register('email_getmessage_end', __FILE__, 'discourse_email_getmessage_end');
- Hook::register('addon_settings', __FILE__, 'discourse_addon_settings');
- Hook::register('addon_settings_post', __FILE__, 'discourse_addon_settings_post');
+ Hook::register('email_getmessage', __FILE__, 'discourse_email_getmessage');
+ Hook::register('connector_settings', __FILE__, 'discourse_settings');
+ Hook::register('connector_settings_post', __FILE__, 'discourse_settings_post');
}
-function discourse_uninstall()
+function discourse_settings(App $a, &$s)
{
- Hook::unregister('email_getmessage', __FILE__, 'discourse_email_getmessage');
- Hook::unregister('email_getmessage_end', __FILE__, 'discourse_email_getmessage_end');
- Hook::unregister('addon_settings', __FILE__, 'discourse_addon_settings');
- Hook::unregister('addon_settings_post', __FILE__, 'discourse_addon_settings_post');
-}
+ if (!local_user()) {
+ return;
+ }
-function discourse_addon_settings(App $a, &$s)
-{
+ $enabled = intval(DI::pConfig()->get(local_user(), 'discourse', 'enabled'));
+
+ $t = Renderer::getMarkupTemplate('settings.tpl', 'addon/discourse/');
+ $s .= Renderer::replaceMacros($t, [
+ '$title' => DI::l10n()->t('Discourse'),
+ '$enabled' => ['enabled', DI::l10n()->t('Enable processing of Discourse mailing list mails'), $enabled, DI::l10n()->t('If enabled, incoming mails from Discourse will be improved so they look much better. To make it work, you have to configure the e-mail settings in Friendica. You also have to enable the mailing list mode in Discourse. Then you have to add the Discourse mail account as contact.')],
+ '$submit' => DI::l10n()->t('Save Settings'),
+ ]);
}
-function discourse_addon_settings_post(App $a)
+function discourse_settings_post(App $a)
{
+ if (!local_user() || empty($_POST['discourse-submit'])) {
+ return;
+ }
+
+ DI::pConfig()->set(local_user(), 'discourse', 'enabled', intval($_POST['enabled']));
}
function discourse_email_getmessage(App $a, &$message)
{
-// Logger::info('Got raw message', $message);
+ if (empty($message['item']['uid'])) {
+ return;
+ }
-/* if (preg_match('=topic/(.*)/(.*)@(.*)=', $message['item']['uri'], $matches)) {
- Logger::info('Got post data', ['topic' => $matches[1], 'post' => $matches[2], 'host' => $matches[3]]);
- if (discourse_fetch_post_from_api($message, $matches[2], $matches[3])) {
- return;
- }
+ if (!DI::pConfig()->get($message['item']['uid'], 'discourse', 'enabled')) {
+ return;
}
-*/
+
+ // We do assume that all Discourse servers are running with SSL
+ if (preg_match('=topic/(.*\d)/(.*\d)@(.*)=', $message['item']['uri'], $matches) &&
+ discourse_fetch_post_from_api($message, $matches[2], $matches[3])) {
+ Logger::info('Fetched comment via API (message-id mode)', ['host' => $matches[3], 'topic' => $matches[1], 'post' => $matches[2]]);
+ return;
+ }
+
+ if (preg_match('=topic/(.*\d)@(.*)=', $message['item']['uri'], $matches) &&
+ discourse_fetch_topic_from_api($message, 'https://' . $matches[2], $matches[1], 1)) {
+ Logger::info('Fetched starting post via API (message-id mode)', ['host' => $matches[2], 'topic' => $matches[1]]);
+ return;
+ }
+
// Search in the text part for the link to the discourse entry and the text body
- // The text body is used as alternative, if the fetched HTML isn't working
if (!empty($message['text'])) {
$message = discourse_get_text($message);
}
- if (!empty($message['item']['plink'])) {
- if (preg_match('=(http.*)/t/.*/(.*\d)/(.*\d)=', $message['item']['plink'], $matches)) {
- if (discourse_fetch_topic_from_api($message, $matches[1], $matches[2], $matches[3])) {
- return;
- }
- }
+ if (empty($message['item']['plink']) || !preg_match('=(http.*)/t/.*/(.*\d)/(.*\d)=', $message['item']['plink'], $matches)) {
+ Logger::info('This is no Discourse post');
+ return;
}
- Logger::info('Stop');
-die('Test');
+
+ if (discourse_fetch_topic_from_api($message, $matches[1], $matches[2], $matches[3])) {
+ Logger::info('Fetched post via API (plink mode)', ['host' => $matches[1], 'topic' => $matches[2], 'id' => $matches[3]]);
+ return;
+ }
+
+ Logger::info('Fallback mode', ['plink' => $message['item']['plink']]);
// Search in the HTML part for the discourse entry and the author profile
if (!empty($message['html'])) {
$message = discourse_get_html($message);
$posts = $data['post_stream']['posts'];
foreach($posts as $post) {
if ($post['post_number'] != $pid) {
- // Test
- discourse_get_user($post, $host);
+ /// @todo Possibly fetch missing posts here
continue;
}
Logger::info('Got post data from topic', $post);
{
$host = parse_url($hostaddr, PHP_URL_HOST);
+ // Currently unused contact fields:
+ // - display_username
+ // - user_id
+
$contact = [];
- // display_username
- // user_id
$contact['uid'] = 0;
$contact['network'] = Protocol::DISCOURSE;
$contact['name'] = $contact['nick'] = $post['username'];
if ($post['post_number'] == 1) {
$message['item']['parent-uri'] = $message['item']['uri'] = 'topic/' . $post['topic_id'] . '@' . $host;
- // To-Do: Thread information
+
+ // Remove the Discourse forum name from the subject
+ $pattern = '=\[.*\].*\s(\[.*\].*)=';
+ if (preg_match($pattern, $message['item']['title'])) {
+ $message['item']['title'] = preg_replace($pattern, '$1', $message['item']['title']);
+ }
+ /// @ToDo Fetch thread information
} else {
$message['item']['uri'] = 'topic/' . $post['topic_id'] . '/' . $post['id'] . '@' . $host;
unset($message['item']['title']);
$xpath = new DomXPath($doc);
- // Fetch the first 'div' before the 'hr' -hopefully this fits for all systems
+ // Fetch the first 'div' before the 'hr' - hopefully this fits for all systems
$result = $xpath->query("//hr//preceding::div[1]");
$div = $doc2->importNode($result->item(0), true);
$doc2->appendChild($div);
Logger::info('Found html body', ['html' => $message['html']]);
$profile = discourse_get_profile($xpath);
- if (!empty($profile)) {
+ if (!empty($profile['url'])) {
Logger::info('Found profile', $profile);
$message['item']['author-id'] = Contact::getIdForURL($profile['url'], 0, true, $profile);
$message['item']['author-link'] = $profile['url'];
}
return $profile;
}
-
-function discourse_email_getmessage_end(App $a, &$message)
-{
-// Logger::info('Got converted message', $message);
-}
projects / friendica-addons.git / blobdiff