forked from friendica/friendica-addons
Merge pull request #1108 from mexon/mat/mailstream-comments
Add comments to functions in mailstream plugin
This commit is contained in:
commit
6a325dc14d
1 changed files with 106 additions and 13 deletions
|
@ -16,6 +16,9 @@ use Friendica\Model\Item;
|
||||||
use Friendica\Model\Post;
|
use Friendica\Model\Post;
|
||||||
use Friendica\Protocol\Activity;
|
use Friendica\Protocol\Activity;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Sets up the addon hooks and the database table
|
||||||
|
*/
|
||||||
function mailstream_install() {
|
function mailstream_install() {
|
||||||
Hook::register('addon_settings', 'addon/mailstream/mailstream.php', 'mailstream_addon_settings');
|
Hook::register('addon_settings', 'addon/mailstream/mailstream.php', 'mailstream_addon_settings');
|
||||||
Hook::register('addon_settings_post', 'addon/mailstream/mailstream.php', 'mailstream_addon_settings_post');
|
Hook::register('addon_settings_post', 'addon/mailstream/mailstream.php', 'mailstream_addon_settings_post');
|
||||||
|
@ -57,9 +60,18 @@ function mailstream_install() {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* This funciton indicates a module that can be wrapped in the LegacyModule class
|
||||||
|
*/
|
||||||
function mailstream_module() {}
|
function mailstream_module() {}
|
||||||
|
|
||||||
function mailstream_addon_admin(&$a,&$o) {
|
/**
|
||||||
|
* Adds an item in "addon features" in the admin menu of the site
|
||||||
|
*
|
||||||
|
* @param Friendica\App $a App object (unused)
|
||||||
|
* @param string $o HTML form data
|
||||||
|
*/
|
||||||
|
function mailstream_addon_admin(&$a, &$o) {
|
||||||
$frommail = DI::config()->get('mailstream', 'frommail');
|
$frommail = DI::config()->get('mailstream', 'frommail');
|
||||||
$template = Renderer::getMarkupTemplate('admin.tpl', 'addon/mailstream/');
|
$template = Renderer::getMarkupTemplate('admin.tpl', 'addon/mailstream/');
|
||||||
$config = ['frommail',
|
$config = ['frommail',
|
||||||
|
@ -71,14 +83,24 @@ function mailstream_addon_admin(&$a,&$o) {
|
||||||
'$submit' => DI::l10n()->t('Save Settings')]);
|
'$submit' => DI::l10n()->t('Save Settings')]);
|
||||||
}
|
}
|
||||||
|
|
||||||
function mailstream_addon_admin_post ($a) {
|
/**
|
||||||
|
* Process input from the "addon features" part of the admin menu
|
||||||
|
*/
|
||||||
|
function mailstream_addon_admin_post() {
|
||||||
if (!empty($_POST['frommail'])) {
|
if (!empty($_POST['frommail'])) {
|
||||||
DI::config()->set('mailstream', 'frommail', $_POST['frommail']);
|
DI::config()->set('mailstream', 'frommail', $_POST['frommail']);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
function mailstream_generate_id($a, $uri) {
|
/**
|
||||||
// http://www.jwz.org/doc/mid.html
|
* Creates a message ID for a post URI in accordance with RFC 1036
|
||||||
|
* See also http://www.jwz.org/doc/mid.html
|
||||||
|
*
|
||||||
|
* @param string $uri the URI to be converted to a message ID
|
||||||
|
*
|
||||||
|
* @return string the created message ID
|
||||||
|
*/
|
||||||
|
function mailstream_generate_id($uri) {
|
||||||
$host = DI::baseUrl()->getHostname();
|
$host = DI::baseUrl()->getHostname();
|
||||||
$resource = hash('md5', $uri);
|
$resource = hash('md5', $uri);
|
||||||
$message_id = "<" . $resource . "@" . $host . ">";
|
$message_id = "<" . $resource . "@" . $host . ">";
|
||||||
|
@ -86,6 +108,14 @@ function mailstream_generate_id($a, $uri) {
|
||||||
return $message_id;
|
return $message_id;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Called when either a local or remote post is created. Creates a
|
||||||
|
* record in the mailstream_item table to track this email, and then
|
||||||
|
* immediately attempts to send it
|
||||||
|
*
|
||||||
|
* @param Friendica\App $a App object (unused)
|
||||||
|
* @param array $item content of the item (may or may not already be stored in the item table)
|
||||||
|
*/
|
||||||
function mailstream_post_hook(&$a, &$item) {
|
function mailstream_post_hook(&$a, &$item) {
|
||||||
if (!DI::pConfig()->get($item['uid'], 'mailstream', 'enabled')) {
|
if (!DI::pConfig()->get($item['uid'], 'mailstream', 'enabled')) {
|
||||||
Logger::debug('mailstream: not enabled for item ' . $item['id']);
|
Logger::debug('mailstream: not enabled for item ' . $item['id']);
|
||||||
|
@ -114,7 +144,7 @@ function mailstream_post_hook(&$a, &$item) {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
$message_id = mailstream_generate_id($a, $item['uri']);
|
$message_id = mailstream_generate_id($item['uri']);
|
||||||
q("INSERT INTO `mailstream_item` (`uid`, `contact-id`, `uri`, `message-id`) " .
|
q("INSERT INTO `mailstream_item` (`uid`, `contact-id`, `uri`, `message-id`) " .
|
||||||
"VALUES (%d, '%s', '%s', '%s')", intval($item['uid']),
|
"VALUES (%d, '%s', '%s', '%s')", intval($item['uid']),
|
||||||
intval($item['contact-id']), DBA::escape($item['uri']), DBA::escape($message_id));
|
intval($item['contact-id']), DBA::escape($item['uri']), DBA::escape($message_id));
|
||||||
|
@ -130,9 +160,16 @@ function mailstream_post_hook(&$a, &$item) {
|
||||||
Logger::info('mailstream_post_remote_hook: no user ' . $item['uid']);
|
Logger::info('mailstream_post_remote_hook: no user ' . $item['uid']);
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
mailstream_send($a, $ms_item['message-id'], $item, $user);
|
mailstream_send($ms_item['message-id'], $item, $user);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Converts a user ID into a full user record from the corresponding database table
|
||||||
|
*
|
||||||
|
* @param int $uid ID of the user to query
|
||||||
|
*
|
||||||
|
* @return array results from the user table
|
||||||
|
*/
|
||||||
function mailstream_get_user($uid) {
|
function mailstream_get_user($uid) {
|
||||||
$r = q('SELECT * FROM `user` WHERE `uid` = %d', intval($uid));
|
$r = q('SELECT * FROM `user` WHERE `uid` = %d', intval($uid));
|
||||||
if (count($r) != 1) {
|
if (count($r) != 1) {
|
||||||
|
@ -142,7 +179,18 @@ function mailstream_get_user($uid) {
|
||||||
return $r[0];
|
return $r[0];
|
||||||
}
|
}
|
||||||
|
|
||||||
function mailstream_do_images($a, &$item, &$attachments) {
|
/**
|
||||||
|
* If the user has configured attaching images to emails as
|
||||||
|
* attachments, this function searches the post for such images,
|
||||||
|
* retrieves the image, and inserts the data and metadata into the
|
||||||
|
* supplied array
|
||||||
|
*
|
||||||
|
* @param array $item content of the item
|
||||||
|
* @param array $attachments contains an array element for each attachment to add to the email
|
||||||
|
*
|
||||||
|
* @return array new value of the attachments table (results are also stored in the reference parameter)
|
||||||
|
*/
|
||||||
|
function mailstream_do_images(&$item, &$attachments) {
|
||||||
if (!DI::pConfig()->get($item['uid'], 'mailstream', 'attachimg')) {
|
if (!DI::pConfig()->get($item['uid'], 'mailstream', 'attachimg')) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
@ -172,6 +220,13 @@ function mailstream_do_images($a, &$item, &$attachments) {
|
||||||
return $attachments;
|
return $attachments;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Creates a sender to use in the email, either from the contact or the author of the item, or both
|
||||||
|
*
|
||||||
|
* @param array $item content of the item
|
||||||
|
*
|
||||||
|
* @return string sender suitable for use in the email
|
||||||
|
*/
|
||||||
function mailstream_sender($item) {
|
function mailstream_sender($item) {
|
||||||
$r = q('SELECT * FROM `contact` WHERE `id` = %d', $item['contact-id']);
|
$r = q('SELECT * FROM `contact` WHERE `id` = %d', $item['contact-id']);
|
||||||
if (DBA::isResult($r)) {
|
if (DBA::isResult($r)) {
|
||||||
|
@ -183,6 +238,13 @@ function mailstream_sender($item) {
|
||||||
return $item['author-name'];
|
return $item['author-name'];
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Converts a bbcode-encoded subject line into a plaintext version suitable for the subject line of an email
|
||||||
|
*
|
||||||
|
* @param string $subject bbcode-encoded subject line
|
||||||
|
*
|
||||||
|
* @return string plaintext subject line
|
||||||
|
*/
|
||||||
function mailstream_decode_subject($subject) {
|
function mailstream_decode_subject($subject) {
|
||||||
$html = BBCode::convert($subject);
|
$html = BBCode::convert($subject);
|
||||||
if (!$html) {
|
if (!$html) {
|
||||||
|
@ -207,6 +269,13 @@ function mailstream_decode_subject($subject) {
|
||||||
return $trimmed;
|
return $trimmed;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Creates a subject line to use in the email
|
||||||
|
*
|
||||||
|
* @param array $item content of the item
|
||||||
|
*
|
||||||
|
* @return string subject line suitable for use in the email
|
||||||
|
*/
|
||||||
function mailstream_subject($item) {
|
function mailstream_subject($item) {
|
||||||
if ($item['title']) {
|
if ($item['title']) {
|
||||||
return mailstream_decode_subject($item['title']);
|
return mailstream_decode_subject($item['title']);
|
||||||
|
@ -255,7 +324,14 @@ function mailstream_subject($item) {
|
||||||
return DI::l10n()->t("Friendica Item");
|
return DI::l10n()->t("Friendica Item");
|
||||||
}
|
}
|
||||||
|
|
||||||
function mailstream_send(\Friendica\App $a, $message_id, $item, $user) {
|
/**
|
||||||
|
* Sends a message using PHPMailer
|
||||||
|
*
|
||||||
|
* @param string $message_id ID of the message (RFC 1036)
|
||||||
|
* @param array $item content of the item
|
||||||
|
* @param array $user results from the user table
|
||||||
|
*/
|
||||||
|
function mailstream_send($message_id, $item, $user) {
|
||||||
if (!$item['visible']) {
|
if (!$item['visible']) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
@ -265,7 +341,7 @@ function mailstream_send(\Friendica\App $a, $message_id, $item, $user) {
|
||||||
require_once(dirname(__file__).'/phpmailer/class.phpmailer.php');
|
require_once(dirname(__file__).'/phpmailer/class.phpmailer.php');
|
||||||
|
|
||||||
$attachments = [];
|
$attachments = [];
|
||||||
mailstream_do_images($a, $item, $attachments);
|
mailstream_do_images($item, $attachments);
|
||||||
$frommail = DI::config()->get('mailstream', 'frommail');
|
$frommail = DI::config()->get('mailstream', 'frommail');
|
||||||
if ($frommail == "") {
|
if ($frommail == "") {
|
||||||
$frommail = 'friendica@localhost.local';
|
$frommail = 'friendica@localhost.local';
|
||||||
|
@ -282,7 +358,7 @@ function mailstream_send(\Friendica\App $a, $message_id, $item, $user) {
|
||||||
$mail->MessageID = $message_id;
|
$mail->MessageID = $message_id;
|
||||||
$mail->Subject = mailstream_subject($item);
|
$mail->Subject = mailstream_subject($item);
|
||||||
if ($item['thr-parent'] != $item['uri']) {
|
if ($item['thr-parent'] != $item['uri']) {
|
||||||
$mail->addCustomHeader('In-Reply-To: ' . mailstream_generate_id($a, $item['thr-parent']));
|
$mail->addCustomHeader('In-Reply-To: ' . mailstream_generate_id($item['thr-parent']));
|
||||||
}
|
}
|
||||||
$mail->addCustomHeader('X-Friendica-Mailstream-URI: ' . $item['uri']);
|
$mail->addCustomHeader('X-Friendica-Mailstream-URI: ' . $item['uri']);
|
||||||
$mail->addCustomHeader('X-Friendica-Mailstream-Plink: ' . $item['plink']);
|
$mail->addCustomHeader('X-Friendica-Mailstream-Plink: ' . $item['plink']);
|
||||||
|
@ -320,6 +396,8 @@ function mailstream_send(\Friendica\App $a, $message_id, $item, $user) {
|
||||||
* Email tends to break if you send excessively long lines. To make
|
* Email tends to break if you send excessively long lines. To make
|
||||||
* bbcode's output suitable for transmission, we try to break things
|
* bbcode's output suitable for transmission, we try to break things
|
||||||
* up so that lines are about 200 characters.
|
* up so that lines are about 200 characters.
|
||||||
|
*
|
||||||
|
* @param string $text text to word wrap - modified in-place
|
||||||
*/
|
*/
|
||||||
function mailstream_html_wrap(&$text)
|
function mailstream_html_wrap(&$text)
|
||||||
{
|
{
|
||||||
|
@ -330,7 +408,10 @@ function mailstream_html_wrap(&$text)
|
||||||
$text = implode($lines);
|
$text = implode($lines);
|
||||||
}
|
}
|
||||||
|
|
||||||
function mailstream_cron($a, $b) {
|
/**
|
||||||
|
* Cron job for the mailstream plugin. Sends delayed messages and cleans up old successful entries from the table.
|
||||||
|
*/
|
||||||
|
function mailstream_cron() {
|
||||||
// Only process items older than an hour in cron. This is because
|
// Only process items older than an hour in cron. This is because
|
||||||
// we want to give mailstream_post_remote_hook a fair chance to
|
// we want to give mailstream_post_remote_hook a fair chance to
|
||||||
// send the email itself before cron jumps in. Only if
|
// send the email itself before cron jumps in. Only if
|
||||||
|
@ -369,7 +450,7 @@ EOT;
|
||||||
$users = q("SELECT * FROM `user` WHERE `uid` = %d", intval($item['uid']));
|
$users = q("SELECT * FROM `user` WHERE `uid` = %d", intval($item['uid']));
|
||||||
$user = $users[0];
|
$user = $users[0];
|
||||||
if ($user && $item) {
|
if ($user && $item) {
|
||||||
mailstream_send($a, $ms_item_id['message-id'], $item, $user);
|
mailstream_send($ms_item_id['message-id'], $item, $user);
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
Logger::info('mailstream_cron: Unable to find item ' . $ms_item_id['id']);
|
Logger::info('mailstream_cron: Unable to find item ' . $ms_item_id['id']);
|
||||||
|
@ -380,6 +461,12 @@ EOT;
|
||||||
mailstream_tidy();
|
mailstream_tidy();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Form for configuring mailstream features for a user
|
||||||
|
*
|
||||||
|
* @param Friendica\App $a App object
|
||||||
|
* @param string $o HTML form data
|
||||||
|
*/
|
||||||
function mailstream_addon_settings(&$a, &$s) {
|
function mailstream_addon_settings(&$a, &$s) {
|
||||||
$enabled = DI::pConfig()->get(local_user(), 'mailstream', 'enabled');
|
$enabled = DI::pConfig()->get(local_user(), 'mailstream', 'enabled');
|
||||||
$address = DI::pConfig()->get(local_user(), 'mailstream', 'address');
|
$address = DI::pConfig()->get(local_user(), 'mailstream', 'address');
|
||||||
|
@ -410,7 +497,10 @@ function mailstream_addon_settings(&$a, &$s) {
|
||||||
'$submit' => DI::l10n()->t('Save Settings')]);
|
'$submit' => DI::l10n()->t('Save Settings')]);
|
||||||
}
|
}
|
||||||
|
|
||||||
function mailstream_addon_settings_post($a,$post) {
|
/**
|
||||||
|
* Process data submitted to user's mailstream features form
|
||||||
|
*/
|
||||||
|
function mailstream_addon_settings_post() {
|
||||||
if ($_POST['mailstream_address'] != "") {
|
if ($_POST['mailstream_address'] != "") {
|
||||||
DI::pConfig()->set(local_user(), 'mailstream', 'address', $_POST['mailstream_address']);
|
DI::pConfig()->set(local_user(), 'mailstream', 'address', $_POST['mailstream_address']);
|
||||||
}
|
}
|
||||||
|
@ -437,6 +527,9 @@ function mailstream_addon_settings_post($a,$post) {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Deletes records from the mailstream_item table older than one year
|
||||||
|
*/
|
||||||
function mailstream_tidy() {
|
function mailstream_tidy() {
|
||||||
$r = q("SELECT id FROM mailstream_item WHERE completed IS NOT NULL AND completed < DATE_SUB(NOW(), INTERVAL 1 YEAR)");
|
$r = q("SELECT id FROM mailstream_item WHERE completed IS NOT NULL AND completed < DATE_SUB(NOW(), INTERVAL 1 YEAR)");
|
||||||
foreach ($r as $rr) {
|
foreach ($r as $rr) {
|
||||||
|
|
Loading…
Reference in a new issue