sisimai 4.21.1-java → 4.22.0-java

data/lib/sisimai/bite/email/notes.rb

@@ -0,0 +1,181 @@
+module Sisimai::Bite::Email
+  module Notes
+    # Sisimai::Bite::::Email::Notes parses a bounce email which created by Lotus
+    # Notes Server. Methods in the module are called from only Sisimai::Message.
+    class << self
+      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/Notes.pm
+      require 'sisimai/bite/email'
+
+      Re0 = {
+        :'subject' => %r/\AUndeliverable message/,
+      }
+      Re1 = {
+        :begin  => %r/\A[-]+[ ]+Failure Reasons[ ]+[-]+\z/,
+        :rfc822 => %r/^[-]+[ ]+Returned Message[ ]+[-]+$/,
+        :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+      }
+      ReFailure = {
+        userunknown: %r{(?:
+           User[ ]not[ ]listed[ ]in[ ]public[ ]Name[ ][&][ ]Address[ ]Book
+          |ディレクトリのリストにありません
+          )
+        }x,
+        networkerror: %r/Message has exceeded maximum hop count/,
+      }
+      Indicators = Sisimai::Bite::Email.INDICATORS
+
+      def description; return 'Lotus Notes'; end
+      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
+      def headerlist;  return []; end
+      def pattern;     return Re0; end
+
+      # Parse bounce messages from Lotus Notes
+      # @param         [Hash] mhead       Message headers of a bounce email
+      # @options mhead [String] from      From header
+      # @options mhead [String] date      Date header
+      # @options mhead [String] subject   Subject header
+      # @options mhead [Array]  received  Received headers
+      # @options mhead [String] others    Other required headers
+      # @param         [String] mbody     Message body of a bounce email
+      # @return        [Hash, Nil]        Bounce data list and message/rfc822
+      #                                   part or nil if it failed to parse or
+      #                                   the arguments are missing
+      def scan(mhead, mbody)
+        return nil unless mhead
+        return nil unless mbody
+        return nil unless mhead['subject'] =~ Re0[:subject]
+
+        dscontents = [Sisimai::Bite.DELIVERYSTATUS]
+        hasdivided = mbody.split("\n")
+        rfc822list = []     # (Array) Each line in message/rfc822 part string
+        blanklines = 0      # (Integer) The number of blank lines
+        readcursor = 0      # (Integer) Points the current cursor position
+        recipients = 0      # (Integer) The number of 'Final-Recipient' header
+        characters = ''     # (String) Character set name of the bounce mail
+        removedmsg = 'MULTIBYTE CHARACTERS HAVE BEEN REMOVED'
+        encodedmsg = ''
+        v = nil
+
+        hasdivided.each do |e|
+          if readcursor.zero?
+            # Beginning of the bounce message or delivery status part
+            if e =~ Re1[:begin]
+              readcursor |= Indicators[:deliverystatus]
+              next
+            end
+          end
+
+          if readcursor & Indicators[:'message-rfc822'] == 0
+            # Beginning of the original message part
+            if e =~ Re1[:rfc822]
+              readcursor |= Indicators[:'message-rfc822']
+              next
+            end
+          end
+
+          if characters.empty?
+            # Get character set name
+            if cv = mhead['content-type'].match(/\A.+;[ ]*charset=(.+)\z/)
+              # Content-Type: text/plain; charset=ISO-2022-JP
+              characters = cv[1].downcase
+            end
+          end
+
+          if readcursor & Indicators[:'message-rfc822'] > 0
+            # After "message/rfc822"
+            if e.empty?
+              blanklines += 1
+              break if blanklines > 1
+              next
+            end
+            rfc822list << e
+
+          else
+            # Before "message/rfc822"
+            next if readcursor & Indicators[:deliverystatus] == 0
+
+            # ------- Failure Reasons  --------
+            #
+            # User not listed in public Name & Address Book
+            # kijitora@notes.example.jp
+            #
+            # ------- Returned Message --------
+            v = dscontents[-1]
+            if e =~ /\A[^ ]+[@][^ ]+/
+              # kijitora@notes.example.jp
+              if v['recipient']
+                # There are multiple recipient addresses in the message body.
+                dscontents << Sisimai::Bite.DELIVERYSTATUS
+                v = dscontents[-1]
+              end
+              v['recipient'] ||= e
+              recipients += 1
+
+            else
+              next if e =~ /\A\z/
+              next if e =~ /\A[-]+/
+
+              if e =~ /[^\x20-\x7e]/
+                # Error message is not ISO-8859-1
+                if characters.size > 0
+                  # Try to convert string
+                  begin
+                    encodedmsg = e.encode('UTF-8', characters)
+                  rescue
+                    # Failed to convert
+                    encodedmsg = removedmsg
+                  end
+                else
+                  # No character set in Content-Type header
+                  encodedmsg = removedmsg
+                end
+                v['diagnosis'] ||= ''
+                v['diagnosis']  += encodedmsg
+              else
+                # Error message does not include multi-byte character
+                v['diagnosis'] ||= ''
+                v['diagnosis']  += e
+              end
+            end
+          end
+        end
+
+        if recipients.zero?
+          # Fallback: Get the recpient address from RFC822 part
+          rfc822list.each do |e|
+            if cv = e.match(/^To:[ ]*(.+)$/m)
+              v['recipient'] = Sisimai::Address.s3s4(cv[1])
+              recipients += 1 if v['recipient'].size > 0
+              break
+            end
+          end
+        end
+
+        return nil if recipients.zero?
+        require 'sisimai/string'
+        require 'sisimai/smtp/status'
+
+        dscontents.map do |e|
+          e['agent']     = self.smtpagent
+          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
+          e['recipient'] = Sisimai::Address.s3s4(e['recipient'])
+
+          ReFailure.each_key do |r|
+            # Check each regular expression of Notes error messages
+            next unless e['diagnosis'] =~ ReFailure[r]
+            e['reason'] = r.to_s
+            pseudostatus = Sisimai::SMTP::Status.code(r.to_s)
+            e['status'] = pseudostatus if pseudostatus.size > 0
+            break
+          end
+          e.each_key { |a| e[a] ||= '' }
+        end
+
+        rfc822part = Sisimai::RFC5322.weedout(rfc822list)
+        return { 'ds' => dscontents, 'rfc822' => rfc822part }
+      end
+
+    end
+  end
+end
+

data/lib/sisimai/bite/email/office365.rb

@@ -0,0 +1,262 @@
+module Sisimai::Bite::Email
+  module Office365
+    # Sisimai::Bite::Email::Office365 parses a bounce email which created by
+    # Microsoft Office 365.
+    # Methods in the module are called from only Sisimai::Message.
+    class << self
+      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/Office365.pm
+      require 'sisimai/bite/email'
+
+      Re0 = {
+        :'subject'    => %r/Undeliverable:/,
+        :'received'   => %r/.+[.](?:outbound[.]protection|prod)[.]outlook[.]com\b/,
+        :'message-id' => %r/.+[.](?:outbound[.]protection|prod)[.]outlook[.]com\b/,
+      }
+      Re1 = {
+        :begin  => %r{\A(?:
+           Delivery[ ]has[ ]failed[ ]to[ ]these[ ]recipients[ ]or[ ]groups:
+          |.+[ ]rejected[ ]your[ ]message[ ]to[ ]the[ ]following[ ]e[-]?mail[ ]addresses:
+          )
+        }x,
+        :error  => %r/\ADiagnostic information for administrators:\z/,
+        :eoerr  => %r/\AOriginal message headers:\z/,
+        :rfc822 => %r|\AContent-Type: message/rfc822\z|,
+        :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+      }
+      CodeTable = {
+        # https://support.office.com/en-us/article/Email-non-delivery-reports-in-Office-365-51daa6b9-2e35-49c4-a0c9-df85bf8533c3
+        %r/\A4[.]4[.]7\z/        => 'expired',
+        %r/\A4[.]7[.]26\z/       => 'securityerror',
+        %r/\A4[.]7[.][56]\d\d\z/ => 'blocked',
+        %r/\A4[.]7[.]8[5-9]\d\z/ => 'blocked',
+        %r/\A5[.]1[.]0\z/        => 'userunknown',
+        %r/\A5[.]4[.]1\z/        => 'norelaying',
+        %r/\A5[.]4[.]6\z/        => 'networkerror',
+        %r/\A5[.]6[.]11\z/       => 'contenterror',
+        %r/\A5[.]7[.]1\z/        => 'rejected',
+        %r/\A5[.]7[.]1[23]\z/    => 'rejected',
+        %r/\A5[.]7[.]124\z/      => 'rejected',
+        %r/\A5[.]7[.]13[3-6]\z/  => 'rejected',
+        %r/\A5[.]7[.]25\z/       => 'networkerror',
+        %r/\A5[.]7[.]50[1-3]\z/  => 'spamdetected',
+        %r/\A5[.]7[.]50[4-5]\z/  => 'filtered',
+        %r/\A5[.]7[.]50[6-7]\z/  => 'blocked',
+        %r/\A5[.]7[.]508\z/      => 'toomanyconn',
+        %r/\A5[.]7[.]509\z/      => 'securityerror',
+        %r/\A5[.]7[.]510\z/      => 'notaccept',
+        %r/\A5[.]7[.]511\z/      => 'rejected',
+        %r/\A5[.]7[.]512\z/      => 'securityerror',
+        %r/\A5[.]7[.]60[6-9]\z/  => 'blocked',
+        %r/\A5[.]7[.]6[1-4]\d\z/ => 'blocked',
+        %r/\A5[.]7[.]7[0-4]\d\z/ => 'toomanyconn',
+      }
+      Indicators = Sisimai::Bite::Email.INDICATORS
+
+      def description; return 'Microsoft Office 365: http://office.microsoft.com/'; end
+      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
+
+      def headerlist
+        # X-MS-Exchange-Message-Is-Ndr:
+        # X-Microsoft-Antispam-PRVS: <....@...outlook.com>
+        # X-Exchange-Antispam-Report-Test: UriScan:;
+        # X-Exchange-Antispam-Report-CFA-Test:
+        # X-MS-Exchange-CrossTenant-OriginalArrivalTime: 29 Apr 2015 23:34:45.6789 (JST)
+        # X-MS-Exchange-CrossTenant-FromEntityHeader: Hosted
+        # X-MS-Exchange-Transport-CrossTenantHeadersStamped: ...
+        return [
+          'X-MS-Exchange-Message-Is-Ndr',
+          'X-Microsoft-Antispam-PRVS',
+          'X-Exchange-Antispam-Report-Test',
+          'X-Exchange-Antispam-Report-CFA-Test',
+          'X-MS-Exchange-CrossTenant-OriginalArrivalTime',
+          'X-MS-Exchange-CrossTenant-FromEntityHeader',
+          'X-MS-Exchange-Transport-CrossTenantHeadersStamped',
+        ]
+      end
+      def pattern;     return Re0; end
+
+      # Parse bounce messages from Microsoft Office 365
+      # @param         [Hash] mhead       Message headers of a bounce email
+      # @options mhead [String] from      From header
+      # @options mhead [String] date      Date header
+      # @options mhead [String] subject   Subject header
+      # @options mhead [Array]  received  Received headers
+      # @options mhead [String] others    Other required headers
+      # @param         [String] mbody     Message body of a bounce email
+      # @return        [Hash, Nil]        Bounce data list and message/rfc822
+      #                                   part or nil if it failed to parse or
+      #                                   the arguments are missing
+      def scan(mhead, mbody)
+        return nil unless mhead
+        return nil unless mbody
+
+        match  = 0
+        match += 1 if mhead['subject'] =~ Re0[:subject]
+        match += 1 if mhead['x-ms-exchange-message-is-ndr']
+        match += 1 if mhead['x-microsoft-antispam-prvs']
+        match += 1 if mhead['x-exchange-antispam-report-test']
+        match += 1 if mhead['x-exchange-antispam-report-cfa-test']
+        match += 1 if mhead['x-ms-exchange-crosstenant-originalarrivaltime']
+        match += 1 if mhead['x-ms-exchange-crosstenant-fromentityheader']
+        match += 1 if mhead['x-ms-exchange-transport-crosstenantheadersstamped']
+        match += 1 if mhead['received'].find { |a| a =~ Re0[:received] }
+        if mhead['message-id']
+          # Message-ID: <00000000-0000-0000-0000-000000000000@*.*.prod.outlook.com>
+          match += 1 if mhead['message-id'] =~ Re0[:'message-id']
+        end
+        return nil if match < 2
+
+        dscontents = [Sisimai::Bite.DELIVERYSTATUS]
+        hasdivided = mbody.split("\n")
+        rfc822list = []     # (Array) Each line in message/rfc822 part string
+        blanklines = 0      # (Integer) The number of blank lines
+        readcursor = 0      # (Integer) Points the current cursor position
+        recipients = 0      # (Integer) The number of 'Final-Recipient' header
+        connheader = {}
+        endoferror = false  # (Boolean) Flag for the end of error messages
+        htmlbegins = false  # (Boolean) Flag for HTML part
+        v = nil
+
+        hasdivided.each do |e|
+          if readcursor.zero?
+            # Beginning of the bounce message or delivery status part
+            if e =~ Re1[:begin]
+              readcursor |= Indicators[:deliverystatus]
+              next
+            end
+          end
+
+          if readcursor & Indicators[:'message-rfc822'] == 0
+            # Beginning of the original message part
+            if e =~ Re1[:rfc822]
+              readcursor |= Indicators[:'message-rfc822']
+              next
+            end
+          end
+
+          if readcursor & Indicators[:'message-rfc822'] > 0
+            # After "message/rfc822"
+            if e.empty?
+              blanklines += 1
+              break if blanklines > 1
+              next
+            end
+            rfc822list << e
+
+          else
+            # Before "message/rfc822"
+            next if readcursor & Indicators[:deliverystatus] == 0
+            next if e.empty?
+
+            # kijitora@example.com<mailto:kijitora@example.com>
+            # The email address wasn=92t found at the destination domain. It might be mis=
+            # spelled or it might not exist any longer. Try retyping the address and rese=
+            # nding the message.
+            v = dscontents[-1]
+
+            if cv = e.match(/\A.+[@].+[<]mailto:(.+[@].+)[>]\z/)
+              # kijitora@example.com<mailto:kijitora@example.com>
+              if v['recipient']
+                # There are multiple recipient addresses in the message body.
+                dscontents << Sisimai::Bite.DELIVERYSTATUS
+                v = dscontents[-1]
+              end
+              v['recipient'] = cv[1]
+              recipients += 1
+
+            elsif cv = e.match(/\AGenerating server: (.+)\z/)
+              # Generating server: FFFFFFFFFFFF.e0.prod.outlook.com
+              connheader['lhost'] = cv[1].downcase
+
+            else
+              if endoferror
+                # After "Original message headers:"
+                if htmlbegins
+                  # <html> .. </html>
+                  htmlbegins = false if e =~ %r|\A[<]/html[>]|
+                  next
+                end
+
+                if cv = e.match(/\A[Aa]ction:[ ]*(.+)\z/)
+                  # Action: failed
+                  v['action'] = cv[1].downcase
+
+                elsif cv = e.match(/\A[Ss]tatus:[ ]*(\d[.]\d+[.]\d+)/)
+                  # Status:5.2.0
+                  v['status'] = cv[1]
+
+                elsif cv = e.match(/\A[Rr]eporting-MTA:[ ]*(?:DNS|dns);[ ]*(.+)\z/)
+                  # Reporting-MTA: dns;BLU004-OMC3S13.hotmail.example.com
+                  connheader['lhost'] = cv[1].downcase
+
+                elsif cv = e.match(/\A[Rr]eceived-[Ff]rom-MTA:[ ]*(?:DNS|dns);[ ]*(.+)\z/)
+                  # Reporting-MTA: dns;BLU004-OMC3S13.hotmail.example.com
+                  connheader['rhost'] = cv[1].downcase
+
+                elsif cv = e.match(/\A[Aa]rrival-[Dd]ate:[ ]*(.+)\z/)
+                  # Arrival-Date: Wed, 29 Apr 2009 16:03:18 +0900
+                  next if connheader['date']
+                  connheader['date'] = cv[1]
+
+                else
+                  htmlbegins = true if e =~ /\A[<]html[>]/
+                end
+
+              else
+                if e =~ Re1[:error]
+                  # Diagnostic information for administrators:
+                  v['diagnosis'] = e
+                else
+                  # kijitora@example.com
+                  # Remote Server returned '550 5.1.10 RESOLVER.ADR.RecipientNotFound; Recipien=
+                  # t not found by SMTP address lookup'
+                  next unless v['diagnosis']
+                  if e =~ Re1[:eoerr]
+                    # Original message headers:
+                    endoferror = true
+                    next
+                  end
+                  v['diagnosis'] += ' ' + e
+                end
+              end
+            end
+
+          end
+        end
+
+        return nil if recipients.zero?
+        require 'sisimai/string'
+        require 'sisimai/smtp/status'
+
+        dscontents.map do |e|
+          # Set default values if each value is empty.
+          connheader.each_key { |a| e[a] ||= connheader[a] || '' }
+
+          e['agent']     = self.smtpagent
+          e['status']  ||= ''
+          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis']) || ''
+
+          if e['status'].empty? || e['status'] =~ /\A\d[.]0[.]0\z/
+            # There is no value of Status header or the value is 5.0.0, 4.0.0
+            pseudostatus = Sisimai::SMTP::Status.find(e['diagnosis'])
+            e['status'] = pseudostatus if pseudostatus.size > 0
+          end
+
+          if e['status']
+            CodeTable.each_key do |f|
+              # Try to match with each key as a regular expression
+              next unless e['status'] =~ f
+              e['reason'] = CodeTable[f]
+              break
+            end
+          end
+        end
+
+        rfc822part = Sisimai::RFC5322.weedout(rfc822list)
+        return { 'ds' => dscontents, 'rfc822' => rfc822part }
+      end
+
+    end
+  end
+end
+

data/lib/sisimai/bite/email/opensmtpd.rb

@@ -0,0 +1,192 @@
+module Sisimai::Bite::Email
+  module OpenSMTPD
+    # Sisimai::Bite::Email::OpenSMTPD parses a bounce email which created by
+    # OpenSMTPD. Methods in the module are called from only Sisimai::Message.
+    class << self
+      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/OpenSMTPD.pm
+      require 'sisimai/bite/email'
+
+      Re0 = {
+        :from     => %r/\AMailer Daemon [<][^ ]+[@]/,
+        :subject  => %r/\ADelivery status notification/,
+        :received => %r/[ ][(]OpenSMTPD[)][ ]with[ ]/,
+      }
+      # http://www.openbsd.org/cgi-bin/man.cgi?query=smtpd&sektion=8
+      # opensmtpd-5.4.2p1/smtpd/
+      #   bounce.c/317:#define NOTICE_INTRO \
+      #   bounce.c/318:    "    Hi!\n\n"    \
+      #   bounce.c/319:    "    This is the MAILER-DAEMON, please DO NOT REPLY to this e-mail.\n"
+      #   bounce.c/320:
+      #   bounce.c/321:const char *notice_error =
+      #   bounce.c/322:    "    An error has occurred while attempting to deliver a message for\n"
+      #   bounce.c/323:    "    the following list of recipients:\n\n";
+      #   bounce.c/324:
+      #   bounce.c/325:const char *notice_warning =
+      #   bounce.c/326:    "    A message is delayed for more than %s for the following\n"
+      #   bounce.c/327:    "    list of recipients:\n\n";
+      #   bounce.c/328:
+      #   bounce.c/329:const char *notice_warning2 =
+      #   bounce.c/330:    "    Please note that this is only a temporary failure report.\n"
+      #   bounce.c/331:    "    The message is kept in the queue for up to %s.\n"
+      #   bounce.c/332:    "    You DO NOT NEED to re-send the message to these recipients.\n\n";
+      #   bounce.c/333:
+      #   bounce.c/334:const char *notice_success =
+      #   bounce.c/335:    "    Your message was successfully delivered to these recipients.\n\n";
+      #   bounce.c/336:
+      #   bounce.c/337:const char *notice_relay =
+      #   bounce.c/338:    "    Your message was relayed to these recipients.\n\n";
+      #   bounce.c/339:
+      Re1 = {
+        :begin  => %r/\A[ \t]*This is the MAILER-DAEMON, please DO NOT REPLY to this e[-]?mail[.]\z/,
+        :rfc822 => %r/\A[ \t]*Below is a copy of the original message:\z/,
+        :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+      }
+      ReFailure = {
+        expired: %r{
+          # smtpd/queue.c:221|  envelope_set_errormsg(&evp, "Envelope expired");
+          Envelope[ ]expired
+        }x,
+        hostunknown: %r{(?:
+          # smtpd/mta.c:976|  relay->failstr = "Invalid domain name";
+           Invalid[ ]domain[ ]name
+          # smtpd/mta.c:980|  relay->failstr = "Domain does not exist";
+          |Domain[ ]does[ ]not[ ]exist
+          )
+        }x,
+        notaccept: %r{
+          # smtp/mta.c:1085|  relay->failstr = "Destination seem to reject all mails";
+          Destination[ ]seem[ ]to[ ]reject[ ]all[ ]mails
+        }x,
+        networkerror: %r{(?>
+          #  smtpd/mta.c:972|  relay->failstr = "Temporary failure in MX lookup";
+           Address[ ]family[ ]mismatch[ ]on[ ]destination[ ]MXs
+          |All[ ]routes[ ]to[ ]destination[ ]blocked
+          |bad[ ]DNS[ ]lookup[ ]error[ ]code
+          |Could[ ]not[ ]retrieve[ ]source[ ]address
+          |Loop[ ]detected
+          |Network[ ]error[ ]on[ ]destination[ ]MXs
+          |No[ ](?>
+             MX[ ]found[ ]for[ ](?:domain|destination)
+            |valid[ ]route[ ]to[ ](?:remote[ ]MX|destination)
+            )
+          |Temporary[ ]failure[ ]in[ ]MX[ ]lookup
+          )
+        }x,
+        securityerror: %r{
+          # smtpd/mta.c:1013|  relay->failstr = "Could not retrieve credentials";
+          Could[ ]not[ ]retrieve[ ]credentials
+        }x,
+      }
+      Indicators = Sisimai::Bite::Email.INDICATORS
+
+      def description; return 'OpenSMTPD'; end
+      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
+      def headerlist;  return []; end
+      def pattern;     return Re0; end
+
+      # Parse bounce messages from OpenSMTPD
+      # @param         [Hash] mhead       Message headers of a bounce email
+      # @options mhead [String] from      From header
+      # @options mhead [String] date      Date header
+      # @options mhead [String] subject   Subject header
+      # @options mhead [Array]  received  Received headers
+      # @options mhead [String] others    Other required headers
+      # @param         [String] mbody     Message body of a bounce email
+      # @return        [Hash, Nil]        Bounce data list and message/rfc822
+      #                                   part or nil if it failed to parse or
+      #                                   the arguments are missing
+      def scan(mhead, mbody)
+        return nil unless mhead
+        return nil unless mbody
+        return nil unless mhead['subject'] =~ Re0[:subject]
+        return nil unless mhead['from']    =~ Re0[:from]
+        return nil unless mhead['received'].find { |a| a =~ Re0[:received] }
+
+        dscontents = [Sisimai::Bite.DELIVERYSTATUS]
+        hasdivided = mbody.split("\n")
+        rfc822list = []     # (Array) Each line in message/rfc822 part string
+        blanklines = 0      # (Integer) The number of blank lines
+        readcursor = 0      # (Integer) Points the current cursor position
+        recipients = 0      # (Integer) The number of 'Final-Recipient' header
+        v = nil
+
+        hasdivided.each do |e|
+          if readcursor.zero?
+            # Beginning of the bounce message or delivery status part
+            if e =~ Re1[:begin]
+              readcursor |= Indicators[:deliverystatus]
+              next
+            end
+          end
+
+          if readcursor & Indicators[:'message-rfc822'] == 0
+            # Beginning of the original message part
+            if e =~ Re1[:rfc822]
+              readcursor |= Indicators[:'message-rfc822']
+              next
+            end
+          end
+
+          if readcursor & Indicators[:'message-rfc822'] > 0
+            # After "message/rfc822"
+            if e.empty?
+              blanklines += 1
+              break if blanklines > 1
+              next
+            end
+            rfc822list << e
+
+          else
+            # Before "message/rfc822"
+            next if readcursor & Indicators[:deliverystatus] == 0
+            next if e.empty?
+
+            #    Hi!
+            #
+            #    This is the MAILER-DAEMON, please DO NOT REPLY to this e-mail.
+            #
+            #    An error has occurred while attempting to deliver a message for
+            #    the following list of recipients:
+            #
+            # kijitora@example.jp: 550 5.2.2 <kijitora@example>... Mailbox Full
+            #
+            #    Below is a copy of the original message:
+            v = dscontents[-1]
+
+            if cv = e.match(/\A([^ ]+?[@][^ ]+?):?[ ](.+)\z/)
+              # kijitora@example.jp: 550 5.2.2 <kijitora@example>... Mailbox Full
+              if v['recipient']
+                # There are multiple recipient addresses in the message body.
+                dscontents << Sisimai::Bite.DELIVERYSTATUS
+                v = dscontents[-1]
+              end
+              v['recipient'] = cv[1]
+              v['diagnosis'] = cv[2]
+              recipients += 1
+            end
+          end
+        end
+        return nil if recipients.zero?
+        require 'sisimai/string'
+
+        dscontents.map do |e|
+          e['agent']     = self.smtpagent
+          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
+
+          ReFailure.each_key do |r|
+            # Verify each regular expression of session errors
+            next unless e['diagnosis'] =~ ReFailure[r]
+            e['reason'] = r.to_s
+            break
+          end
+          e.each_key { |a| e[a] ||= '' }
+        end
+
+        rfc822part = Sisimai::RFC5322.weedout(rfc822list)
+        return { 'ds' => dscontents, 'rfc822' => rfc822part }
+      end
+
+    end
+  end
+end
+