Add 3 samples returned by DragonFly Mail Agent due to the delivery ex…

…piration #478 #526
sisimai · Jun 17, 2024 · ab204f5 · ab204f5
1 parent 87d1697
commit ab204f5
Show file tree

Hide file tree

Showing 5 changed files with 68 additions and 1 deletion.
diff --git a/set-of-emails/maildir/bsd/lhost-dragonfly-29.eml b/set-of-emails/maildir/bsd/lhost-dragonfly-29.eml
@@ -0,0 +1,32 @@
+From MAILER-DAEMON Sun Jun 16 18:30:26 2024
+Received: from MAILER-DAEMON
+	id e06d1
+	by df.example.jp (DragonFly Mail Agent v0.13);
+	Sun, 16 Jun 2024 18:30:26 +0900
+X-Original-To: <[email protected]>
+From: MAILER-DAEMON <>
+To: [email protected]
+Subject: Mail delivery failed
+Message-Id: <[email protected]>
+Date: Sun, 16 Jun 2024 18:30:26 +0900
+
+This is the DragonFly Mail Agent v0.13 at df.example.jp.
+
+There was an error delivering your mail to <[email protected]>.
+
+Could not deliver for the last 432000 seconds. Giving up.
+
+Message headers follow.
+
+Received: from kijitora (uid 0)
+	(envelope-from [email protected])
+	id e0724
+	by df.example.jp (DragonFly Mail Agent v0.13);
+	Tue, 11 Jun 2024 18:27:33 +0900
+Subject: Nyaan 02
+To: <[email protected]>
+User-Agent: mail (GNU Mailutils 3.14)
+Date: Tue, 11 Jun 2024 18:27:33 +0900
+Message-Id: <[email protected]>
+From: <[email protected]>
+
diff --git a/set-of-emails/maildir/bsd/lhost-dragonfly-30.eml b/set-of-emails/maildir/bsd/lhost-dragonfly-30.eml
@@ -0,0 +1,32 @@
+From MAILER-DAEMON Sun Jun 16 18:15:07 2024
+Received: from MAILER-DAEMON
+	id e070f
+	by df.example.jp (DragonFly Mail Agent v0.13);
+	Sun, 16 Jun 2024 18:15:07 +0900
+X-Original-To: <[email protected]>
+From: MAILER-DAEMON <>
+To: [email protected]
+Subject: Mail delivery failed
+Message-Id: <[email protected]>
+Date: Sun, 16 Jun 2024 18:15:07 +0900
+
+This is the DragonFly Mail Agent v0.13 at df.example.jp.
+
+There was an error delivering your mail to <[email protected]>.
+
+Could not deliver for the last 432000 seconds. Giving up.
+
+Message headers follow.
+
+Received: from kijitora (uid 0)
+	(envelope-from [email protected])
+	id e06d1
+	by df.example.jp (DragonFly Mail Agent v0.13);
+	Tue, 11 Jun 2024 18:11:33 +0900
+Subject: Nyaan 02
+To: <[email protected]>
+User-Agent: mail (GNU Mailutils 3.14)
+Date: Tue, 11 Jun 2024 18:11:33 +0900
+Message-Id: <[email protected]>
+From: <[email protected]>
+
diff --git a/t/022-mail-maildir.t b/t/022-mail-maildir.t
@@ -8,7 +8,7 @@ my $Methods = {
     'class'  => ['new'],
     'object' => ['path', 'dir', 'file', 'size', 'offset', 'handle', 'read'],
 };
-my $MaildirSize = 564;
+my $MaildirSize = 566;
 my $SampleEmail = './set-of-emails/maildir/bsd';
 my $NewInstance = $Package->new($SampleEmail);
 

diff --git a/t/641-lhost-dragonfly.t b/t/641-lhost-dragonfly.t
@@ -36,6 +36,8 @@ my $isexpected = {
     '26' => [['5.1.1',   '550', 'userunknown',     1]],
     '27' => [['5.7.13',  '525', 'suspend',         0]],
     '28' => [['5.2.2',   '552', 'mailboxfull',     0]],
+    '29' => [['5.0.947', '',    'expired',         0]],
+    '30' => [['5.0.947', '',    'expired',         0]],
 };
 
 $enginetest->($enginename, $isexpected);

diff --git a/xt/641-lhost-dragonfly.t b/xt/641-lhost-dragonfly.t
@@ -10,6 +10,7 @@ my $enginetest = Sisimai::Lhost::Code->makeinquiry;
 my $isexpected = {
     # INDEX => [['D.S.N.', 'replycode', 'REASON', 'hardbounce'], [...]]
     '01001' => [['5.7.26',  '550', 'authfailure',     0]],
+    '01002' => [['5.0.947', '',    'expired',         0]],
 };
 
 plan 'skip_all', sprintf("%s not found", $samplepath) unless -d $samplepath;