sisimai 4.21.1 → 4.22.0

data/lib/sisimai/mta/imailserver.rb

@@ -1,182 +0,0 @@
-module Sisimai
-  module MTA
-    # Sisimai::MTA::IMailServer parses a bounce email which created by Ipswitch
-    # IMail Server. Methods in the module are called from only Sisimai::Message.
-    module IMailServer
-      # Imported from p5-Sisimail/lib/Sisimai/MTA/IMailServer.pm
-      class << self
-        require 'sisimai/mta'
-        require 'sisimai/rfc5322'
-
-        Re0 = {
-          :'x-mailer' => %r/\A[<]SMTP32 v[\d.]+[>][ ]*\z/,
-          :'subject'  => %r/\AUndeliverable Mail[ ]*\z/,
-        }
-        Re1 = {
-          :begin  => %r/\A\z/,    # Blank line
-          :error  => %r/Body of message generated response:/,
-          :rfc822 => %r/\AOriginal message follows[.]\z/,
-          :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
-        }
-        ReSMTP = {
-          conn: %r{(?:
-               SMTP[ ]connection[ ]failed,
-              |Unexpected[ ]connection[ ]response[ ]from[ ]server:
-              )
-          },
-          ehlo: %r|Unexpected response to EHLO/HELO:|,
-          mail: %r|Server response to MAIL FROM:|,
-          rcpt: %r|Additional RCPT TO generated following response:|,
-          data: %r|DATA command generated response:|,
-        }
-        ReFailure = {
-          hostunknown: %r/Unknown[ ]host/x,
-          userunknown: %r/\A(?:Unknown[ ]user|Invalid[ ]final[ ]delivery[ ]userid)/x,
-          mailboxfull: %r/\AUser[ ]mailbox[ ]exceeds[ ]allowed[ ]size/x,
-          securityerr: %r/\ARequested[ ]action[ ]not[ ]taken:[ ]virus[ ]detected/x,
-          undefined:   %r/\Aundeliverable[ ]to[ ]/x,
-          expired:     %r/\ADelivery[ ]failed[ ]\d+[ ]attempts/x,
-        }
-        Indicators = Sisimai::MTA.INDICATORS
-
-        def description; return 'IPSWITCH IMail Server'; end
-        def smtpagent;   return Sisimai::MTA.smtpagent(self); end
-        def headerlist;  return ['X-Mailer']; end
-        def pattern;     return Re0; end
-
-        # Parse bounce messages from IMailServer
-        # @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
-
-          match  = 0
-          match += 1 if mhead['subject'] =~ Re0[:subject]
-          match += 1 if mhead['x-mailer'] && mhead['x-mailer'] =~ Re0[:'x-mailer']
-          return nil if match.zero?
-
-          dscontents = [Sisimai::MTA.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"
-              break if readcursor & Indicators[:'message-rfc822'] > 0
-
-              # Unknown user: kijitora@example.com
-              #
-              # Original message follows.
-              v = dscontents[-1]
-
-              if cv = e.match(/\A(.+)[ ](.+)[:][ \t]*([^ ]+[@][^ ]+)/)
-                # Unknown user: kijitora@example.com
-                if v['recipient']
-                  # There are multiple recipient addresses in the message body.
-                  dscontents << Sisimai::MTA.DELIVERYSTATUS
-                  v = dscontents[-1]
-                end
-                v['diagnosis'] = cv[1] + ' ' + cv[2]
-                v['recipient'] = cv[3]
-                recipients += 1
-
-              elsif cv = e.match(/\Aundeliverable[ ]+to[ ]+(.+)\z/)
-                # undeliverable to kijitora@example.com
-                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
-
-              else
-                # Other error message text
-                v['alterrors']  += ' ' + e if v['alterrors']
-                if e =~ Re1[:error]
-                  # Body of message generated response:
-                  v['alterrors'] = e
-                end
-              end
-            end
-          end
-          return nil if recipients.zero?
-          require 'sisimai/string'
-
-          dscontents.map do |e|
-            e['agent'] = Sisimai::MTA::IMailServer.smtpagent
-
-            if e['alterrors'] && e['alterrors'].size > 0
-              # Copy alternative error message
-              if e['diagnosis']
-                e['diagnosis'] = e['alterrors'] + ' ' + e['diagnosis']
-              else
-                e['diagnosis'] = e['alterrors']
-              end
-              e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-              e.delete('alterrors')
-            end
-            e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-
-            ReSMTP.each_key do |r|
-              # Detect SMTP command from the message
-              next unless e['diagnosis'] =~ ReSMTP[r]
-              e['command'] = r.to_s.upcase
-              break
-            end
-
-            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
-end

data/lib/sisimai/mta/interscanmss.rb

@@ -1,149 +0,0 @@
-module Sisimai
-  module MTA
-    # Sisimai::MTA::InterScanMSS parses a bounce email which created by Trend
-    # Micro InterScan Messaging Security Suite. Methods in the module are called
-    # from only Sisimai::Message.
-    module InterScanMSS
-      # Imported from p5-Sisimail/lib/Sisimai/MTA/InterScanMSS.pm
-      class << self
-        require 'sisimai/mta'
-        require 'sisimai/rfc5322'
-
-        Re0 = {
-          :from     => %r/InterScan MSS/,
-          :received => %r/[ ][(]InterScanMSS[)][ ]with[ ]/,
-          :subject  => [
-            'Mail could not be delivered',
-            # メッセージを配信できません。
-            '=?iso-2022-jp?B?GyRCJWElQyU7ITwlOCRyR1s/LiRHJC0kXiQ7JHMhIxsoQg==?=',
-            # メール配信に失敗しました
-            '=?iso-2022-jp?B?GyRCJWEhPCVrR1s/LiRLPDpHVCQ3JF4kNyQ/GyhCDQo=?=',
-          ],
-        }
-        Re1 = {
-          :begin  => %r|\AContent-type: text/plain|,
-          :rfc822 => %r|\AContent-type: message/rfc822|,
-          :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
-        }
-        Indicators = Sisimai::MTA.INDICATORS
-
-        def description; return 'Trend Micro InterScan Messaging Security Suite'; end
-        def smtpagent;   return Sisimai::MTA.smtpagent(self); end
-        def headerlist;  return []; end
-        def pattern;     return Re0; end
-
-        # Parse bounce messages from InterScanMSS
-        # @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
-
-          match  = 0
-          match += 1 if mhead['from'] =~ Re0[:from]
-          match += 1 if Re0[:subject].find { |a| mhead['subject'] == a }
-          return nil if match.zero?
-
-          dscontents = [Sisimai::MTA.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?
-
-              # Sent <<< RCPT TO:<kijitora@example.co.jp>
-              # Received >>> 550 5.1.1 <kijitora@example.co.jp>... user unknown
-              v = dscontents[-1]
-
-              if cv = e.match(/\A.+[<>]{3}[ \t]+.+[<]([^ ]+[@][^ ]+)[>]\z/) ||
-                      e.match(/\A.+[<>]{3}[ \t]+.+[<]([^ ]+[@][^ ]+)[>]/)
-                # Sent <<< RCPT TO:<kijitora@example.co.jp>
-                # Received >>> 550 5.1.1 <kijitora@example.co.jp>... user unknown
-                if v['recipient'] && cv[1] != v['recipient']
-                  # There are multiple recipient addresses in the message body.
-                  dscontents << Sisimai::MTA.DELIVERYSTATUS
-                  v = dscontents[-1]
-                end
-                v['recipient'] = cv[1]
-                recipients = dscontents.size
-              end
-
-              if cv = e.match(/\ASent[ ]+[<]{3}[ ]+([A-Z]{4})[ ]/)
-                # Sent <<< RCPT TO:<kijitora@example.co.jp>
-                v['command'] = cv[1]
-
-              elsif cv = e.match(/\AReceived[ ]+[>]{3}[ ]+(\d{3}[ ]+.+)\z/)
-                # Received >>> 550 5.1.1 <kijitora@example.co.jp>... user unknown
-                v['diagnosis'] = cv[1]
-
-              else
-                # Error message in non-English
-                if cv = e.match(/[ ][>]{3}[ ]([A-Z]{4})/)
-                  # >>> RCPT TO ...
-                  v['command'] = cv[1]
-
-                elsif cv = e.match(/[ ][<]{3}[ ](.+)/)
-                  # <<< 550 5.1.1 User unknown
-                  v['diagnosis'] = cv[1]
-                end
-              end
-            end
-          end
-          return nil if recipients.zero?
-          require 'sisimai/string'
-
-          dscontents.map do |e|
-            e['agent']     = Sisimai::MTA::InterScanMSS.smtpagent
-            e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-            e.each_key { |a| e[a] ||= '' }
-          end
-
-          rfc822part = Sisimai::RFC5322.weedout(rfc822list)
-          return { 'ds' => dscontents, 'rfc822' => rfc822part }
-        end
-
-      end
-    end
-  end
-end
-

data/lib/sisimai/mta/mailfoundry.rb

@@ -1,137 +0,0 @@
-module Sisimai
-  module MTA
-    # Sisimai::MTA::MailFoundry parses a bounce email which created by MailFoundry.
-    # Methods in the module are called from only Sisimai::Message.
-    module MailFoundry
-      # Imported from p5-Sisimail/lib/Sisimai/MTA/MailFoundry.pm
-      class << self
-        require 'sisimai/mta'
-        require 'sisimai/rfc5322'
-
-        Re0 = {
-          :subject  => %r/\AMessage delivery has failed\z/,
-          :received => %r/[(]MAILFOUNDRY[)] id /,
-        }
-        Re1 = {
-          :begin  => %r/\AThis is a MIME encoded message\z/,
-          :error  => %r/\ADelivery failed for the following reason:\z/,
-          :rfc822 => %r|\AContent-Type: message/rfc822\z|,
-          :endof  => %r/\A__END_OF_EMAIL_MESSAGE__\z/,
-        }
-        Indicators = Sisimai::MTA.INDICATORS
-
-        def description; return 'MailFoundry'; end
-        def smtpagent;   return Sisimai::MTA.smtpagent(self); end
-        def headerlist;  return []; end
-        def pattern;     return Re0; end
-
-        # Parse bounce messages from MailFoundry
-        # @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['received'].find { |a| a =~ Re0[:received] }
-
-          dscontents = [Sisimai::MTA.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?
-
-              # Unable to deliver message to: <kijitora@example.org>
-              # Delivery failed for the following reason:
-              # Server mx22.example.org[192.0.2.222] failed with: 550 <kijitora@example.org> No such user here
-              #
-              # This has been a permanent failure.  No further delivery attempts will be made.
-              v = dscontents[-1]
-
-              if cv = e.match(/\AUnable to deliver message to: [<]([^ ]+[@][^ ]+)[>]\z/)
-                # Unable to deliver message to: <kijitora@example.org>
-                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
-
-              else
-                # Error message
-                if e =~ Re1[:error]
-                  # Delivery failed for the following reason:
-                  v['diagnosis'] = e
-
-                else
-                  # Detect error message
-                  next if e.empty?
-                  next if v['diagnosis'].nil? || v['diagnosis'].empty?
-                  next if e =~ /\A[-]+/
-
-                  # Server mx22.example.org[192.0.2.222] failed with: 550 <kijitora@example.org> No such user here
-                  v['diagnosis'] ||= ''
-                  v['diagnosis']  += ' ' + e
-                end
-              end
-            end
-          end
-          return nil if recipients.zero?
-          require 'sisimai/string'
-
-          dscontents.map do |e|
-            e['agent']     = Sisimai::MTA::MailFoundry.smtpagent
-            e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-            e.each_key { |a| e[a] ||= '' }
-          end
-
-          rfc822part = Sisimai::RFC5322.weedout(rfc822list)
-          return { 'ds' => dscontents, 'rfc822' => rfc822part }
-        end
-
-      end
-    end
-  end
-end
-