tmail_es 1.2.7.2

data/test/test_attachments.rb

@@ -0,0 +1,133 @@
+# -*- encoding: utf-8 -*-
+#
+require 'test_helper'
+require 'tmail'
+
+class TestAttachments < Test::Unit::TestCase
+
+  def test_attachment
+    mail = TMail::Mail.new
+    mail.mime_version = "1.0"
+    mail.set_content_type 'multipart', 'mixed', {'boundary' => 'Apple-Mail-13-196941151'}
+    mail.body =<<HERE
+--Apple-Mail-13-196941151
+Content-Transfer-Encoding: quoted-printable
+Content-Type: text/plain;
+	charset=ISO-8859-1;
+	delsp=yes;
+	format=flowed
+
+This is the first part.
+
+--Apple-Mail-13-196941151
+Content-Type: text/x-ruby-script; name="hello.rb"
+Content-Transfer-Encoding: 7bit
+Content-Disposition: attachment;
+	filename="api.rb"
+
+puts "Hello, world!"
+gets
+
+--Apple-Mail-13-196941151--
+HERE
+    assert_equal(true, mail.multipart?)
+    assert_equal(1, mail.attachments.length)
+  end
+  
+  def test_recursive_multipart_processing
+    fixture = File.read(File.dirname(__FILE__) + "/fixtures/raw_email7")
+    mail = TMail::Mail.parse(fixture)
+    assert_equal "This is the first part.\n\nAttachment: test.rb\nAttachment: test.pdf\n\n\nAttachment: smime.p7s\n", mail.body
+  end
+
+  def test_decode_encoded_attachment_filename
+    fixture = File.read(File.dirname(__FILE__) + "/fixtures/raw_email8")
+    mail = TMail::Mail.parse(fixture)
+    attachment = mail.attachments.last
+    expected = "01 Quien Te Dij\212at. Pitbull.mp3"
+    expected.force_encoding(Encoding::ASCII_8BIT) if expected.respond_to?(:force_encoding)
+    assert_equal expected, attachment.original_filename
+  end
+
+  def test_attachment_with_quoted_filename
+    fixture = File.read(File.dirname(__FILE__) + "/fixtures/raw_email_with_quoted_attachment_filename")
+    mail = TMail::Mail.parse(fixture)
+    attachment = mail.attachments.last
+    str = "Eelanalüüsi päring.jpg"
+    assert_equal str, attachment.original_filename
+  end
+
+  def test_assigning_attachment_crashing_due_to_missing_boundary
+    mail = TMail::Mail.new  
+    mail.mime_version = '1.0'
+    mail.set_content_type("multipart", "mixed")
+    
+    mailpart=TMail::Mail.new
+    mailpart.set_content_type("application", "octet-stream")
+    mailpart['Content-Disposition'] = "attachment; filename=mailbox.zip"
+
+    assert_nothing_raised { mail.parts.push(mailpart) }
+  end
+  
+  def test_only_has_attachment
+    fixture = File.read(File.dirname(__FILE__) + "/fixtures/raw_email_only_attachment")
+    mail = TMail::Mail.parse(fixture)
+    assert_equal(1, mail.attachments.length)
+  end
+
+  def test_content_nil_returned_if_name_of_attachment_type_unquoted
+    fixture = File.read(File.dirname(__FILE__) + "/fixtures/unquoted_filename_in_attachment")
+    mail = TMail::Mail.parse(fixture)
+    assert_equal("image/png", mail.attachments.first.content_type)
+  end
+
+  def test_unquoted_apple_mail_content_type
+    fixture = File.read(File.dirname(__FILE__) + "/fixtures/apple_unquoted_content_type")
+    mail = TMail::Mail.parse(fixture)
+    assert_equal("application/pdf", mail.attachments.first.content_type)
+  end
+  
+  # TMail::Mail.has_attachments? & TMail::Mail.attachments
+  # http://rubyforge.org/tracker/index.php?func=detail&aid=23099&group_id=4512&atid=17370
+  def test_the_only_part_is_a_word_document
+    mail = load_fixture('the_only_part_is_a_word_document.txt')
+
+    assert_equal('application/msword', mail.content_type)
+    assert !mail.multipart?, 'The mail should not be multipart'
+    assert mail.attachment?(mail), 'The mail should be considered has an attachment'
+
+    # The original method TMail::Mail.has_attachments? returns false
+    assert mail.has_attachments?, 'PATCH: TMail should consider that this email has an attachment'
+
+    # The original method TMail::Mail.attachments returns nil
+    assert_not_nil mail.attachments, 'PATCH: TMail should return the attachment'
+    assert_equal 1, mail.attachments.size, 'PATCH: TMail should detect one attachment'
+    assert_instance_of TMail::Attachment, mail.attachments.first, 'The first attachment found should be an instance of TMail::Attachment'
+  end
+
+  # new method TMail::Mail.inline_attachment?
+  def test_inline_attachment_should_detect_inline_attachments
+    mail = load_fixture('inline_attachment.txt')
+
+    assert !mail.inline_attachment?(mail.parts[0]), 'The first part is an empty text'
+    assert mail.inline_attachment?(mail.parts[1]), 'The second part is an inline attachment'
+
+    mail = load_fixture('the_only_part_is_a_word_document.txt')
+    assert !mail.inline_attachment?(mail), 'The first and only part is an normal attachment'
+  end
+
+  # new method TMail::Mail.text_content_type?
+  def test_text_content_type?
+    mail = load_fixture('inline_attachment.txt')
+
+    assert mail.parts[0].text_content_type?, 'The first part of inline_attachment.txt is a text'
+    assert !mail.parts[1].text_content_type?, 'The second part of inline_attachment.txt is not a text'
+  end
+
+protected
+
+  def load_fixture(name)
+    TMail::Mail.load(File.join('test', 'fixtures', name))
+  end
+
+end

data/test/test_base64.rb

@@ -0,0 +1,64 @@
+require 'test_helper'
+require 'tmail/base64'
+require 'test/unit'
+
+class TestTMailBase64 < Test::Unit::TestCase
+  def try(orig)
+    ok = [orig].pack('m').delete("\r\n")
+    result = TMail::Base64.encode(orig)
+    assert_equal ok, result, "str=#{orig.inspect}"
+    assert_equal orig, TMail::Base64.decode(result), "str=#{orig.inspect}"
+  end
+
+  def test_normal
+    try ''
+    try 'a'
+    try 'ab'
+    try 'abc'
+    try 'abcd'
+    try 'abcde'
+    try 'abcdef'
+    try 'abcdefg'
+    try 'abcdefgh'
+    try 'abcdefghi'
+    try 'abcdefghij'
+    try 'abcdefghijk'
+    try 'abcdefghijkl'
+    try 'abcdefghijklm'
+    try 'abcdefghijklmn'
+    try 'abcdefghijklmno'
+    try 'abcdefghijklmnop'
+    try 'abcdefghijklmnopq'
+    try 'abcdefghijklmnopqr'
+    try 'abcdefghijklmnopqrs'
+    try 'abcdefghijklmnopqrst'
+    try 'abcdefghijklmnopqrstu'
+    try 'abcdefghijklmnopqrstuv'
+    try 'abcdefghijklmnopqrstuvw'
+    try 'abcdefghijklmnopqrstuvwx'
+    try 'abcdefghijklmnopqrstuvwxy'
+    try 'abcdefghijklmnopqrstuvwxyz'
+  end
+
+  def test_dangerous_chars
+    ["\0", "\001", "\002", "\003", "\0xfd", "\0xfe", "\0xff"].each do |ch|
+      1.upto(96) do |len|
+        try ch * len
+      end
+    end
+  end
+
+  def test_random
+    16.times do
+      try make_random_string(96)
+    end
+  end
+
+  def make_random_string(len)
+    buf = ''
+    len.times do
+      buf << rand(255)
+    end
+    buf
+  end
+end

data/test/test_encode.rb

@@ -0,0 +1,139 @@
+# encoding: utf-8 
+require 'test_helper'
+require 'tmail/port'
+require 'tmail/encode'
+require 'nkf'
+require 'test/unit'
+
+class TestEncode < Test::Unit::TestCase
+
+  SRCS = [
+"a cde あいうえおあいうえおあいうえおあいうえおあいうえお", #1
+"a cde あいうえおあいうえおあいうえおあいうえおあいうえ", #2
+"a cde あいうえおあいうえおあいうえおあいうえおあいう", #3
+"a cde あいうえおあいうえおあいうえおあいうえおあい", #4
+"a cde あいうえおあいうえおあいうえおあいうえおあ", #5
+"a cde あいうえおあいうえおあいうえおあいうえお", #6 #
+"a cde あいうえおあいうえおあいうえおあいうえ", #7
+"a cde あいうえおあいうえおあいうえおあいう", #8
+"a cde あいうえおあいうえおあいうえおあい", #9
+"a cde あいうえおあいうえおあいうえおあ", #10
+"a cde あいうえおあいうえおあいうえお", #11
+"a cde あいうえおあいうえおあいうえ", #12
+"a cde あいうえおあいうえおあいう", #13
+"a cde あいうえおあいうえおあい", #14
+"a cde あいうえおあいうえおあ", #15
+"a cde あいうえおあいうえお", #16
+"a cde あいうえおあいうえ", #17
+"a cde あいうえおあいう", #18
+"a cde あいうえおあい", #19
+"a cde あいうえおあ", #20
+"a cde あいうえお", #21
+"a cde あいうえ", #22
+"a cde あいう", #23
+"a cde あい", #24
+"a cde あ", #25
+"aあa aあa aあa aあa aあa aあa" #26
+  ]
+
+  OK = [
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoJCokIiQkJCYkKCQqGyhC?=", #1
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoJCokIiQkJCYkKBsoQg==?=", #2
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoJCokIiQkJCYbKEI=?=", #3
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoJCokIiQkGyhC?=", #4
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoJCokIhsoQg==?=", #5
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoJCobKEI=?=", #6
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJiQoGyhC?=", #7
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQkJhsoQg==?=", #8
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=\n\t=?iso-2022-jp?B?GyRCJCQbKEI=?=", #9
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqJCIbKEI=?=", #10
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKCQqGyhC?=", #11
+ "a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYkKBsoQg==?=", #12
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkJCYbKEI=?=', #13
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIiQkGyhC?=', #14
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCokIhsoQg==?=', #15
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoJCobKEI=?=', #16
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJiQoGyhC?=', #17
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQkJhsoQg==?=', #18
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiJCQbKEI=?=', #19
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKiQiGyhC?=', #20
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgkKhsoQg==?=', #21
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmJCgbKEI=?=', #22
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJCQmGyhC?=', #23
+ 'a cde =?iso-2022-jp?B?GyRCJCIkJBsoQg==?=', #24
+ 'a cde =?iso-2022-jp?B?GyRCJCIbKEI=?=', #25
+ "=?iso-2022-jp?B?YRskQiQiGyhCYSBhGyRCJCIbKEJhIGEbJEIkIhsoQmEgYRskQiQiGyhCYSBh?=\r\n\t=?iso-2022-jp?B?GyRCJCIbKEJhIGEbJEIkIhsoQmE=?=" #26
+  ]
+
+  unless RUBY_VERSION.match(/1.9/)
+  def test_s_encode
+    SRCS.each_index do |i|
+      assert_equal crlf(OK[i]), 
+                   TMail::Encoder.encode(NKF.nkf('-j', SRCS[i]))
+    end
+  end
+  end
+
+  def crlf( str )
+    str.gsub(/\n|\r\n|\r/) { "\r\n" }
+  end
+  
+  def test_wrapping_an_email_with_whitespace_at_position_zero
+    # This email is a spam mail designed to break mailers...  evil.
+    mail = TMail::Mail.load("#{File.dirname(__FILE__)}/fixtures/raw_attack_email_with_zero_length_whitespace")
+    assert_nothing_raised(Exception) { mail.encoded }
+  end
+
+  # =?utf-8?Q? Nicolas=20Fouch=E9?= is not UTF-8, it's ISO-8859-1 !
+  def test_marked_as_utf_8_but_it_is_iso_8859_1
+    mail = load_fixture('marked_as_utf_8_but_it_is_iso_8859_1.txt')
+    
+    name = mail.to_addrs.first.name
+    assert_equal ' Nicolas Fouché', TMail::Unquoter.unquote_and_convert_to(name, 'utf-8')
+
+    # Without the patch, TMail raises:
+    #  Iconv::InvalidCharacter: "\351"
+    #  method iconv in quoting.rb at line 99
+    #  method convert_to in quoting.rb at line 99
+    #  method unquote_quoted_printable_and_convert_to in quoting.rb at line 88
+    #  method unquote_and_convert_to in quoting.rb at line 72
+    #  method gsub in quoting.rb at line 63
+    #  method unquote_and_convert_to in quoting.rb at line 63
+  end
+  
+  # =?iso-8859-1?b?77y5772B772O772Q772J772O772HIA==?= =?iso-8859-1?b?77y377yh77yu77yn?= is not ISO-8859-1, it's UTF-8 !
+  def test_marked_as_iso_8859_1_but_it_is_utf_8
+    mail = load_fixture('marked_as_iso_8859_1_but_it_is_utf_8.txt')
+    
+    name = mail.to_addrs.first.name
+    assert_equal 'Ｙａｎｐｉｎｇ ＷＡＮＧ', TMail::Unquoter.unquote_and_convert_to(name, 'utf-8')
+    # Even GMail could not detect this one :)
+    
+    # Without the patch, TMail returns: "Ｙａｎｐｉｎｇ  ＷＡＮＧ"
+  end
+  
+  # Be sure not to copy/paste the content of the fixture to another file, it could be automatically converted to utf-8
+  def test_iso_8859_1_email_without_encoding_and_message_id
+    mail = load_fixture('iso_8859_1_email_without_encoding_and_message_id.txt')
+    
+    text = TMail::Unquoter.unquote_and_convert_to(mail.body, 'utf-8')
+
+    assert(text.include?('é'), 'Text content should include the "é" character')
+    
+    # I'm not very proud of this one, chardet detects iso-8859-2, so I have to force the encoding to iso-8859-1.
+    assert(!text.include?('ŕ'), 'Text content should not iso-8859-2, "ŕ" should be "à"')
+    
+    # Without the patch, TMail::Unquoter.unquote_and_convert_to returns:
+    #  Il semblerait que vous n'ayez pas consult� votre messagerie depuis plus
+    #  d'un an. Aussi, celle-ci a �t� temporairement desactiv�e.
+    #  Aucune demande n'est necessaire pour r�activer votre messagerie : la simple
+    #  consultation de ce message indique que la boite est � nouveau utilisable.
+  end
+
+  protected
+
+  def load_fixture(name)
+    TMail::Mail.load(File.join('test', 'fixtures', name))
+  end
+
+end