mail-portertech 2.6.2.edge

data/lib/mail/elements/address_list.rb

@@ -0,0 +1,51 @@
+# encoding: utf-8
+module Mail
+  class AddressList # :nodoc:
+
+    # Mail::AddressList is the class that parses To, From and other address fields from
+    # emails passed into Mail.
+    # 
+    # AddressList provides a way to query the groups and mailbox lists of the passed in
+    # string.
+    # 
+    # It can supply all addresses in an array, or return each address as an address object.
+    # 
+    # Mail::AddressList requires a correctly formatted group or mailbox list per RFC2822 or
+    # RFC822.  It also handles all obsolete versions in those RFCs.
+    # 
+    #  list = 'ada@test.lindsaar.net, My Group: mikel@test.lindsaar.net, Bob <bob@test.lindsaar.net>;'
+    #  a = AddressList.new(list)
+    #  a.addresses    #=> [#<Mail::Address:14943130 Address: |ada@test.lindsaar.net...
+    #  a.group_names  #=> ["My Group"]
+    def initialize(string)
+      @addresses_grouped_by_group = nil
+      @address_list = Parsers::AddressListsParser.new.parse(string)
+    end
+    
+    # Returns a list of address objects from the parsed line
+    def addresses
+      @addresses ||= @address_list.addresses.map do |address_data|
+        Mail::Address.new(address_data)
+      end
+    end
+
+    def addresses_grouped_by_group
+      return @addresses_grouped_by_group if @addresses_grouped_by_group
+
+      @addresses_grouped_by_group = {}
+
+      @address_list.addresses.each do |address_data|
+        if group = address_data.group
+          @addresses_grouped_by_group[group] ||= []
+          @addresses_grouped_by_group[group] << Mail::Address.new(address_data)
+        end
+      end
+      @addresses_grouped_by_group
+    end
+    
+    # Returns the names as an array of strings of all groups
+    def group_names # :nodoc:
+      @address_list.group_names
+    end
+  end
+end

data/lib/mail/elements/content_disposition_element.rb

@@ -0,0 +1,26 @@
+# encoding: utf-8
+module Mail
+  class ContentDispositionElement # :nodoc:
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      content_disposition = Mail::Parsers::ContentDispositionParser.new.parse(cleaned(string))
+      @disposition_type = content_disposition.disposition_type
+      @parameters = content_disposition.parameters
+    end
+    
+    def disposition_type
+      @disposition_type
+    end
+    
+    def parameters
+      @parameters
+    end
+    
+    def cleaned(string)
+      string =~ /(.+);\s*$/ ? $1 : string
+    end
+    
+  end
+end

data/lib/mail/elements/content_location_element.rb

@@ -0,0 +1,21 @@
+# encoding: utf-8
+module Mail
+  class ContentLocationElement # :nodoc:
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      content_location = Mail::Parsers::ContentLocationParser.new.parse(string)
+      @location = content_location.location
+    end
+    
+    def location
+      @location
+    end
+    
+    def to_s(*args)
+      location.to_s
+    end
+    
+  end
+end

data/lib/mail/elements/content_transfer_encoding_element.rb

@@ -0,0 +1,17 @@
+# encoding: utf-8
+module Mail
+  class ContentTransferEncodingElement
+    
+    include Mail::Utilities
+    
+    def initialize(string)
+      content_transfer_encoding = Mail::Parsers::ContentTransferEncodingParser.new.parse(string)
+      @encoding = content_transfer_encoding.encoding
+    end
+    
+    def encoding
+      @encoding
+    end
+    
+  end
+end

data/lib/mail/elements/content_type_element.rb

@@ -0,0 +1,31 @@
+# encoding: utf-8
+module Mail
+  class ContentTypeElement # :nodoc:
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      content_type = Mail::Parsers::ContentTypeParser.new.parse(cleaned(string))
+      @main_type = content_type.main_type
+      @sub_type = content_type.sub_type
+      @parameters = content_type.parameters
+    end
+    
+    def main_type
+      @main_type
+    end
+    
+    def sub_type
+      @sub_type
+    end
+    
+    def parameters
+      @parameters
+    end
+    
+    def cleaned(string)
+      string =~ /(.+);\s*$/ ? $1 : string
+    end
+    
+  end
+end

data/lib/mail/elements/date_time_element.rb

@@ -0,0 +1,22 @@
+# encoding: utf-8
+module Mail
+  class DateTimeElement # :nodoc:
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      date_time = Mail::Parsers::DateTimeParser.new.parse(string)
+      @date_string = date_time.date_string
+      @time_string = date_time.time_string
+    end
+    
+    def date_string
+      @date_string
+    end
+    
+    def time_string
+      @time_string
+    end
+    
+  end
+end

data/lib/mail/elements/envelope_from_element.rb

@@ -0,0 +1,39 @@
+# encoding: utf-8
+module Mail
+  class EnvelopeFromElement
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      @envelope_from = Mail::Parsers::EnvelopeFromParser.new.parse(string)
+      @address = @envelope_from.address
+      @date_time = ::DateTime.parse(@envelope_from.ctime_date)
+    end
+    
+    def date_time
+      @date_time
+    end
+    
+    def address
+      @address
+    end
+    
+    # RFC 4155:
+    #   a timestamp indicating the UTC date and time when the message
+    #   was originally received, conformant with the syntax of the
+    #   traditional UNIX 'ctime' output sans timezone (note that the
+    #   use of UTC precludes the need for a timezone indicator);
+    def formatted_date_time
+      if @date_time.respond_to?(:ctime)
+        @date_time.ctime
+      else
+        @date_time.strftime '%a %b %e %T %Y'
+      end
+    end
+
+    def to_s
+      "#{@address} #{formatted_date_time}"
+    end
+    
+  end
+end

data/lib/mail/elements/message_ids_element.rb

@@ -0,0 +1,24 @@
+# encoding: utf-8
+module Mail
+  class MessageIdsElement
+    
+    include Mail::Utilities
+    
+    def initialize(string)
+      @message_ids = Mail::Parsers::MessageIdsParser.new.parse(string).message_ids.map { |msg_id| clean_msg_id(msg_id) }
+    end
+    
+    def message_ids
+      @message_ids
+    end
+    
+    def message_id
+      @message_ids.first
+    end
+    
+    def clean_msg_id( val )
+      val =~ /.*<(.*)>.*/ ; $1
+    end
+
+  end
+end

data/lib/mail/elements/mime_version_element.rb

@@ -0,0 +1,22 @@
+# encoding: utf-8
+module Mail
+  class MimeVersionElement
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      mime_version = Mail::Parsers::MimeVersionParser.new.parse(string)
+      @major = mime_version.major
+      @minor = mime_version.minor
+    end
+    
+    def major
+      @major
+    end
+    
+    def minor
+      @minor
+    end
+    
+  end
+end

data/lib/mail/elements/phrase_list.rb

@@ -0,0 +1,16 @@
+# encoding: utf-8
+module Mail
+  class PhraseList
+    
+    include Mail::Utilities
+    
+    def initialize(string)
+      @phrase_lists = Mail::Parsers::PhraseListsParser.new.parse(string)
+    end
+    
+    def phrases
+      @phrase_lists.phrases.map { |p| unquote(p) }
+    end
+
+  end
+end

data/lib/mail/elements/received_element.rb

@@ -0,0 +1,26 @@
+# encoding: utf-8
+module Mail
+  class ReceivedElement
+    
+    include Mail::Utilities
+    
+    def initialize( string )
+      received = Mail::Parsers::ReceivedParser.new.parse(string)
+      @date_time = ::DateTime.parse("#{received.date} #{received.time}")
+      @info = received.info
+    end
+    
+    def date_time
+      @date_time
+    end
+    
+    def info
+      @info
+    end
+    
+    def to_s(*args)
+      "#{@info}; #{@date_time.to_s(*args)}"
+    end
+    
+  end
+end

data/lib/mail/encodings.rb

@@ -0,0 +1,304 @@
+# encoding: utf-8
+
+module Mail
+  # Raised when attempting to decode an unknown encoding type
+  class UnknownEncodingType < StandardError #:nodoc:
+  end
+
+  module Encodings
+
+    include Mail::Patterns
+    extend  Mail::Utilities
+
+    @transfer_encodings = {}
+
+    # Register transfer encoding
+    #
+    # Example
+    #
+    # Encodings.register "base64", Mail::Encodings::Base64
+    def Encodings.register(name, cls)
+        @transfer_encodings[get_name(name)] = cls
+    end
+
+    # Is the encoding we want defined?
+    #
+    # Example:
+    #
+    #  Encodings.defined?(:base64) #=> true
+    def Encodings.defined?( str )
+      @transfer_encodings.include? get_name(str)
+    end
+
+    # Gets a defined encoding type, QuotedPrintable or Base64 for now.
+    #
+    # Each encoding needs to be defined as a Mail::Encodings::ClassName for
+    # this to work, allows us to add other encodings in the future.
+    #
+    # Example:
+    #
+    #  Encodings.get_encoding(:base64) #=> Mail::Encodings::Base64
+    def Encodings.get_encoding( str )
+      @transfer_encodings[get_name(str)]
+    end
+
+    def Encodings.get_all
+      @transfer_encodings.values
+    end
+
+    def Encodings.get_name(enc)
+      enc = enc.to_s.gsub("-", "_").downcase
+    end
+
+    # Encodes a parameter value using URI Escaping, note the language field 'en' can
+    # be set using Mail::Configuration, like so:
+    #
+    #  Mail.defaults do
+    #    param_encode_language 'jp'
+    #  end
+    #
+    # The character set used for encoding will either be the value of $KCODE for
+    # Ruby < 1.9 or the encoding on the string passed in.
+    #
+    # Example:
+    #
+    #  Mail::Encodings.param_encode("This is fun") #=> "us-ascii'en'This%20is%20fun"
+    def Encodings.param_encode(str)
+      case
+      when str.ascii_only? && str =~ TOKEN_UNSAFE
+        %Q{"#{str}"}
+      when str.ascii_only?
+        str
+      else
+        RubyVer.param_encode(str)
+      end
+    end
+
+    # Decodes a parameter value using URI Escaping.
+    #
+    # Example:
+    #
+    #  Mail::Encodings.param_decode("This%20is%20fun", 'us-ascii') #=> "This is fun"
+    #
+    #  str = Mail::Encodings.param_decode("This%20is%20fun", 'iso-8559-1')
+    #  str.encoding #=> 'ISO-8859-1'      ## Only on Ruby 1.9
+    #  str #=> "This is fun"
+    def Encodings.param_decode(str, encoding)
+      RubyVer.param_decode(str, encoding)
+    end
+
+    # Decodes or encodes a string as needed for either Base64 or QP encoding types in
+    # the =?<encoding>?[QB]?<string>?=" format.
+    #
+    # The output type needs to be :decode to decode the input string or :encode to
+    # encode the input string.  The character set used for encoding will either be
+    # the value of $KCODE for Ruby < 1.9 or the encoding on the string passed in.
+    #
+    # On encoding, will only send out Base64 encoded strings.
+    def Encodings.decode_encode(str, output_type)
+      case
+      when output_type == :decode
+        Encodings.value_decode(str)
+      else
+        if str.ascii_only?
+          str
+        else
+          Encodings.b_value_encode(str, find_encoding(str))
+        end
+      end
+    end
+
+    # Decodes a given string as Base64 or Quoted Printable, depending on what
+    # type it is.
+    #
+    # String has to be of the format =?<encoding>?[QB]?<string>?=
+    def Encodings.value_decode(str)
+      # Optimization: If there's no encoded-words in the string, just return it
+      return str unless str =~ /\=\?[^?]+\?[QB]\?[^?]+?\?\=/xmi
+
+      lines = collapse_adjacent_encodings(str)
+
+      # Split on white-space boundaries with capture, so we capture the white-space as well
+      lines.map do |line|
+        line.split(/([ \t])/).map do |text|
+          if text.index('=?').nil?
+            text
+          else
+            # Search for occurences of quoted strings or plain strings
+            text.scan(/(                                 # Group around entire regex to include it in matches
+                        \=\?[^?]+\?([QB])\?[^?]+?\?\=    # Quoted String with subgroup for encoding method
+                        |                                # or
+                        .+?(?=\=\?|$)                    # Plain String
+                      )/xmi).map do |matches|
+              string, method = *matches
+              if    method == 'b' || method == 'B'
+                b_value_decode(string)
+              elsif method == 'q' || method == 'Q'
+                q_value_decode(string)
+              else
+                string
+              end
+            end
+          end
+        end
+      end.flatten.join("")
+    end
+
+    # Takes an encoded string of the format =?<encoding>?[QB]?<string>?=
+    def Encodings.unquote_and_convert_to(str, to_encoding)
+      output = value_decode( str ).to_s # output is already converted to UTF-8
+
+      if 'utf8' == to_encoding.to_s.downcase.gsub("-", "")
+        output
+      elsif to_encoding
+        begin
+          if RUBY_VERSION >= '1.9'
+            output.encode(to_encoding)
+          else
+            require 'iconv'
+            Iconv.iconv(to_encoding, 'UTF-8', output).first
+          end
+        rescue Iconv::IllegalSequence, Iconv::InvalidEncoding, Errno::EINVAL
+          # the 'from' parameter specifies a charset other than what the text
+          # actually is...not much we can do in this case but just return the
+          # unconverted text.
+          #
+          # Ditto if either parameter represents an unknown charset, like
+          # X-UNKNOWN.
+          output
+        end
+      else
+        output
+      end
+    end
+
+    def Encodings.address_encode(address, charset = 'utf-8')
+      if address.is_a?(Array)
+        # loop back through for each element
+        address.compact.map { |a| Encodings.address_encode(a, charset) }.join(", ")
+      else
+        # find any word boundary that is not ascii and encode it
+        encode_non_usascii(address, charset) if address
+      end
+    end
+
+    def Encodings.encode_non_usascii(address, charset)
+      return address if address.ascii_only? or charset.nil?
+      us_ascii = %Q{\x00-\x7f}
+      # Encode any non usascii strings embedded inside of quotes
+      address = address.gsub(/(".*?[^#{us_ascii}].*?")/) { |s| Encodings.b_value_encode(unquote(s), charset) }
+      # Then loop through all remaining items and encode as needed
+      tokens = address.split(/\s/)
+      map_with_index(tokens) do |word, i|
+        if word.ascii_only?
+          word
+        else
+          previous_non_ascii = i>0 && tokens[i-1] && !tokens[i-1].ascii_only?
+          if previous_non_ascii #why are we adding an extra space here?
+            word = " #{word}"
+          end
+          Encodings.b_value_encode(word, charset)
+        end
+      end.join(' ')
+    end
+
+    # Encode a string with Base64 Encoding and returns it ready to be inserted
+    # as a value for a field, that is, in the =?<charset>?B?<string>?= format
+    #
+    # Example:
+    #
+    #  Encodings.b_value_encode('This is あ string', 'UTF-8')
+    #  #=> "=?UTF-8?B?VGhpcyBpcyDjgYIgc3RyaW5n?="
+    def Encodings.b_value_encode(encoded_str, encoding = nil)
+      return encoded_str if encoded_str.to_s.ascii_only?
+      string, encoding = RubyVer.b_value_encode(encoded_str, encoding)
+      map_lines(string) do |str|
+        "=?#{encoding}?B?#{str.chomp}?="
+      end.join(" ")
+    end
+
+    # Encode a string with Quoted-Printable Encoding and returns it ready to be inserted
+    # as a value for a field, that is, in the =?<charset>?Q?<string>?= format
+    #
+    # Example:
+    #
+    #  Encodings.q_value_encode('This is あ string', 'UTF-8')
+    #  #=> "=?UTF-8?Q?This_is_=E3=81=82_string?="
+    def Encodings.q_value_encode(encoded_str, encoding = nil)
+      return encoded_str if encoded_str.to_s.ascii_only?
+      string, encoding = RubyVer.q_value_encode(encoded_str, encoding)
+      string.gsub!("=\r\n", '') # We already have limited the string to the length we want
+      map_lines(string) do |str|
+        "=?#{encoding}?Q?#{str.chomp.gsub(/ /, '_')}?="
+      end.join(" ")
+    end
+
+    private
+
+    # Decodes a Base64 string from the "=?UTF-8?B?VGhpcyBpcyDjgYIgc3RyaW5n?=" format
+    #
+    # Example:
+    #
+    #  Encodings.b_value_decode("=?UTF-8?B?VGhpcyBpcyDjgYIgc3RyaW5n?=")
+    #  #=> 'This is あ string'
+    def Encodings.b_value_decode(str)
+      RubyVer.b_value_decode(str)
+    end
+
+    # Decodes a Quoted-Printable string from the "=?UTF-8?Q?This_is_=E3=81=82_string?=" format
+    #
+    # Example:
+    #
+    #  Encodings.q_value_decode("=?UTF-8?Q?This_is_=E3=81=82_string?=")
+    #  #=> 'This is あ string'
+    def Encodings.q_value_decode(str)
+      RubyVer.q_value_decode(str)
+    end
+
+    def Encodings.split_encoding_from_string( str )
+      match = str.match(/\=\?([^?]+)?\?[QB]\?(.+)?\?\=/mi)
+      if match
+        match[1]
+      else
+        nil
+      end
+    end
+
+    def Encodings.find_encoding(str)
+      RUBY_VERSION >= '1.9' ? str.encoding : $KCODE
+    end
+
+    # Gets the encoding type (Q or B) from the string.
+    def Encodings.split_value_encoding_from_string(str)
+      match = str.match(/\=\?[^?]+?\?([QB])\?(.+)?\?\=/mi)
+      if match
+        match[1]
+      else
+        nil
+      end
+    end
+
+    # When the encoded string consists of multiple lines, lines with the same
+    # encoding (Q or B) can be joined together.
+    #
+    # String has to be of the format =?<encoding>?[QB]?<string>?=
+    def Encodings.collapse_adjacent_encodings(str)
+      lines = str.split(/(\?=)\s*(=\?)/).each_slice(2).map(&:join)
+      results = []
+      previous_encoding = nil
+
+      lines.each do |line|
+        encoding = split_value_encoding_from_string(line)
+
+        if encoding == previous_encoding
+          line = results.pop + line
+        end
+
+        previous_encoding = encoding
+        results << line
+      end
+
+      results
+    end
+  end
+end