В домене был работающий сервер postfix / dovecot. Клиент решил использовать вместо этого zoho и изменил записи MX на zoho. До распространения DNS на исходный сервер дошло около сотни писем.
Так внутри /var/mail/vhosts/ravingo.in/rk/new, например ...
-rw------- 3 vmail vmail 24128 Sep 12 09:29 1473672547.M984731P30716.ravingo.ravingo.id,S=24128,W=24567
-rw------- 1 vmail vmail 52287 Sep 12 10:48 1473677302.M251841P31240.ravingo.ravingo.id,S=52287,W=53023
-rw------- 2 vmail vmail 165851 Sep 12 14:08 1473689331.M885291P32352.ravingo.ravingo.id,S=165851,W=168081
Есть ли способ передать эти сообщения Zoho, чтобы они отображались как обычные электронные письма с вложениями и т. Д.?
Поскольку каждый файл в Maildir уже является полным сообщением электронной почты, достаточно просто настроить сеанс SMTP на почтовый сервер Zoho и затем снова доставить эти сообщения.
Тривиальный кусочек perl:
#!/usr/bin/perl -w
#
## purpose: send the contents of a Maildir over SMTP
##
## usage: perl this_program
#
my $MAILDIR = '/home/hbruijn/Maildir/cur/' ;
# The mailserver to deliver the messages to:
my $MAILHOST = 'smtp.example.com' ;
# The email address of the recipient on $MAILHOST:
my $RECIPIENT = 'hbruijn@example.com' ;
# The email address of the sender in the SMTP envelope and the one to receive errors and bounces:
my $SENDER = 'hbruijn@serverfault.com' ;
use Net::SMTP;
foreach my $MESSAGE (glob("$MAILDIR/*")) {
printf "%s\n", $MESSAGE;
my $smtp = Net::SMTP->new($MAILHOST);
$smtp->mail($SENDER);
if ($smtp->to($RECIPIENT)) {
$smtp->data();
open my $fh, "<", $MESSAGE or die "can't read open '$MESSAGE': $OS_ERROR";
while (<$fh>) {
$smtp->datasend($_);
}
$smtp->dataend();
close $fh or die "can't read close '$MESSAGE': $OS_ERROR";
} else {
print "Error: ", $smtp->message();
};
$smtp->quit;
}
Вышеупомянутое работает, но довольно грубо, может запускать меры по борьбе со спамом и определенно может быть оптимизировано многими способами.