Merge pull request #7859 from annando/mail-reply-to
Use the "reply-to" header of the original post when answering via mail
This commit is contained in:
commit
17c934aa07
3 changed files with 28 additions and 12 deletions
|
@ -29,6 +29,7 @@ class ItemDeliveryData
|
||||||
const LEGACY_DFRN = 3;
|
const LEGACY_DFRN = 3;
|
||||||
const DIASPORA = 4;
|
const DIASPORA = 4;
|
||||||
const OSTATUS = 5;
|
const OSTATUS = 5;
|
||||||
|
const MAIL = 6;
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* Extract delivery data from the provided item fields
|
* Extract delivery data from the provided item fields
|
||||||
|
|
|
@ -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)
|
* (not to notify the user, but to send items to email contacts)
|
||||||
*
|
*
|
||||||
* @param string $addr address
|
* @param string $addr address
|
||||||
|
|
|
@ -103,7 +103,7 @@ class Delivery extends BaseObject
|
||||||
}
|
}
|
||||||
|
|
||||||
$condition = ['uri' => $target_item['thr-parent'], 'uid' => $target_item['uid']];
|
$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)) {
|
if (!DBA::isResult($thr_parent)) {
|
||||||
// Shouldn't happen. But when this does, we just take the parent as thread 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.
|
// That's totally okay for what we use this variable here.
|
||||||
|
@ -209,7 +209,7 @@ class Delivery extends BaseObject
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case Protocol::MAIL:
|
case Protocol::MAIL:
|
||||||
self::deliverMail($cmd, $contact, $owner, $target_item);
|
self::deliverMail($cmd, $contact, $owner, $target_item, $thr_parent);
|
||||||
break;
|
break;
|
||||||
|
|
||||||
default:
|
default:
|
||||||
|
@ -481,15 +481,15 @@ class Delivery extends BaseObject
|
||||||
* @param array $contact Contact record of the receiver
|
* @param array $contact Contact record of the receiver
|
||||||
* @param array $owner Owner record of the sender
|
* @param array $owner Owner record of the sender
|
||||||
* @param array $target_item Item record of the content
|
* @param array $target_item Item record of the content
|
||||||
|
* @param array $thr_parent Item record of the direct parent in the thread
|
||||||
* @throws \Friendica\Network\HTTPException\InternalServerErrorException
|
* @throws \Friendica\Network\HTTPException\InternalServerErrorException
|
||||||
* @throws \ImagickException
|
* @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')) {
|
if (Config::get('system','dfrn_only')) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
// WARNING: does not currently convert to RFC2047 header encodings, etc.
|
|
||||||
|
|
||||||
$addr = $contact['addr'];
|
$addr = $contact['addr'];
|
||||||
if (!strlen($addr)) {
|
if (!strlen($addr)) {
|
||||||
|
@ -500,12 +500,23 @@ class Delivery extends BaseObject
|
||||||
return;
|
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']]);
|
$local_user = DBA::selectFirst('user', [], ['uid' => $owner['uid']]);
|
||||||
if (!DBA::isResult($local_user)) {
|
if (!DBA::isResult($local_user)) {
|
||||||
return;
|
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 = '';
|
$reply_to = '';
|
||||||
$mailacct = DBA::selectFirst('mailacct', ['reply_to'], ['uid' => $owner['uid']]);
|
$mailacct = DBA::selectFirst('mailacct', ['reply_to'], ['uid' => $owner['uid']]);
|
||||||
|
@ -519,10 +530,10 @@ class Delivery extends BaseObject
|
||||||
|
|
||||||
if (($contact['rel'] == Model\Contact::FRIEND) && !$contact['blocked']) {
|
if (($contact['rel'] == Model\Contact::FRIEND) && !$contact['blocked']) {
|
||||||
if ($reply_to) {
|
if ($reply_to) {
|
||||||
$headers = 'From: ' . Email::encodeHeader($local_user['username'],'UTF-8') . ' <' . $reply_to.'>' . "\n";
|
$headers = 'From: ' . Email::encodeHeader($local_user['username'],'UTF-8') . ' <' . $reply_to . '>' . "\n";
|
||||||
$headers .= 'Sender: ' . $local_user['email'] . "\n";
|
$headers .= 'Sender: ' . $local_user['email'] . "\n";
|
||||||
} else {
|
} else {
|
||||||
$headers = 'From: ' . Email::encodeHeader($local_user['username'],'UTF-8').' <' . $local_user['email'] . '>' . "\n";
|
$headers = 'From: ' . Email::encodeHeader($local_user['username'],'UTF-8') . ' <' . $local_user['email'] . '>' . "\n";
|
||||||
}
|
}
|
||||||
} else {
|
} else {
|
||||||
$headers = 'From: '. Email::encodeHeader($local_user['username'], 'UTF-8') . ' <noreply@' . self::getApp()->getHostName() . '>' . "\n";
|
$headers = 'From: '. Email::encodeHeader($local_user['username'], 'UTF-8') . ' <noreply@' . self::getApp()->getHostName() . '>' . "\n";
|
||||||
|
@ -531,11 +542,11 @@ class Delivery extends BaseObject
|
||||||
$headers .= 'Message-Id: <' . Email::iri2msgid($target_item['uri']) . '>' . "\n";
|
$headers .= 'Message-Id: <' . Email::iri2msgid($target_item['uri']) . '>' . "\n";
|
||||||
|
|
||||||
if ($target_item['uri'] !== $target_item['parent-uri']) {
|
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
|
// Export more references on deeper nested threads
|
||||||
if (($target_item["thr-parent"] != "") && ($target_item["thr-parent"] != $target_item["parent-uri"])) {
|
if (($target_item['thr-parent'] != '') && ($target_item['thr-parent'] != $target_item['parent-uri'])) {
|
||||||
$headers .= " <".Email::iri2msgid($target_item["thr-parent"]).">";
|
$headers .= ' <' . Email::iri2msgid($target_item['thr-parent']) . '>';
|
||||||
}
|
}
|
||||||
|
|
||||||
$headers .= "\n";
|
$headers .= "\n";
|
||||||
|
@ -562,5 +573,9 @@ class Delivery extends BaseObject
|
||||||
}
|
}
|
||||||
|
|
||||||
Email::send($addr, $subject, $headers, $target_item);
|
Email::send($addr, $subject, $headers, $target_item);
|
||||||
|
|
||||||
|
Model\ItemDeliveryData::incrementQueueDone($target_item['id'], Model\ItemDeliveryData::MAIL);
|
||||||
|
|
||||||
|
Logger::info('Delivered via mail', ['guid' => $target_item['guid'], 'to' => $addr, 'subject' => $subject]);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue