sisimai 4.16.0-java

data/lib/sisimai/mta/notes.rb

@@ -0,0 +1,206 @@
+module Sisimai
+  module MTA
+    # Sisimai::MTA::Notes parses a bounce email which created by Lotus Notes
+    # Server. Methods in the module are called from only Sisimai::Message.
+    module Notes
+      # Imported from p5-Sisimail/lib/Sisimai/MTA/Notes.pm
+      class << self
+        require 'sisimai/mta'
+        require 'sisimai/rfc5322'
+
+        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::MTA.INDICATORS
+        LongFields = Sisimai::RFC5322.LONGFIELDS
+        RFC822Head = Sisimai::RFC5322.HEADERFIELDS
+
+        def description; return 'Lotus Notes'; end
+        def smtpagent;   return 'Notes'; end
+        def headerlist;  return []; end
+        def pattern;     return Re0; end
+
+        # Parse bounce messages from Lotus Notes
+        # @param         [Hash] mhead       Message header 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 = []; dscontents << Sisimai::MTA.DELIVERYSTATUS
+          hasdivided = mbody.split("\n")
+          rfc822next = { 'from' => false, 'to' => false, 'subject' => false }
+          rfc822part = ''     # (String) message/rfc822-headers part
+          previousfn = ''     # (String) Previous field name
+          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 == 0
+              # 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 cv = e.match(/\A([-0-9A-Za-z]+?)[:][ ]*.+\z/)
+                # Get required headers only
+                lhs = cv[1].downcase
+                previousfn = ''
+                next unless RFC822Head.key?(lhs)
+
+                previousfn  = lhs
+                rfc822part += e + "\n"
+
+              elsif e =~ /\A[ \t]+/
+                # Continued line from the previous line
+                next if rfc822next[previousfn]
+                rfc822part += e + "\n" if LongFields.key?(previousfn)
+
+              else
+                # Check the end of headers in rfc822 part
+                next unless LongFields.key?(previousfn)
+                next unless e.empty?
+                rfc822next[previousfn] = true
+              end
+
+            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::MTA.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 == 0
+            # Fallback: Get the recpient address from RFC822 part
+            if cv = rfc822part.match(/^To:[ ]*(.+)$/m)
+              v['recipient'] = Sisimai::Address.s3s4(cv[1])
+              recipients += 1 if v['recipient'].size > 0
+            end
+          end
+
+          return nil if recipients == 0
+          require 'sisimai/string'
+          require 'sisimai/smtp/status'
+
+          dscontents.map do |e|
+            e['agent'] = Sisimai::MTA::Notes.smtpagent
+
+            if mhead['received'].size > 0
+              # Get localhost and remote host name from Received header.
+              r0 = mhead['received']
+              %w|lhost rhost|.each { |a| e[a] ||= '' }
+              e['lhost'] = Sisimai::RFC5322.received(r0[0]).shift if e['lhost'].empty?
+              e['rhost'] = Sisimai::RFC5322.received(r0[-1]).pop  if e['rhost'].empty?
+            end
+            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
+              pseudostatus = Sisimai::SMTP::Status.code(r)
+              e['status'] = pseudostatus if pseudostatus.size > 0
+              break
+            end
+            e['spec']   = e['reason'] == 'mailererror' ? 'X-UNIX' : 'SMTP'
+            e['action'] = 'failed' if e['status'] =~ /\A[45]/
+            e.each_key { |a| e[a] ||= '' }
+          end
+
+          return { 'ds' => dscontents, 'rfc822' => rfc822part }
+        end
+
+      end
+    end
+  end
+end

data/lib/sisimai/mta/opensmtpd.rb

@@ -0,0 +1,225 @@
+module Sisimai
+  module MTA
+    # Sisimai::MTA::OpenSMTPD parses a bounce email which created by OpenSMTPD.
+    # Methods in the module are called from only Sisimai::Message.
+    module OpenSMTPD
+      # Imported from p5-Sisimail/lib/Sisimai/MTA/OpenSMTPD.pm
+      class << self
+        require 'sisimai/mta'
+        require 'sisimai/rfc5322'
+
+        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::MTA.INDICATORS
+        LongFields = Sisimai::RFC5322.LONGFIELDS
+        RFC822Head = Sisimai::RFC5322.HEADERFIELDS
+
+        def description; return 'OpenSMTPD'; end
+        def smtpagent;   return 'OpenSMTPD'; end
+        def headerlist;  return []; end
+        def pattern;     return Re0; end
+
+        # Parse bounce messages from OpenSMTPD
+        # @param         [Hash] mhead       Message header 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 = []; dscontents << Sisimai::MTA.DELIVERYSTATUS
+          hasdivided = mbody.split("\n")
+          rfc822next = { 'from' => false, 'to' => false, 'subject' => false }
+          rfc822part = ''     # (String) message/rfc822-headers part
+          previousfn = ''     # (String) Previous field name
+          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 == 0
+              # 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 cv = e.match(/\A([-0-9A-Za-z]+?)[:][ ]*.+\z/)
+                # Get required headers only
+                lhs = cv[1].downcase
+                previousfn = ''
+                next unless RFC822Head.key?(lhs)
+
+                previousfn  = lhs
+                rfc822part += e + "\n"
+
+              elsif e =~ /\A[ \t]+/
+                # Continued line from the previous line
+                next if rfc822next[previousfn]
+                rfc822part += e + "\n" if LongFields.key?(previousfn)
+
+              else
+                # Check the end of headers in rfc822 part
+                next unless LongFields.key?(previousfn)
+                next unless e.empty?
+                rfc822next[previousfn] = true
+              end
+
+            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::MTA.DELIVERYSTATUS
+                  v = dscontents[-1]
+                end
+                v['recipient'] = cv[1]
+                v['diagnosis'] = cv[2]
+                recipients += 1
+              end
+            end
+          end
+
+          return nil if recipients == 0
+          require 'sisimai/string'
+          require 'sisimai/smtp/status'
+
+          dscontents.map do |e|
+            e['agent'] = Sisimai::MTA::OpenSMTPD.smtpagent
+
+            if mhead['received'].size > 0
+              # Get localhost and remote host name from Received header.
+              r0 = mhead['received']
+              %w|lhost rhost|.each { |a| e[a] ||= '' }
+              e['lhost'] = Sisimai::RFC5322.received(r0[0]).shift if e['lhost'].empty?
+              e['rhost'] = Sisimai::RFC5322.received(r0[-1]).pop  if e['rhost'].empty?
+            end
+            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
+              break
+            end
+
+            e['status'] = Sisimai::SMTP::Status.find(e['diagnosis'])
+            e['spec']   = e['reason'] == 'mailererror' ? 'X-UNIX' : 'SMTP'
+            e['action'] = 'failed' if e['status'] =~ /\A[45]/
+            e.each_key { |a| e[a] ||= '' }
+          end
+
+          return { 'ds' => dscontents, 'rfc822' => rfc822part }
+        end
+
+      end
+    end
+  end
+end
+

data/lib/sisimai/mta/postfix.rb

@@ -0,0 +1,306 @@
+module Sisimai
+  module MTA
+    # Sisimai::MTA::Postfix parses a bounce email which created by Postfix.
+    # Methods in the module are called from only Sisimai::Message.
+    module Postfix
+      # Imported from p5-Sisimail/lib/Sisimai/MTA/Postfix.pm
+      class << self
+        require 'sisimai/mta'
+        require 'sisimai/rfc5322'
+
+        # Postfix manual - bounce(5) - http://www.postfix.org/bounce.5.html
+        Re0 = {
+          :from    => %r/ [(]Mail Delivery System[)]\z/,
+          :subject => %r/\AUndelivered Mail Returned to Sender\z/,
+        }
+        Re1 = {
+          :begin => %r{\A(?>
+             [ ]+The[ ](?:
+               Postfix[ ](?:
+                 program\z              # The Postfix program
+                |on[ ].+[ ]program\z    # The Postfix on <os name> program
+                )
+              |\w+[ ]Postfix[ ]program\z  # The <name> Postfix program
+              |mail[ \t]system\z             # The mail system
+              |\w+[ \t]program\z             # The <custmized-name> program
+              )
+            |This[ ]is[ ]the[ ](?:
+               Postfix[ ]program          # This is the Postfix program
+              |\w+[ ]Postfix[ ]program    # This is the <name> Postfix program
+              |\w+[ ]program              # This is the <customized-name> Postfix program
+              |mail[ ]system[ ]at[ ]host  # This is the mail system at host <hostname>.
+              )
+            )
+          }x,
+          :rfc822 => %r!\AContent-Type:[ \t]*(?:message/rfc822|text/rfc822-headers)\z!x,
+          :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+        }
+        Indicators = Sisimai::MTA.INDICATORS
+        LongFields = Sisimai::RFC5322.LONGFIELDS
+        RFC822Head = Sisimai::RFC5322.HEADERFIELDS
+
+        def description; return 'Postfix'; end
+        def smtpagent;   return 'Postfix'; end
+        def headerlist;  return []; end
+        def pattern;     return Re0; end
+
+        # Parse bounce messages from Postfix
+        # @param         [Hash] mhead       Message header 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 = []; dscontents << Sisimai::MTA.DELIVERYSTATUS
+          hasdivided = mbody.split("\n")
+          havepassed = ['']
+          rfc822next = { 'from' => false, 'to' => false, 'subject' => false }
+          rfc822part = ''     # (String) message/rfc822-headers part
+          previousfn = ''     # (String) Previous field name
+          readcursor = 0      # (Integer) Points the current cursor position
+          recipients = 0      # (Integer) The number of 'Final-Recipient' header
+          commandset = []     # (Array) ``in reply to * command'' list
+          connvalues = 0      # (Integer) Flag, 1 if all the value of $connheader have been set
+          connheader = {
+            'date'  => '',    # The value of Arrival-Date header
+            'lhost' => '',    # The value of Received-From-MTA header
+          }
+          anotherset = {}     # Another error information
+          v = nil
+
+          hasdivided.each do |e|
+            # Save the current line for the next loop
+            havepassed << e; p = havepassed[-2]
+
+            if readcursor == 0
+              # 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 cv = e.match(/\A([-0-9A-Za-z]+?)[:][ ]*.*\z/)
+                # Get required headers only
+                lhs = cv[1].downcase
+                previousfn = ''
+                next unless RFC822Head.key?(lhs)
+
+                previousfn  = lhs
+                rfc822part += e + "\n"
+
+              elsif e =~ /\A[ \t]+/
+                # Continued line from the previous line
+                next if rfc822next[previousfn]
+                rfc822part += e + "\n" if LongFields.key?(previousfn)
+
+              else
+                # Check the end of headers in rfc822 part
+                next unless LongFields.key?(previousfn)
+                next unless e.empty?
+                rfc822next[previousfn] = true
+              end
+
+            else
+              # Before "message/rfc822"
+              next if readcursor & Indicators[:'deliverystatus'] == 0
+              next if e.empty?
+
+              if connvalues == connheader.keys.size
+                # Final-Recipient: RFC822; userunknown@example.jp
+                # X-Actual-Recipient: RFC822; kijitora@example.co.jp
+                # Action: failed
+                # Status: 5.1.1
+                # Remote-MTA: DNS; mx.example.jp
+                # Diagnostic-Code: SMTP; 550 5.1.1 <userunknown@example.jp>... User Unknown
+                # Last-Attempt-Date: Fri, 14 Feb 2014 12:30:08 -0500
+                v = dscontents[-1]
+                if cv = e.match(/\A[Ff]inal-[Rr]ecipient:[ ]*(?:RFC|rfc)822;[ ]*(.+)\z/)
+                  # Final-Recipient: RFC822; userunknown@example.jp
+                  if v['recipient']
+                    # There are multiple recipient addresses in the message body.
+                    dscontents << Sisimai::MTA.DELIVERYSTATUS
+                    v = dscontents[-1]
+                  end
+                  v['recipient'] = cv[1]
+                  recipients += 1
+
+                elsif cv = e.match(/\A[Xx]-[Aa]ctual-[Rr]ecipient:[ ]*(?:RFC|rfc)822;[ ]*([^ ]+)\z/) ||
+                      cv = e.match(/\A[Oo]riginal-[Rr]ecipient:[ ]*(?:RFC|rfc)822;[ ]*([^ ]+)\z/)
+                  # X-Actual-Recipient: RFC822; kijitora@example.co.jp
+                  # Original-Recipient: rfc822;kijitora@example.co.jp
+                  v['alias'] = cv[1]
+
+                elsif 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.1.1
+                  # Status:5.2.0
+                  # Status: 5.1.0 (permanent failure)
+                  v['status'] = cv[1]
+
+                elsif cv = e.match(/\A[Rr]emote-MTA:[ ]*(?:DNS|dns);[ ]*(.+)\z/)
+                  # Remote-MTA: DNS; mx.example.jp
+                  v['rhost'] = cv[1].downcase
+
+                elsif cv = e.match(/\A[Ll]ast-[Aa]ttempt-[Dd]ate:[ ]*(.+)\z/)
+                  # Last-Attempt-Date: Fri, 14 Feb 2014 12:30:08 -0500
+                  #
+                  # src/bounce/bounce_notify_util.c:
+                  #   681  #if 0
+                  #   682      if (dsn->time > 0)
+                  #   683          post_mail_fprintf(bounce, "Last-Attempt-Date: %s",
+                  #   684                            mail_date(dsn->time));
+                  #   685  #endif
+                  v['date'] = cv[1]
+
+                else
+                  if cv = e.match(/\A[Dd]iagnostic-[Cc]ode:[ ]*(.+?);[ ]*(.+)\z/)
+                    # Diagnostic-Code: SMTP; 550 5.1.1 <userunknown@example.jp>... User Unknown
+                    v['spec'] = cv[1].upcase
+                    v['diagnosis'] = cv[2]
+                    v['spec'] = 'SMTP' if v['spec'] == 'X-POSTFIX'
+
+                  elsif p =~ /\A[Dd]iagnostic-[Cc]ode:[ ]*/ && cv = e.match(/\A[ \t]+(.+)\z/)
+                    # Continued line of the value of Diagnostic-Code header
+                    v['diagnosis'] ||= ''
+                    v['diagnosis']  += ' ' + cv[1]
+                    havepassed[-1] = 'Diagnostic-Code: ' + e
+                  end
+                end
+
+              else
+                # If you do so, please include this problem report. You can
+                # delete your own text from the attached returned message.
+                #
+                #           The mail system
+                #
+                # <userunknown@example.co.jp>: host mx.example.co.jp[192.0.2.153] said: 550
+                # 5.1.1 <userunknown@example.co.jp>... User Unknown (in reply to RCPT TO
+                # command)
+                if cv = e.match(/[ \t][(]in reply to ([A-Z]{4}).*/)
+                  # 5.1.1 <userunknown@example.co.jp>... User Unknown (in reply to RCPT TO
+                  commandset << cv[1]
+
+                elsif cv = e.match(/([A-Z]{4})[ \t]*.*command[)]\z/)
+                  # to MAIL command)
+                  commandset << cv[1]
+
+                else
+                  if cv = e.match(/\A[Rr]eporting-MTA:[ ]*(?:DNS|dns);[ ]*(.+)\z/)
+                    # Reporting-MTA: dns; mx.example.jp
+                    next if connheader['lhost'].size > 0
+                    connheader['lhost'] = cv[1].downcase
+                    connvalues += 1
+
+                  elsif cv = e.match(/\A[Aa]rrival-[Dd]ate:[ ]*(.+)\z/)
+                    # Arrival-Date: Wed, 29 Apr 2009 16:03:18 +0900
+                    next if connheader['date'].size > 0
+                    connheader['date'] = 1
+                    connvalues += 1
+
+                  elsif cv = e.match(/\A(X-Postfix-Sender):[ ]*rfc822;[ ]*(.+)\z/)
+                    # X-Postfix-Sender: rfc822; shironeko@example.org
+                    rfc822part += sprintf('%s: %s\n', cv[1], cv[2])
+
+                  else
+                    # Alternative error message and recipient
+                    if cv = e.match(/\A[<]([^ ]+[@][^ ]+)[>] [(]expanded from [<](.+)[>][)]:[ \t]*(.+)\z/)
+                      # <r@example.ne.jp> (expanded from <kijitora@example.org>): user ...
+                      anotherset['recipient'] = cv[1]
+                      anotherset['alias']     = cv[2]
+                      anotherset['diagnosis'] = cv[3]
+
+                    elsif cv = e.match(/\A[<]([^ ]+[@][^ ]+)[>]:(.*)\z/)
+                      # <kijitora@exmaple.jp>: ...
+                      anotherset['recipient'] = cv[1]
+                      anotherset['diagnosis'] = cv[2]
+
+                    else
+                      # Get error message continued from the previous line
+                      next unless anotherset['diagnosis']
+                      if e =~ /\A[ \t]{4}(.+)\z/
+                        #    host mx.example.jp said:...
+                        anotherset['diagnosis'] += ' ' + e
+                      end
+                    end
+                  end
+                end
+              end
+            end # End of if: rfc822
+          end
+
+          if recipients == 0
+            # Fallback: set recipient address from error message
+            if anotherset['recipient'] && anotherset['recipient'].size > 0
+              # Set recipient address
+              dscontents[-1]['recipient'] = anotherset['recipient']
+              recipients += 1
+            end
+          end
+          return nil if recipients == 0
+
+          require 'sisimai/string'
+          require 'sisimai/smtp'
+          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']   = Sisimai::MTA::Postfix.smtpagent
+            e['command'] = commandset.shift || ''
+
+            if anotherset['diagnosis']
+              # Copy alternative error message
+              e['diagnosis'] = anotherset['diagnosis'] unless e['diagnosis']
+              e['diagnosis'] = anotherset['diagnosis'] if e['diagnosis'] =~ /\A\d+\z/
+            end
+            e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
+            e['spec']    ||= 'SMTP' if e['diagnosis'] =~ /host .+ said:/
+            e['status']  ||= ''
+
+            if mhead['received'].size > 0
+              # Get localhost and remote host name from Received header.
+              r0 = mhead['received']
+              %w|lhost rhost|.each { |a| e[a] ||= '' }
+              e['lhost'] = Sisimai::RFC5322.received(r0[0]).shift if e['lhost'].empty?
+              e['rhost'] = Sisimai::RFC5322.received(r0[-1]).pop  if e['rhost'].empty?
+            end
+
+            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
+              r = Sisimai::SMTP::Status.find(e['diagnosis'])
+              e['status'] = r if r.size > 0
+            end
+            e.each_key { |a| e[a] ||= '' }
+          end
+
+          return { 'ds' => dscontents, 'rfc822' => rfc822part }
+        end
+
+      end
+    end
+  end
+end