sisimai 4.25.3 → 4.25.8

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

@@ -1,193 +0,0 @@
-module Sisimai::Bite::Email
-  # Sisimai::Bite::Email::V5sendmail parses a bounce email which created by
-  # Sendmail version 5.
-  # Methods in the module are called from only Sisimai::Message.
-  module V5sendmail
-    class << self
-      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/V5sendmail.pm
-      require 'sisimai/bite/email'
-
-      Indicators = Sisimai::Bite::Email.INDICATORS
-      StartingOf = { message: ['----- Transcript of session follows -----'] };
-      MarkingsOf = {
-        # Error text regular expressions which defined in src/savemail.c
-        #   savemail.c:485| (void) fflush(stdout);
-        #   savemail.c:486| p = queuename(e->e_parent, 'x');
-        #   savemail.c:487| if ((xfile = fopen(p, "r")) == NULL)
-        #   savemail.c:488| {
-        #   savemail.c:489|   syserr("Cannot open %s", p);
-        #   savemail.c:490|   fprintf(fp, "  ----- Transcript of session is unavailable -----\n");
-        #   savemail.c:491| }
-        #   savemail.c:492| else
-        #   savemail.c:493| {
-        #   savemail.c:494|   fprintf(fp, "   ----- Transcript of session follows -----\n");
-        #   savemail.c:495|   if (e->e_xfp != NULL)
-        #   savemail.c:496|       (void) fflush(e->e_xfp);
-        #   savemail.c:497|   while (fgets(buf, sizeof buf, xfile) != NULL)
-        #   savemail.c:498|       putline(buf, fp, m);
-        #   savemail.c:499|   (void) fclose(xfile);
-        error:   %r/\A[.]+ while talking to .+[:]\z/,
-        rfc822:  %r{\A[ \t]+-----[ ](?:
-           Unsent[ ]message[ ]follows
-          |No[ ]message[ ]was[ ]collected
-          )[ ]-----
-        }x,
-      }.freeze
-
-      def description; return 'Sendmail version 5'; end
-      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
-      def headerlist;  return []; end
-
-      # Parse bounce messages from Sendmail version 5
-      # @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)
-        # :from => %r/\AMail Delivery Subsystem/,
-        return nil unless mhead['subject'] =~ /\AReturned mail: [A-Z]/
-
-        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
-        responding = []     # (Array) Responses from remote server
-        commandset = []     # (Array) SMTP command which is sent to remote server
-        anotherset = {}     # (Hash) Another error information
-        errorindex = -1     # (Integer)
-        v = nil
-
-        while e = hasdivided.shift do
-          if readcursor == 0
-            # Beginning of the bounce message or delivery status part
-            if e.include?(StartingOf[:message][0])
-              readcursor |= Indicators[:deliverystatus]
-              next
-            end
-          end
-
-          if (readcursor & Indicators[:'message-rfc822']) == 0
-            # Beginning of the original message part
-            if e =~ MarkingsOf[:rfc822]
-              readcursor |= Indicators[:'message-rfc822']
-              next
-            end
-          end
-
-          if readcursor & Indicators[:'message-rfc822'] > 0
-            # Inside of the original message part
-            if e.empty?
-              blanklines += 1
-              break if blanklines > 1
-              next
-            end
-            rfc822list << e
-          else
-            # Error message part
-            next if (readcursor & Indicators[:deliverystatus]) == 0
-            next if e.empty?
-
-            #    ----- Transcript of session follows -----
-            # While talking to smtp.example.com:
-            # >>> RCPT To:<kijitora@example.org>
-            # <<< 550 <kijitora@example.org>, User Unknown
-            # 550 <kijitora@example.org>... User unknown
-            # 421 example.org (smtp)... Deferred: Connection timed out during user open with example.org
-            v = dscontents[-1]
-
-            if cv = e.match(/\A\d{3}[ ]+[<]([^ ]+[@][^ ]+)[>][.]{3}[ ]*(.+)\z/)
-              # 550 <kijitora@example.org>... User unknown
-              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]
-
-              # Concatenate the response of the server and error message
-              v['diagnosis'] << ': ' << responding[recipients] if responding[recipients]
-              recipients += 1
-
-            elsif cv = e.match(/\A[>]{3}[ ]*([A-Z]{4})[ ]*/)
-              # >>> RCPT To:<kijitora@example.org>
-              commandset[recipients] = cv[1]
-
-            elsif cv = e.match(/\A[<]{3}[ ]+(.+)\z/)
-              # <<< Response
-              # <<< 501 <shironeko@example.co.jp>... no access from mail server [192.0.2.55] which is an open relay.
-              # <<< 550 Requested User Mailbox not found. No such user here.
-              responding[recipients] = cv[1]
-            else
-              # Detect SMTP session error or connection error
-              next if v['sessionerr']
-
-              if e =~ MarkingsOf[:error]
-                # ----- Transcript of session follows -----
-                # ... while talking to mta.example.org.:
-                v['sessionerr'] = true
-                next
-              end
-
-              if cv = e.match(/\A\d{3}[ ]+.+[.]{3}[ \t]*(.+)\z/)
-                # 421 example.org (smtp)... Deferred: Connection timed out during user open with example.org
-                anotherset['diagnosis'] = cv[1]
-              end
-            end
-          end
-        end
-        return nil if (readcursor & Indicators[:'message-rfc822']) == 0
-
-        if recipients == 0
-          # Get the recipient address from the original message
-          rfc822list.each do |e|
-            # The value of To: header in the original message
-            next unless cv = e.match(/^To: (.+)$/m)
-            dscontents[0]['recipient'] = Sisimai::Address.s3s4(cv[1])
-            recipients = 1
-            break
-          end
-        end
-        return nil unless recipients > 0
-
-        dscontents.each do |e|
-          errorindex += 1
-          e['agent']   = self.smtpagent
-          e['command'] = commandset[errorindex] || ''
-
-          e['diagnosis'] ||= if anotherset['diagnosis'].to_s.size > 0
-                               # Copy alternative error message
-                               anotherset['diagnosis']
-                             else
-                               # Set server response as a error message
-                               responding[errorindex]
-                             end
-          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-
-          unless e['recipient'] =~ /\A[^ ]+[@][^ ]+\z/
-            # @example.jp, no local part
-            if cv = e['diagnosis'].match(/[<]([^ ]+[@][^ ]+)[>]/)
-              # Get email address from the value of Diagnostic-Code header
-              e['recipient'] = cv[1]
-            end
-          end
-          e.delete('sessionerr')
-          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/verizon.rb

@@ -1,225 +0,0 @@
-module Sisimai::Bite::Email
-  # Sisimai::Bite::Email::Verizon parses a bounce email which created by
-  # Verizon Wireless.
-  # Methods in the module are called from only Sisimai::Message.
-  module Verizon
-    class << self
-      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/Verizon.pm
-      require 'sisimai/bite/email'
-      Indicators = Sisimai::Bite::Email.INDICATORS
-
-      def description; return 'Verizon Wireless: http://www.verizonwireless.com'; end
-      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
-      def headerlist;  return []; end
-
-      # Parse bounce messages from Verizon
-      # @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)
-        match = -1
-        while true
-          # Check the value of "From" header
-          # :'subject' => %r/Undeliverable Message/,
-          break unless mhead['received'].any? { |a| a.include?('.vtext.com (') }
-          match = 1 if mhead['from'] == 'post_master@vtext.com'
-          match = 0 if mhead['from'] =~ /[<]?sysadmin[@].+[.]vzwpix[.]com[>]?\z/
-          break
-        end
-        return nil if match < 0
-
-        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
-        senderaddr = ''     # (String) Sender address in the message body
-        subjecttxt = ''     # (String) Subject of the original message
-
-        markingsof = {}     # (Hash) Delimiter patterns
-        startingof = {}     # (Hash) Delimiter strings
-        messagesof = {}     # (Hash) Error message patterns
-        v = nil
-
-        if match == 1
-          # vtext.com
-          markingsof = {
-            message: %r/\AError:[ \t]/,
-            rfc822:  %r/\A__BOUNDARY_STRING_HERE__\z/,
-          }
-          messagesof = {
-            # The attempted recipient address does not exist.
-            'userunknown' => ['550 - Requested action not taken: no such user here'],
-          }
-          boundary00 = Sisimai::MIME.boundary(mhead['content-type']) || ''
-          markingsof[:rfc822] = Regexp.new('\A' << Regexp.escape('--' << boundary00 << '--') << '\z') unless boundary00.empty?
-
-          while e = hasdivided.shift do
-            if readcursor == 0
-              # Beginning of the bounce message or delivery status part
-              if e =~ markingsof[:message]
-                readcursor |= Indicators[:deliverystatus]
-                next
-              end
-            end
-
-            if (readcursor & Indicators[:'message-rfc822']) == 0
-              # Beginning of the original message part
-              if e =~ markingsof[:rfc822]
-                readcursor |= Indicators[:'message-rfc822']
-                next
-              end
-            end
-
-            if readcursor & Indicators[:'message-rfc822'] > 0
-              # Inside of the original message part
-              if e.empty?
-                blanklines += 1
-                break if blanklines > 1
-                next
-              end
-              rfc822list << e
-            else
-              # Error message part
-              next if (readcursor & Indicators[:deliverystatus]) == 0
-              next if e.empty?
-
-              # Message details:
-              #   Subject: Test message
-              #   Sent date: Wed Jun 12 02:21:53 GMT 2013
-              #   MAIL FROM: *******@hg.example.com
-              #   RCPT TO: *****@vtext.com
-              v = dscontents[-1]
-              if cv = e.match(/\A[ \t]+RCPT TO: (.*)\z/)
-                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
-                next
-
-              elsif cv = e.match(/\A[ \t]+MAIL FROM:[ \t](.+)\z/)
-                #   MAIL FROM: *******@hg.example.com
-                senderaddr = cv[1] if senderaddr.empty?
-
-              elsif cv = e.match(/\A[ \t]+Subject:[ \t](.+)\z/)
-                #   Subject:
-                subjecttxt = cv[1] if subjecttxt.empty?
-              else
-                # 550 - Requested action not taken: no such user here
-                v['diagnosis'] = e if e =~ /\A(\d{3})[ \t][-][ \t](.*)\z/
-              end
-            end
-          end
-
-        else
-          # vzwpix.com
-          startingof = { message: ['Message could not be delivered to mobile'] }
-          markingsof = { rfc822:  %r/\A__BOUNDARY_STRING_HERE__\z/ }
-          messagesof = { 'userunknown' => ['No valid recipients for this MM'] }
-          boundary00 = Sisimai::MIME.boundary(mhead['content-type'])
-          markingsof[:rfc822] = Regexp.new('\A' << Regexp.escape('--' << boundary00 << '--') << '\z') unless boundary00.empty?
-
-          while e = hasdivided.shift do
-            if readcursor == 0
-              # Beginning of the bounce message or delivery status part
-              if e.start_with?(startingof[:message][0])
-                readcursor |= Indicators[:deliverystatus]
-                next
-              end
-            end
-
-            if (readcursor & Indicators[:'message-rfc822']) == 0
-              # Beginning of the original message part
-              if e =~ markingsof[:rfc822]
-                readcursor |= Indicators[:'message-rfc822']
-                next
-              end
-            end
-
-            if readcursor & Indicators[:'message-rfc822'] > 0
-              # Inside of the original message part
-              if e.empty?
-                blanklines += 1
-                break if blanklines > 1
-                next
-              end
-              rfc822list << e
-            else
-              # Error message part
-              next if (readcursor & Indicators[:deliverystatus]) == 0
-              next if e.empty?
-
-              # Original Message:
-              # From: kijitora <kijitora@example.jp>
-              # To: 0000000000@vzwpix.com
-              # Subject: test for bounce
-              # Date:  Wed, 20 Jun 2013 10:29:52 +0000
-              v = dscontents[-1]
-              if cv = e.match(/\ATo:[ \t]+(.*)\z/)
-                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
-                next
-
-              elsif cv = e.match(/\AFrom:[ \t](.+)\z/)
-                # From: kijitora <kijitora@example.jp>
-                senderaddr = Sisimai::Address.s3s4(cv[1]) if senderaddr.empty?
-
-              elsif cv = e.match(/\ASubject:[ \t](.+)\z/)
-                #   Subject:
-                subjecttxt = cv[1] if subjecttxt.empty?
-              else
-                # Message could not be delivered to mobile.
-                # Error: No valid recipients for this MM
-                v['diagnosis'] = e if e =~ /\AError:[ \t]+(.+)\z/
-              end
-            end
-          end
-        end
-        return nil unless recipients > 0
-
-        if rfc822list.none? { |a| a.start_with?('From: ') }
-          # Set the value of "MAIL FROM:" or "From:"
-          rfc822list << ('From: ' << senderaddr)
-
-        elsif rfc822list.none? { |a| a.start_with?('Subject: ') }
-          # Set the value of "Subject:"
-          rfc822list << ('Subject: ' << subjecttxt)
-        end
-
-        dscontents.each do |e|
-          e['agent']     = self.smtpagent
-          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-
-          messagesof.each_key do |r|
-            # Verify each regular expression of session errors
-            next unless messagesof[r].any? { |a| e['diagnosis'].include?(a) }
-            e['reason'] = r
-            break
-          end
-        end
-
-        rfc822part = Sisimai::RFC5322.weedout(rfc822list)
-        return { 'ds' => dscontents, 'rfc822' => rfc822part }
-      end
-
-    end
-  end
-end
-

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

@@ -1,114 +0,0 @@
-module Sisimai::Bite::Email
-  # Sisimai::Bite::Email::X1 parses a bounce email which created by Unknown
-  # MTA #1. Methods in the module are called from only Sisimai::Message.
-  module X1
-    class << self
-      # Imported from p5-Sisimail/lib/Sisimai/Bite/Email/X1.pm
-      require 'sisimai/bite/email'
-
-      Indicators = Sisimai::Bite::Email.INDICATORS
-      MarkingsOf = {
-        message: %r/\AThe original message was received at (.+)\z/,
-        rfc822:  %r/\AReceived: from \d+[.]\d+[.]\d+[.]\d/,
-      }.freeze
-
-      def description; return 'Unknown MTA #1'; end
-      def smtpagent;   return Sisimai::Bite.smtpagent(self); end
-      def headerlist;  return []; end
-
-      # Parse bounce messages from Unknown MTA #1
-      # @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['subject'].start_with?('Returned Mail: ')
-        return nil unless mhead['from'].start_with?('"Mail Deliver System" ')
-
-        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
-        datestring = ''     # (String) Date string
-        v = nil
-
-        while e = hasdivided.shift do
-          if readcursor == 0
-            # Beginning of the bounce message or delivery status part
-            if e =~ MarkingsOf[:message]
-              readcursor |= Indicators[:deliverystatus]
-              next
-            end
-          end
-
-          if (readcursor & Indicators[:'message-rfc822']) == 0
-            # Beginning of the original message part
-            if e =~ MarkingsOf[:rfc822]
-              readcursor |= Indicators[:'message-rfc822']
-              next
-            end
-          end
-
-          if readcursor & Indicators[:'message-rfc822'] > 0
-            # Inside of the original message part
-            if e.empty?
-              blanklines += 1
-              break if blanklines > 1
-              next
-            end
-            rfc822list << e
-          else
-            # Error message part
-            next if (readcursor & Indicators[:deliverystatus]) == 0
-            next if e.empty?
-
-            # The original message was received at Thu, 29 Apr 2010 23:34:45 +0900 (JST)
-            # from shironeko@example.jp
-            #
-            # ---The following addresses had delivery errors---
-            #
-            # kijitora@example.co.jp [User unknown]
-            v = dscontents[-1]
-
-            if cv = e.match(/\A([^ ]+?[@][^ ]+?)[ ]+\[(.+)\]\z/)
-              # kijitora@example.co.jp [User unknown]
-              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 cv = e.match(MarkingsOf[:message])
-              # The original message was received at Thu, 29 Apr 2010 23:34:45 +0900 (JST)
-              datestring = cv[1]
-            end
-          end
-        end
-        return nil unless recipients > 0
-
-        dscontents.each do |e|
-          e['agent']     = self.smtpagent
-          e['diagnosis'] = Sisimai::String.sweep(e['diagnosis'])
-          e['date']      = datestring || ''
-          e.each_key { |a| e[a] ||= '' }
-        end
-
-        rfc822part = Sisimai::RFC5322.weedout(rfc822list)
-        return { 'ds' => dscontents, 'rfc822' => rfc822part }
-      end
-
-    end
-  end
-end
-