Definir le return-path lorsqu'il est absent
* Les bounces retournent par défaut sur le mail serveur autant notifier le compte hébergé Solution à faire évoluer avec une gestion VERP * http://en.wikipedia.org/wiki/Variable_envelope_return_path * A voir si un plugin serait plus pertinent ou non
This commit is contained in:
parent
363682991e
commit
956cf9f6cc
|
@ -4,6 +4,7 @@
|
||||||
|
|
||||||
$fr="";
|
$fr="";
|
||||||
$rt="";
|
$rt="";
|
||||||
|
$rp="";
|
||||||
|
|
||||||
open(SM,"|/usr/sbin/sendmail -t -i");
|
open(SM,"|/usr/sbin/sendmail -t -i");
|
||||||
|
|
||||||
|
@ -16,6 +17,9 @@ while ($A ne "") {
|
||||||
if ($A=~/^Reply-to:(.*)/i) {
|
if ($A=~/^Reply-to:(.*)/i) {
|
||||||
$rt=$1;
|
$rt=$1;
|
||||||
}
|
}
|
||||||
|
if ($A=~/^Return-path:(.*)/i) {
|
||||||
|
$rp=$1;
|
||||||
|
}
|
||||||
chomp($A=<STDIN>);
|
chomp($A=<STDIN>);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -36,6 +40,11 @@ if (!$fr) {
|
||||||
print SM "X-RealFrom: ".$user."\n";
|
print SM "X-RealFrom: ".$user."\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#No Return-path then user account used (bounce directly to user)
|
||||||
|
if (!rp) {
|
||||||
|
print SM "Return-path: ".$user."\n";
|
||||||
|
}
|
||||||
|
|
||||||
# 3. On ajoute la fameuse ligne vide :)
|
# 3. On ajoute la fameuse ligne vide :)
|
||||||
print SM "\n";
|
print SM "\n";
|
||||||
# 4. Et on repasse la suite sans traitement (cat)
|
# 4. Et on repasse la suite sans traitement (cat)
|
||||||
|
|
Loading…
Reference in New Issue