Use the "reply-to" header of the original post when answering via mail

This commit is contained in:
Michael 2019-11-22 22:15:04 +00:00
parent 7fac116d5e
commit 37bdafcc96
2 changed files with 26 additions and 10 deletions

View File

@ -321,7 +321,7 @@ class Email
}
/**
* Function send is used by Protocol::EMAIL and Protocol::EMAIL2 code
* Function send is used by Protocol::EMAIL code
* (not to notify the user, but to send items to email contacts)
*
* @param string $addr address

View File

@ -103,7 +103,7 @@ class Delivery extends BaseObject
}
$condition = ['uri' => $target_item['thr-parent'], 'uid' => $target_item['uid']];
$thr_parent = Model\Item::selectFirst(['network'], $condition);
$thr_parent = Model\Item::selectFirst(['network', 'object'], $condition);
if (!DBA::isResult($thr_parent)) {
// Shouldn't happen. But when this does, we just take the parent as thread parent.
// That's totally okay for what we use this variable here.
@ -209,7 +209,7 @@ class Delivery extends BaseObject
break;
case Protocol::MAIL:
self::deliverMail($cmd, $contact, $owner, $target_item);
self::deliverMail($cmd, $contact, $owner, $target_item, $thr_parent);
break;
default:
@ -481,10 +481,11 @@ class Delivery extends BaseObject
* @param array $contact Contact record of the receiver
* @param array $owner Owner record of the sender
* @param array $target_item Item record of the content
* @param array $thr_parent Item record of the thread parent
* @throws \Friendica\Network\HTTPException\InternalServerErrorException
* @throws \ImagickException
*/
private static function deliverMail($cmd, $contact, $owner, $target_item)
private static function deliverMail($cmd, $contact, $owner, $target_item, $thr_parent)
{
if (Config::get('system','dfrn_only')) {
return;
@ -500,12 +501,23 @@ class Delivery extends BaseObject
return;
}
if (!empty($thr_parent['object'])) {
$data = json_decode($thr_parent['object'], true);
if (!empty($data['reply_to'])) {
$addr = $data['reply_to'][0]['mailbox'] . '@' . $data['reply_to'][0]['host'];
Logger::info('Use "reply-to" address of the thread parent', ['addr' => $addr]);
} elseif (!empty($data['from'])) {
$addr = $data['from'][0]['mailbox'] . '@' . $data['from'][0]['host'];
Logger::info('Use "from" address of the thread parent', ['addr' => $addr]);
}
}
$local_user = DBA::selectFirst('user', [], ['uid' => $owner['uid']]);
if (!DBA::isResult($local_user)) {
return;
}
Logger::log('Deliver ' . $target_item["guid"] . ' via mail to ' . $contact['addr']);
Logger::info('About to deliver via mail', ['guid' => $target_item['guid'], 'to' => $addr]);
$reply_to = '';
$mailacct = DBA::selectFirst('mailacct', ['reply_to'], ['uid' => $owner['uid']]);
@ -531,11 +543,11 @@ class Delivery extends BaseObject
$headers .= 'Message-Id: <' . Email::iri2msgid($target_item['uri']) . '>' . "\n";
if ($target_item['uri'] !== $target_item['parent-uri']) {
$headers .= "References: <" . Email::iri2msgid($target_item["parent-uri"]) . ">";
$headers .= 'References: <' . Email::iri2msgid($target_item['parent-uri']) . '>';
// If Threading is enabled, write down the correct parent
if (($target_item["thr-parent"] != "") && ($target_item["thr-parent"] != $target_item["parent-uri"])) {
$headers .= " <".Email::iri2msgid($target_item["thr-parent"]).">";
if (($target_item['thr-parent'] != '') && ($target_item['thr-parent'] != $target_item['parent-uri'])) {
$headers .= ' <' . Email::iri2msgid($target_item['thr-parent']) . '>';
}
$headers .= "\n";
@ -562,5 +574,9 @@ class Delivery extends BaseObject
}
Email::send($addr, $subject, $headers, $target_item);
Model\ItemDeliveryData::incrementQueueFailed($target_item['id']);
Logger::info('Delivered via mail', ['guid' => $target_item['guid'], 'to' => $addr, 'subject' => $subject]);
}
}