sisimai 4.16.0-java

data/lib/sisimai/msp/us/facebook.rb

@@ -0,0 +1,306 @@
+module Sisimai
+  module MSP::US
+    # Sisimai::MSP::US::Facebook parses a bounce email which created by Facebook.
+    # Methods in the module are called from only Sisimai::Message.
+    module Facebook
+      # Imported from p5-Sisimail/lib/Sisimai/MSP/US/Facebook.pm
+      class << self
+        require 'sisimai/msp'
+        require 'sisimai/rfc5322'
+
+        Re0 = {
+          :from    => %r/\AFacebook [<]mailer-daemon[@]mx[.]facebook[.]com[>]\z/,
+          :subject => %r/\ASorry, your message could not be delivered\z/,
+        }
+        Re1 = {
+          :begin   => %r/\AThis message was created automatically by Facebook[.]\z/,
+          :rfc822  => %r/\AContent-Disposition: inline\z/,
+          :endof   => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+        }
+
+        # http://postmaster.facebook.com/response_codes
+        # NOT TESTD EXCEPT RCP-P2
+        ReFailure = {
+          'userunknown' => [
+            'RCP-P1',   # The attempted recipient address does not exist.
+            'INT-P1',   # The attempted recipient address does not exist.
+            'INT-P3',   # The attempted recpient group address does not exist.
+            'INT-P4',   # The attempted recipient address does not exist.
+          ],
+          'filtered' => [
+            'RCP-P2',   # The attempted recipient's preferences prevent messages from being delivered.
+            'RCP-P3',   # The attempted recipient's privacy settings blocked the delivery.
+          ],
+          'mesgtoobig' => [
+            'MSG-P1',   # The message exceeds Facebook's maximum allowed size.
+            'INT-P2',   # The message exceeds Facebook's maximum allowed size.
+          ],
+          'contenterror' => [
+            'MSG-P2',   # The message contains an attachment type that Facebook does not accept.
+            'MSG-P3',   # The message contains multiple instances of a header field that can only be present once. Please see RFC 5322, section 3.6 for more information
+            'POL-P6',   # The message contains a url that has been blocked by Facebook.
+            'POL-P7',   # The message does not comply with Facebook's abuse policies and will not be accepted.
+          ],
+          'securityerror' => [
+            'POL-P1',   # Your mail server's IP Address is listed on the Spamhaus PBL.
+            'POL-P2',   # Facebook will no longer accept mail from your mail server's IP Address.
+            'POL-P5',   # The message contains a virus.
+            'POL-P7',   # The message does not comply with Facebook's Domain Authentication requirements.
+          ],
+          'notaccept' => [
+            'POL-P3',   # Facebook is not accepting messages from your mail server. This will persist for 4 to 8 hours.
+            'POL-P4',   # Facebook is not accepting messages from your mail server. This will persist for 24 to 48 hours.
+            'POL-T1',   # Facebook is not accepting messages from your mail server, but they may be retried later. This will persist for 1 to 2 hours.
+            'POL-T2',   # Facebook is not accepting messages from your mail server, but they may be retried later. This will persist for 4 to 8 hours.
+            'POL-T3',   # Facebook is not accepting messages from your mail server, but they may be retried later. This will persist for 24 to 48 hours.
+          ],
+          'rejected' => [
+            'DNS-P1',   # Your SMTP MAIL FROM domain does not exist.
+            'DNS-P2',   # Your SMTP MAIL FROM domain does not have an MX record.
+            'DNS-T1',   # Your SMTP MAIL FROM domain exists but does not currently resolve.
+            'DNS-P3',   # Your mail server does not have a reverse DNS record.
+            'DNS-T2',   # You mail server's reverse DNS record does not currently resolve.
+          ],
+          'systemerror' => [
+            'CON-T1',   # Facebook's mail server currently has too many connections open to allow another one.
+          ],
+          'undefined' => [
+            'RCP-T1',   # The attempted recipient address is not currently available due to an internal system issue. This is a temporary condition.
+            'MSG-T1',   # The number of recipients on the message exceeds Facebook's allowed maximum.
+            'CON-T2',   # Your mail server currently has too many connections open to Facebook's mail servers.
+            'CON-T3',   # Your mail server has opened too many new connections to Facebook's mail servers in a short period of time.
+            'CON-T4',   # Your mail server has exceeded the maximum number of recipients for its current connection.
+          ],
+          'suspend' => [
+            'RCP-T4',   # The attempted recipient address is currently deactivated. The user may or may not reactivate it.
+          ],
+        }
+        Indicators = Sisimai::MSP.INDICATORS
+        LongFields = Sisimai::RFC5322.LONGFIELDS
+        RFC822Head = Sisimai::RFC5322.HEADERFIELDS
+
+        def description; return 'Facebook: https://www.facebook.com'; end
+        def smtpagent;   return 'US::Facebook'; end
+        def headerlist;  return []; end
+        def pattern;     return Re0; end
+
+        # Parse bounce messages from Facebook
+        # @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['from']    =~ Re0[:from]
+          return nil unless mhead['subject'] =~ Re0[:subject]
+
+          dscontents = []; dscontents << Sisimai::MSP.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
+          fbresponse = ''     # (String) Response code from Facebook
+          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 Reporting-MTA header
+          }
+          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
+                # Reporting-MTA: dns; 10.138.205.200
+                # Arrival-Date: Thu, 23 Jun 2011 02:29:43 -0700
+                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::MSP.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/)
+                  # X-Actual-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
+                  v['date'] = cv[1]
+
+                else
+                  if cv = e.match(/\A[Dd]iagnostic-[Cc]ode:[ ]*(.+?);[ ]*(.+)\z/)
+                    # Diagnostic-Code: smtp; 550 5.1.1 RCP-P2
+                    #     http://postmaster.facebook.com/response_codes?ip=192.0.2.135#rcp Refused due to recipient preferences
+                    v['spec'] = cv[1].upcase
+                    v['diagnosis'] = cv[2]
+
+                  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 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'] = cv[1]
+                  connvalues += 1
+                end
+
+              end
+            end
+          end
+
+          return nil if recipients == 0
+          require 'sisimai/string'
+          require 'sisimai/smtp/status'
+
+          dscontents.map do |e|
+            e['lhost'] ||= connheader['lhost']
+
+            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'])
+
+            if cv = e['diagnosis'].match(/\b([A-Z]{3})[-]([A-Z])(\d)\b/)
+              # Diagnostic-Code: smtp; 550 5.1.1 RCP-P2
+              lhs = cv[1]
+              rhs = cv[2]
+              num = cv[3]
+
+              fbresponse = sprintf("%s-%s%d", lhs, rhs, num)
+              e['softbounce'] = rhs == 'P' ? 0 : 1
+            end
+
+            catch :SESSION do
+              ReFailure.each_key do |r|
+                # Verify each regular expression of session errors
+                ReFailure[r].each do |rr|
+                  # Check each regular expression
+                  next unless fbresponse == rr
+                  e['reason'] = r
+                  throw :SESSION
+                end
+              end
+            end
+
+            unless e['reason']
+              # http://postmaster.facebook.com/response_codes
+              #   Facebook System Resource Issues
+              #   These codes indicate a temporary issue internal to Facebook's
+              #   system. Administrators observing these issues are not required to
+              #   take any action to correct them.
+              if fbresponse =~ /\AINT-T\d+\z/
+                # * INT-Tx
+                #
+                # https://groups.google.com/forum/#!topic/cdmix/eXfi4ddgYLQ
+                # This block has not been tested because we have no email sample
+                # including "INT-T?" error code.
+                e['reason'] = 'systemerror'
+                e['softbounce'] = 1
+              end
+            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['agent']  = Sisimai::MSP::US::Facebook.smtpagent
+          end
+
+          return { 'ds' => dscontents, 'rfc822' => rfc822part }
+        end
+
+      end
+    end
+  end
+end
+

data/lib/sisimai/msp/us/google.rb

@@ -0,0 +1,357 @@
+module Sisimai
+  module MSP::US
+    # Sisimai::MSP::US::Google parses a bounce email which created by Gmail.
+    # Methods in the module are called from only Sisimai::Message.
+    module Google
+      # Imported from p5-Sisimail/lib/Sisimai/MSP/US/Google.pm
+      class << self
+        require 'sisimai/msp'
+        require 'sisimai/rfc5322'
+
+        Re0 = {
+          :from    => %r/[@]googlemail[.]com[>]?\z/,
+          :subject => %r/Delivery[ ]Status[ ]Notification/,
+        }
+        Re1 = {
+          :begin   => %r/Delivery to the following recipient/,
+          :start   => %r/Technical details of (?:permanent|temporary) failure:/,
+          :error   => %r/The error that the other server returned was:/,
+          :rfc822  => %r{\A(?:
+               -----[ ]Original[ ]message[ ]-----
+              |[ \t]*-----[ ]Message[ ]header[ ]follows[ ]-----
+              )\z
+          }x,
+          :endof   => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
+        }
+        ReFailure = {
+          'expired' => %r{(?:
+               DNS[ ]Error:[ ]Could[ ]not[ ]contact[ ]DNS[ ]servers
+              |Delivery[ ]to[ ]the[ ]following[ ]recipient[ ]has[ ]been[ ]delayed
+              |The[ ]recipient[ ]server[ ]did[ ]not[ ]accept[ ]our[ ]requests[ ]to[ ]connect
+              )
+          }x,
+          'hostunknown' => %r{DNS[ ]Error:[ ](?:
+               Domain[ ]name[ ]not[ ]found
+              |DNS[ ]server[ ]returned[ ]answer[ ]with[ ]no[ ]data
+              )
+          }x,
+        }
+        StateTable = {
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 500 Remote server does not support TLS (state 6).
+          '6'  => { 'command' => 'MAIL', 'reason' => 'systemerror' },
+
+          # http://www.google.td/support/forum/p/gmail/thread?tid=08a60ebf5db24f7b&hl=en
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 535 SMTP AUTH failed with the remote server. (state 8).
+          '8'  => { 'command' => 'AUTH', 'reason' => 'systemerror' },
+
+          # http://www.google.co.nz/support/forum/p/gmail/thread?tid=45208164dbca9d24&hl=en
+          # Technical details of temporary failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 454 454 TLS missing certificate: error:0200100D:system library:fopen:Permission denied (#4.3.0) (state 9).
+          '9'  => { 'command' => 'AUTH', 'reason' => 'systemerror' },
+
+          # http://www.google.com/support/forum/p/gmail/thread?tid=5cfab8c76ec88638&hl=en
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 500 Remote server does not support SMTP Authenticated Relay (state 12).
+          '12' => { 'command' => 'AUTH', 'reason' => 'relayingdenied' },
+
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 550 550 5.7.1 <****@gmail.com>... Access denied (state 13).
+          '13' => { 'command' => 'EHLO', 'reason' => 'blocked' },
+
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 550 550 5.1.1 <******@*********.**>... User Unknown (state 14).
+          # 550 550 5.2.2 <*****@****.**>... Mailbox Full (state 14).
+          #
+          '14' => { 'command' => 'RCPT', 'reason' => 'userunknown' },
+
+          # http://www.google.cz/support/forum/p/gmail/thread?tid=7090cbfd111a24f9&hl=en
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 550 550 5.7.1 SPF unauthorized mail is prohibited. (state 15).
+          # 554 554 Error: no valid recipients (state 15).
+          '15' => { 'command' => 'DATA', 'reason' => 'filtered' },
+
+          # http://www.google.com/support/forum/p/Google%20Apps/thread?tid=0aac163bc9c65d8e&hl=en
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 550 550 <****@***.**> No such user here (state 17).
+          # 550 550 #5.1.0 Address rejected ***@***.*** (state 17).
+          '17' => { 'command' => 'DATA', 'reason' => 'filtered' },
+
+          # Technical details of permanent failure:
+          # Google tried to deliver your message, but it was rejected by the recipient domain.
+          # We recommend contacting the other email provider for further information about the
+          # cause of this error. The error that the other server returned was:
+          # 550 550 Unknown user *****@***.**.*** (state 18).
+          '18' => { 'command' => 'DATA', 'reason' => 'filtered' },
+        }
+        Indicators = Sisimai::MSP.INDICATORS
+        LongFields = Sisimai::RFC5322.LONGFIELDS
+        RFC822Head = Sisimai::RFC5322.HEADERFIELDS
+
+        def description; return 'Google Gmail: https://mail.google.com'; end
+        def smtpagent;   return 'US::Google'; end
+        def headerlist;  return ['X-Failed-Recipients']; end
+        def pattern;     return Re0; end
+
+        # Parse bounce messages from Google Gmail
+        # @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
+
+          # Google Mail
+          # From: Mail Delivery Subsystem <mailer-daemon@googlemail.com>
+          # Received: from vw-in-f109.1e100.net [74.125.113.109] by ...
+          #
+          # * Check the body part
+          #   This is an automatically generated Delivery Status Notification
+          #   Delivery to the following recipient failed permanently:
+          #
+          #        recipient-address-here@example.jp
+          #
+          #   Technical details of permanent failure:
+          #   Google tried to deliver your message, but it was rejected by the
+          #   recipient domain. We recommend contacting the other email provider
+          #   for further information about the cause of this error. The error
+          #   that the other server returned was:
+          #   550 550 <recipient-address-heare@example.jp>: User unknown (state 14).
+          #
+          #   -- OR --
+          #   THIS IS A WARNING MESSAGE ONLY.
+          #
+          #   YOU DO NOT NEED TO RESEND YOUR MESSAGE.
+          #
+          #   Delivery to the following recipient has been delayed:
+          #
+          #        mailboxfull@example.jp
+          #
+          #   Message will be retried for 2 more day(s)
+          #
+          #   Technical details of temporary failure:
+          #   Google tried to deliver your message, but it was rejected by the recipient
+          #   domain. We recommend contacting the other email provider for further infor-
+          #   mation about the cause of this error. The error that the other server re-
+          #   turned was: 450 450 4.2.2 <mailboxfull@example.jp>... Mailbox Full (state 14).
+          #
+          #   -- OR --
+          #
+          #   Delivery to the following recipient failed permanently:
+          #
+          #        userunknown@example.jp
+          #
+          #   Technical details of permanent failure:=20
+          #   Google tried to deliver your message, but it was rejected by the server for=
+          #    the recipient domain example.jp by mx.example.jp. [192.0.2.59].
+          #
+          #   The error that the other server returned was:
+          #   550 5.1.1 <userunknown@example.jp>... User Unknown
+          #
+          return nil unless mhead['from']    =~ Re0[:from]
+          return nil unless mhead['subject'] =~ Re0[:subject]
+
+          require 'sisimai/address'
+          dscontents = []; dscontents << Sisimai::MSP.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
+          statecode0 = 0      # (Integer) The value of (state *) in the error message
+          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']
+              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/)
+                # Skip if DKIM-Signature header
+                next if e =~ /\ADKIM-Signature[:]/
+
+                # 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?
+
+              # Technical details of permanent failure:=20
+              # Google tried to deliver your message, but it was rejected by the recipient =
+              # domain. We recommend contacting the other email provider for further inform=
+              # ation about the cause of this error. The error that the other server return=
+              # ed was: 554 554 5.7.0 Header error (state 18).
+              #
+              # -- OR --
+              #
+              # Technical details of permanent failure:=20
+              # Google tried to deliver your message, but it was rejected by the server for=
+              # the recipient domain example.jp by mx.example.jp. [192.0.2.49].
+              #
+              # The error that the other server returned was:
+              # 550 5.1.1 <userunknown@example.jp>... User Unknown
+              #
+              v = dscontents[-1]
+
+              if cv = e.match(/\A[ \t]+([^ ]+[@][^ ]+)\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::MSP.DELIVERYSTATUS
+                  v = dscontents[-1]
+                end
+
+                addr0 = Sisimai::Address.s3s4(cv[1])
+                if Sisimai::RFC5322.is_emailaddress(addr0)
+                  v['recipient'] = addr0
+                  recipients += 1
+                end
+
+              else
+                if cv = e.match(/Technical details of (.+) failure:/)
+                  # Technical details of permanent failure:
+                  # Technical details of temporary failure:
+                  v['softbounce'] = cv[1] == 'permanent' ? 0 : 1
+                end
+                v['diagnosis'] ||= ''
+                v['diagnosis']  += e + ' '
+              end
+            end
+          end
+
+          return nil if recipients == 0
+          require 'sisimai/string'
+          require 'sisimai/smtp/status'
+
+          dscontents.map do |e|
+            e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
+
+            unless e['rhost']
+              # Get the value of remote host
+              if cv = e['diagnosis'].match(/[ \t]+by[ \t]+([^ ]+)[.][ \t]+\[(\d+[.]\d+[.]\d+[.]\d+)\][.]/)
+                # Google tried to deliver your message, but it was rejected by
+                # the server for the recipient domain example.jp by mx.example.jp. [192.0.2.153].
+                hostname = cv[1]
+                ipv4addr = cv[2]
+                if hostname =~ /[-0-9a-zA-Z]+[.][a-zA-Z]+\z/
+                  # Maybe valid hostname
+                  e['rhost'] = hostname.downcase
+                else
+                  # Use IP address instead
+                  e['rhost'] = ipv4addr
+                end
+              end
+            end
+
+            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 cv = e['diagnosis'].match(/[(]state[ ](\d+)[)][.]/)
+              statecode0 = cv[1]
+            end
+            if StateTable[statecode0]
+              # (state *)
+              e['reason']  = StateTable[statecode0]['reason']
+              e['command'] = StateTable[statecode0]['command']
+
+            else
+              # No state code
+              ReFailure.each_key do |r|
+                # Verify each regular expression of session errors
+                next unless e['diagnosis'] =~ ReFailure[r]
+                e['reason'] = r
+                break
+              end
+            end
+            e['status'] = Sisimai::SMTP::Status.find(e['diagnosis'])
+
+            if e['reason']
+              # Set pseudo status code
+              if e['status'] =~ /\A[45][.][1-7][.][1-9]\z/
+                # Override bounce reason
+                e['reason'] = Sisimai::SMTP::Status.name(e['status'])
+              end
+            end
+            e['spec']   = e['reason'] == 'mailererror' ? 'X-UNIX' : 'SMTP'
+            e['action'] = 'failed' if e['status'] =~ /\A[45]/
+            e['agent']  = Sisimai::MSP::US::Google.smtpagent
+          end
+
+          return { 'ds' => dscontents, 'rfc822' => rfc822part }
+        end
+
+      end
+    end
+  end
+end
+