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:
Hypolite Petovan 2019-11-22 23:33:10 -05:00 committed by GitHub
commit 17c934aa07
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
3 changed files with 28 additions and 12 deletions

View file

@ -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

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) * (not to notify the user, but to send items to email contacts)
* *
* @param string $addr address * @param string $addr address

View file

@ -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']]);
@ -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]);
} }
} }