sisimai 4.21.1-java → 4.22.0-java

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

@@ -0,0 +1,206 @@
+module Sisimai::Bite::Email
+  module MessagingServer
+    # Sisimai::Bite::Email::MessagingServer parses a bounce email which created
+    # by Oracle Communications Messaging Server and Sun Java System Messaging
+    # Server. Methods in the module are called from only Sisimai::Message.
+    class << self
+      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/MessagingServer.pm
+      require 'sisimai/bite'
+      require 'sisimai/rfc5322'
+
+      Re0 = {
+        :subject  => %r/\ADelivery Notification: /,
+        :received => %r/[ ][(]MessagingServer[)][ ]with[ ]/,
+        :boundary => %r/Boundary_[(]ID_.+[)]/,
+      }
+      Re1 = {
+        :begin  => %r/\AThis report relates to a message you sent with the following header fields:/,
+        :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+        :rfc822 => %r!\A(?:Content-type:[ ]*message/rfc822|Return-path:[ ]*)!x,
+      }
+      ReFailure = {
+        hostunknown: %r|Illegal[ ]host/domain[ ]name[ ]found|x,
+      }
+      Indicators = Sisimai::Bite::Email.INDICATORS
+
+      def description; return 'Oracle Communications Messaging Server'; end
+      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
+      def headerlist;  return []; end
+      def pattern;     return Re0; end
+
+      # Parse bounce messages from MessagingServer
+      # @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['content-type'] =~ Re0[:boundary]
+        match += 1 if mhead['subject']      =~ Re0[:subject]
+        return nil if match.zero?
+
+        require 'sisimai/address'
+        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?
+
+            # --Boundary_(ID_0000000000000000000000)
+            # Content-type: text/plain; charset=us-ascii
+            # Content-language: en-US
+            #
+            # This report relates to a message you sent with the following header fields:
+            #
+            #   Message-id: <CD8C6134-C312-41D5-B083-366F7FA1D752@me.example.com>
+            #   Date: Fri, 21 Nov 2014 23:34:45 +0900
+            #   From: Shironeko <shironeko@me.example.com>
+            #   To: kijitora@example.jp
+            #   Subject: Nyaaaaaaaaaaaaaaaaaaaaaan
+            #
+            # Your message cannot be delivered to the following recipients:
+            #
+            #   Recipient address: kijitora@example.jp
+            #   Reason: Remote SMTP server has rejected address
+            #   Diagnostic code: smtp;550 5.1.1 <kijitora@example.jp>... User Unknown
+            #   Remote system: dns;mx.example.jp (TCP|17.111.174.67|47323|192.0.2.225|25) (6jo.example.jp ESMTP SENDMAIL-VM)
+            v = dscontents[-1]
+
+            if cv = e.match(/\A[ \t]+Recipient address:[ \t]*([^ ]+[@][^ ]+)\z/)
+              #   Recipient address: kijitora@example.jp
+              if v['recipient']
+                # There are multiple recipient addresses in the message body.
+                dscontents << Sisimai::Bite.DELIVERYSTATUS
+                v = dscontents[-1]
+              end
+              v['recipient'] = Sisimai::Address.s3s4(cv[1])
+              recipients += 1
+
+            elsif cv = e.match(/\A[ \t]+Original address:[ \t]*([^ ]+[@][^ ]+)\z/)
+              #   Original address: kijitora@example.jp
+              v['recipient'] = Sisimai::Address.s3s4(cv[1])
+
+            elsif cv = e.match(/\A[ \t]+Date:[ \t]*(.+)\z/)
+              #   Date: Fri, 21 Nov 2014 23:34:45 +0900
+              v['date'] = cv[1]
+
+            elsif cv = e.match(/\A[ \t]+Reason:[ \t]*(.+)\z/)
+              #   Reason: Remote SMTP server has rejected address
+              v['diagnosis'] = cv[1]
+
+            elsif cv = e.match(/\A[ \t]+Diagnostic code:[ \t]*([^ ]+);(.+)\z/)
+              #   Diagnostic code: smtp;550 5.1.1 <kijitora@example.jp>... User Unknown
+              v['spec'] = cv[1].upcase
+              v['diagnosis'] = cv[2]
+
+            elsif cv = e.match(/\A[ \t]+Remote system:[ ]*dns;([^ ]+)[ ]*([^ ]+)[ ]*.+\z/)
+              #   Remote system: dns;mx.example.jp (TCP|17.111.174.67|47323|192.0.2.225|25)
+              #     (6jo.example.jp ESMTP SENDMAIL-VM)
+              remotehost = cv[1]  # remote host
+              sessionlog = cv[2]  # smtp session
+              v['rhost'] = remotehost
+
+              if cv = sessionlog.match(/\A[(]TCP|(.+)|\d+|(.+)|\d+[)]/)
+                # The value does not include ".", use IP address instead.
+                # (TCP|17.111.174.67|47323|192.0.2.225|25)
+                v['lhost'] = cv[1]
+                v['rhost'] = cv[2] unless remotehost =~ /[^.]+[.][^.]+/
+              end
+
+            else
+              # Original-envelope-id: 0NFC009FLKOUVMA0@mr21p30im-asmtp004.me.com
+              # Reporting-MTA: dns;mr21p30im-asmtp004.me.com (tcp-daemon)
+              # Arrival-date: Thu, 29 Apr 2014 23:34:45 +0000 (GMT)
+              #
+              # Original-recipient: rfc822;kijitora@example.jp
+              # Final-recipient: rfc822;kijitora@example.jp
+              # Action: failed
+              # Status: 5.1.1 (Remote SMTP server has rejected address)
+              # Remote-MTA: dns;mx.example.jp (TCP|17.111.174.67|47323|192.0.2.225|25)
+              #  (6jo.example.jp ESMTP SENDMAIL-VM)
+              # Diagnostic-code: smtp;550 5.1.1 <kijitora@example.jp>... User Unknown
+              #
+              if cv = e.match(/\A[Ss]tatus:[ ]*(\d[.]\d[.]\d)[ ]*[(](.+)[)]\z/)
+                # Status: 5.1.1 (Remote SMTP server has rejected address)
+                v['status'] = cv[1]
+                v['diagnosis'] ||= cv[2]
+
+              elsif cv = e.match(/\A[Aa]rrival-[Dd]ate:[ ]*(.+)\z/)
+                # Arrival-date: Thu, 29 Apr 2014 23:34:45 +0000 (GMT)
+                v['date'] ||= cv[1]
+
+              elsif cv = e.match(/\A[Rr]eporting-MTA:[ ]*(?:DNS|dns);[ ]*(.+)\z/)
+                # Reporting-MTA: dns;mr21p30im-asmtp004.me.com (tcp-daemon)
+                localhost = cv[1]
+                v['lhost'] ||= localhost
+                v['lhost']   = localhost unless v['lhost'] =~ /[^.]+[.][^ ]+/
+              end
+            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
+

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

@@ -0,0 +1,165 @@
+module Sisimai::Bite::Email
+  module MFILTER
+    # Sisimai::Bite::Email::mFILTER parses a bounce email which created by
+    # Digital Arts m-FILTER.
+    # Methods in the module are called from only Sisimai::Message.
+    class << self
+      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/mFILTER.pm
+      require 'sisimai/bite/email'
+
+      Re0 = {
+        :'from'     => %r/\AMailer Daemon [<]MAILER-DAEMON[@]/,
+        :'subject'  => %r/\Afailure notice\z/,
+        :'x-mailer' => %r/\Am-FILTER\z/,
+      }
+      Re1 = {
+        :begin   => %r/\A[^ ]+[@][^ ]+[.][a-zA-Z]+\z/,
+        :error   => %r/\A-------server message\z/,
+        :command => %r/\A-------SMTP command\z/,
+        :rfc822  => %r/\A-------original (?:message|mail info)\z/,
+        :endof   => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+      }
+      Indicators = Sisimai::Bite::Email.INDICATORS
+
+      def description; return 'Digital Arts m-FILTER'; end
+      def smtpagent;   return 'Email::mFILTER'; end
+      def headerlist;  return ['X-Mailer']; end
+      def pattern;     return Re0; end
+
+      # Parse bounce messages from Digital Arts m-FILTER
+      # @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['x-mailer']
+        return nil unless mhead['x-mailer'] =~ Re0[:'x-mailer']
+        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
+        markingset = { 'diagnosis' => false, 'command' => false }
+        v = nil
+
+        hasdivided.each do |e|
+          if readcursor.zero?
+            # Beginning of the bounce message or delivery status part
+            readcursor |= Indicators[:deliverystatus] if e =~ Re1[:begin]
+          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?
+
+            # このメールは「m-FILTER」が自動的に生成して送信しています。
+            # メールサーバーとの通信中、下記の理由により
+            # このメールは送信できませんでした。
+            #
+            # 以下のメールアドレスへの送信に失敗しました。
+            # kijitora@example.jp
+            #
+            #
+            # -------server message
+            # 550 5.1.1 unknown user <kijitora@example.jp>
+            #
+            # -------SMTP command
+            # DATA
+            #
+            # -------original message
+            v = dscontents[-1]
+
+            if cv = e.match(/\A([^ ]+[@][^ ]+)\z/)
+              # 以下のメールアドレスへの送信に失敗しました。
+              # kijitora@example.jp
+              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 e =~ /\A[A-Z]{4}/
+              # -------SMTP command
+              # DATA
+              next if v['command']
+              v['command'] = e if markingset['command']
+
+            else
+              # Get error message and SMTP command
+              if e =~ Re1[:error]
+                # -------server message
+                markingset['diagnosis'] = true
+
+              elsif e =~ Re1[:command]
+                # -------SMTP command
+                markingset['command'] = true
+
+              else
+                # 550 5.1.1 unknown user <kijitora@example.jp>
+                next if e =~ /\A[-]+/
+                next if v['diagnosis']
+                v['diagnosis'] = e
+              end
+            end
+          end
+        end
+        return nil if recipients.zero?
+        require 'sisimai/string'
+
+        dscontents.map do |e|
+          if mhead['received'].size > 0
+            # Get localhost and remote host name from Received header.
+            rheads = mhead['received']
+            rhosts = Sisimai::RFC5322.received(rheads[-1])
+
+            e['lhost'] ||= Sisimai::RFC5322.received(rheads[0]).shift
+            rhosts.each do |ee|
+              # Avoid "... by m-FILTER"
+              next unless ee =~ /[.]/
+              e['rhost'] = ee
+            end
+          end
+          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
+          e['agent']     = self.smtpagent
+          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/mxlogic.rb

@@ -0,0 +1,253 @@
+module Sisimai::Bite::Email
+  module MXLogic
+    # Sisimai::Bite::Email::MXLogic parses a bounce email which created by
+    # McAfee SaaS (formerly MX Logic).
+    # Methods in the module are called from only Sisimai::Message.
+    class << self
+      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/MXLogic.pm
+      # Based on Sisimai::Bite::Email::Exim
+      require 'sisimai/bite/email'
+
+      Re0 = {
+        :'from'      => %r/\AMail Delivery System/,
+        :'subject'   => %r{(?:
+             Mail[ ]delivery[ ]failed(:[ ]returning[ ]message[ ]to[ ]sender)?
+            |Warning:[ ]message[ ].+[ ]delayed[ ]+
+            |Delivery[ ]Status[ ]Notification
+            )
+        }x,
+        :'message-id' => %r/\A[<]mxl[~][0-9a-f]+/,
+      }
+      Re1 = {
+        :rfc822 => %r/\AIncluded is a copy of the message header:\z/,
+        :begin  => %r/\AThis message was created automatically by mail delivery software[.]\z/,
+        :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+      }
+      ReCommand = [
+        %r/SMTP error from remote (?:mail server|mailer) after ([A-Za-z]{4})/,
+        %r/SMTP error from remote (?:mail server|mailer) after end of ([A-Za-z]{4})/,
+      ]
+      ReFailure = {
+        userunknown: %r{
+            user[ ]not[ ]found
+        }x,
+        hostunknown: %r{(?>
+             all[ ](?:
+                 host[ ]address[ ]lookups[ ]failed[ ]permanently
+                |relevant[ ]MX[ ]records[ ]point[ ]to[ ]non[-]existent[ ]hosts
+                )
+            |Unrouteable[ ]address
+            )
+        }x,
+        mailboxfull: %r{(?:
+             mailbox[ ]is[ ]full:?
+            |error:[ ]quota[ ]exceed
+            )
+        }x,
+        notaccept: %r{(?:
+             an[ ]MX[ ]or[ ]SRV[ ]record[ ]indicated[ ]no[ ]SMTP[ ]service
+            |no[ ]host[ ]found[ ]for[ ]existing[ ]SMTP[ ]connection
+            )
+        }x,
+        systemerror: %r{(?>
+             delivery[ ]to[ ](?:file|pipe)[ ]forbidden
+            |local[ ]delivery[ ]failed
+            |LMTP[ ]error[ ]after[ ]
+            )
+        }x,
+        contenterror: %r{
+            Too[ ]many[ ]["]Received["][ ]headers
+        }x,
+      }
+      ReDelayed = %r{(?:
+         retry[ ]timeout[ ]exceeded
+        |No[ ]action[ ]is[ ]required[ ]on[ ]your[ ]part
+        |retry[ ]time[ ]not[ ]reached[ ]for[ ]any[ ]host[ ]after[ ]a[ ]long[ ]failure[ ]period
+        |all[ ]hosts[ ]have[ ]been[ ]failing[ ]for[ ]a[ ]long[ ]time[ ]and[ ]were[ ]last[ ]tried
+        |Delay[ ]reason:[ ]
+        |Message[ ].+[ ](?:has[ ]been[ ]frozen|was[ ]frozen[ ]on[ ]arrival[ ]by[ ])
+        )
+      }x
+      Indicators = Sisimai::Bite::Email.INDICATORS
+
+      def description; return 'McAfee SaaS'; end
+      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
+      # X-MX-Bounce: mta/src/queue/bounce
+      # X-MXL-NoteHash: ffffffffffffffff-0000000000000000000000000000000000000000
+      # X-MXL-Hash: 4c9d4d411993da17-bbd4212b6c887f6c23bab7db4bd87ef5edc00758
+      def headerlist;  return ['X-MXL-NoteHash', 'X-MXL-Hash', 'X-MX-Bounce']; end
+      def pattern;     return Re0; end
+
+      # Parse bounce messages from MXLogic
+      # @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['x-mx-bounce']
+        match += 1 if mhead['x-mxl-hash']
+        match += 1 if mhead['x-mxl-notehash']
+        match += 1 if mhead['subject'] =~ Re0[:subject]
+        match += 1 if mhead['from']    =~ Re0[:from]
+        return nil if match.zero?
+
+        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
+        localhost0 = ''     # (String) Local MTA
+        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?
+
+            # This message was created automatically by mail delivery software.
+            #
+            # A message that you sent could not be delivered to one or more of its
+            # recipients. This is a permanent error. The following address(es) failed:
+            #
+            #  kijitora@example.jp
+            #    SMTP error from remote mail server after RCPT TO:<kijitora@example.jp>:
+            #    host neko.example.jp [192.0.2.222]: 550 5.1.1 <kijitora@example.jp>... User Unknown
+            v = dscontents[-1]
+
+            if cv = e.match(/\A[ \t]*[<]([^ ]+[@][^ ]+)[>]:(.+)\z/)
+              # A message that you have sent could not be delivered to one or more
+              # recipients.  This is a permanent error.  The following address failed:
+              #
+              #  <kijitora@example.co.jp>: 550 5.1.1 ...
+              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
+
+            elsif dscontents.size == recipients
+              # Error message
+              next if e.empty?
+              v['diagnosis'] ||= ''
+              v['diagnosis']  += e + ' '
+            end
+          end
+        end
+        return nil if recipients.zero?
+
+        if mhead['received'].size > 0
+          # Get the name of local MTA
+          # Received: from marutamachi.example.org (c192128.example.net [192.0.2.128])
+          if cv = mhead['received'][-1].match(/from[ ]([^ ]+) /)
+            localhost0 = cv[1]
+          end
+        end
+
+        require 'sisimai/string'
+        dscontents.map do |e|
+          e['agent'] = self.smtpagent
+          e['lhost'] = localhost0
+
+          e['diagnosis'] = e['diagnosis'].gsub(/[-]{2}.*\z/, '')
+          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
+
+          unless e['rhost']
+            # Get the remote host name
+            if cv = e['diagnosis'].match(/host[ ]+([^ \t]+)[ ]\[.+\]:[ ]/)
+              # host neko.example.jp [192.0.2.222]: 550 5.1.1 <kijitora@example.jp>... User Unknown
+              e['rhost'] = cv[1]
+            end
+
+            unless e['rhost']
+              if mhead['received'].size > 0
+                # Get localhost and remote host name from Received header.
+                e['rhost'] = Sisimai::RFC5322.received(mhead['received'][-1]).pop
+              end
+            end
+          end
+
+          unless e['command']
+            # Get the SMTP command name for the session
+            ReCommand.each do |r|
+              # Verify each regular expression of SMTP commands
+              if cv = e['diagnosis'].match(r)
+                e['command'] = cv[1].upcase
+                break
+              end
+            end
+
+            # Detect the reason of bounce
+            if e['command'] == 'MAIL'
+              # MAIL | Connected to 192.0.2.135 but sender was rejected.
+              e['reason'] = 'rejected'
+
+            elsif e['command'] =~ /\A(?:HELO|EHLO)\z/
+              # HELO | Connected to 192.0.2.135 but my name was rejected.
+              e['reason'] = 'blocked'
+
+            else
+              # Verify each regular expression of session errors
+              ReFailure.each_key do |r|
+                # Check each regular expression
+                next unless e['diagnosis'] =~ ReFailure[r]
+                e['reason'] = r.to_s
+                break
+              end
+
+              unless e['reason']
+                # The reason "expired"
+                e['reason'] = 'expired' if e['diagnosis'] =~ ReDelayed
+              end
+            end
+          end
+          e.each_key { |a| e[a] ||= '' }
+        end
+
+        rfc822part = Sisimai::RFC5322.weedout(rfc822list)
+        return { 'ds' => dscontents, 'rfc822' => rfc822part }
+      end
+
+    end
+  end
+end
+