$:.unshift File.dirname(__FILE__) require 'tmail' require 'kcode' require 'extctrl' require 'test/unit' class MailTester < Test::Unit::TestCase include TMail::TextUtils def setup @mail = TMail::Mail.new end def lf( str ) str.gsub(/\n|\r\n|\r/) { "\n" } end def crlf( str ) str.gsub(/\n|\r\n|\r/) { "\r\n" } end def test_MIME # FIXME: test more. kcode('EUC') { mail = TMail::Mail.parse('From: hoge@example.jp (=?iso-2022-jp?B?GyRCJUYlOSVIGyhC?=)') assert_not_nil mail['From'] assert_equal ["\245\306\245\271\245\310"], mail['From'].comments assert_equal "From: hoge@example.jp (\245\306\245\271\245\310)\n\n", mail.to_s assert_equal "From: hoge@example.jp (\245\306\245\271\245\310)\n\n", mail.decoded assert_equal "From: hoge@example.jp (=?iso-2022-jp?B?GyRCJUYlOSVIGyhC?=)\r\n\r\n", mail.encoded } end def test_to_s str = crlf(< Subject: This is test message. This is body. EOS m = TMail::Mail.parse(str) # strip to avoid error by body's line terminator. assert_equal lf(str).strip, m.decoded.strip assert_equal crlf(str).strip, m.encoded.strip end def test__empty_return_path str = "Return-Path: <>\r\n\r\n" assert_equal str, TMail::Mail.parse(str).encoded end def test_date t = Time.now @mail.date = t assert_equal t.to_i, @mail.date.to_i # avoid usec comparison assert_equal time2str(t), @mail['date'].to_s str = "Date: #{time2str(t)}\n\n" assert_equal str, TMail::Mail.parse(str).to_s end def test_strftime t = Time.now fmt = '%A%a%B%b%c%d%H%I%j%M%m%p%S%U%W%w%X%x%Y%y%Z%%' @mail.date = t assert_equal t.strftime(fmt), @mail.strftime(fmt) end def test_to addr = 'Minero Aoki ' @mail.to = addr assert_equal 1, @mail['to'].addrs.size assert_equal 'aamine@loveruby.net', @mail['to'].addrs[0].spec assert_equal 'Minero Aoki', @mail['to'].addrs[0].phrase a = @mail.to_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.to assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] addr = TMail::Address.parse('Minero Aoki ') @mail.to_addrs = addr assert_equal 1, @mail['to'].addrs.size assert_equal 'aamine@loveruby.net', @mail['to'].addrs[0].spec assert_equal 'Minero Aoki', @mail['to'].addrs[0].phrase a = @mail.to_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.to assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] @mail.to = '' assert_equal nil, @mail.to assert_equal 'DEFAULT VALUE', @mail.to('DEFAULT VALUE') @mail.to = 'undisclosed-recipients: ;' a = @mail.to assert_equal nil, @mail.to assert_equal 'DEFAULT VALUE', @mail.to('DEFAULT VALUE') str = "\"Aoki, Minero\" \n\n" @mail.to_addrs = a = TMail::Address.parse(str) assert_equal ['aamine@loveruby.net'], @mail.to assert_equal [a], @mail.to_addrs assert_equal '"Aoki, Minero" ', @mail.to_addrs[0].to_s assert_equal '"Aoki, Minero" ', @mail['to'].to_s end def test_cc addr = 'Minero Aoki ' @mail.cc = addr assert_equal 1, @mail['cc'].addrs.size assert_equal 'aamine@loveruby.net', @mail['cc'].addrs[0].spec assert_equal 'Minero Aoki', @mail['cc'].addrs[0].phrase a = @mail.cc_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.cc assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] addr = TMail::Address.parse('Minero Aoki ') @mail.cc_addrs = addr assert_equal 1, @mail['cc'].addrs.size assert_equal 'aamine@loveruby.net', @mail['cc'].addrs[0].spec assert_equal 'Minero Aoki', @mail['cc'].addrs[0].phrase a = @mail.cc_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.cc assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] @mail.cc = '' assert_equal nil, @mail.cc assert_equal 'DEFAULT VALUE', @mail.cc('DEFAULT VALUE') @mail.cc = 'undisclosed-recipients: ;' a = @mail.cc assert_equal nil, @mail.cc assert_equal 'DEFAULT VALUE', @mail.cc('DEFAULT VALUE') end def test_bcc addr = 'Minero Aoki ' @mail.bcc = addr assert_equal 1, @mail['bcc'].addrs.size assert_equal 'aamine@loveruby.net', @mail['bcc'].addrs[0].spec assert_equal 'Minero Aoki', @mail['bcc'].addrs[0].phrase a = @mail.bcc_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.bcc assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] addr = TMail::Address.parse('Minero Aoki ') @mail.bcc_addrs = addr assert_equal 1, @mail['bcc'].addrs.size assert_equal 'aamine@loveruby.net', @mail['bcc'].addrs[0].spec assert_equal 'Minero Aoki', @mail['bcc'].addrs[0].phrase a = @mail.bcc_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.bcc assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] @mail.bcc = '' assert_equal nil, @mail.bcc assert_equal 'DEFAULT VALUE', @mail.bcc('DEFAULT VALUE') @mail.bcc = 'undisclosed-recipients: ;' a = @mail.bcc assert_equal nil, @mail.bcc assert_equal 'DEFAULT VALUE', @mail.bcc('DEFAULT VALUE') end def test_from addr = 'Minero Aoki ' @mail.from = addr assert_equal 1, @mail['from'].addrs.size assert_equal 'aamine@loveruby.net', @mail['from'].addrs[0].spec assert_equal 'Minero Aoki', @mail['from'].addrs[0].phrase a = @mail.from_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.from assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] addr = TMail::Address.parse('Minero Aoki ') @mail.from_addrs = addr assert_equal 1, @mail['from'].addrs.size assert_equal 'aamine@loveruby.net', @mail['from'].addrs[0].spec assert_equal 'Minero Aoki', @mail['from'].addrs[0].phrase a = @mail.from_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.from assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] @mail.from = '' assert_equal nil, @mail.from assert_equal 'DEFAULT VALUE', @mail.from('DEFAULT VALUE') @mail.from = 'undisclosed-recipients: ;' a = @mail.from assert_equal nil, @mail.from assert_equal 'DEFAULT VALUE', @mail.from('DEFAULT VALUE') end def test_reply_to addr = 'Minero Aoki ' @mail.reply_to = addr assert_equal 1, @mail['reply-to'].addrs.size assert_equal 'aamine@loveruby.net', @mail['reply-to'].addrs[0].spec assert_equal 'Minero Aoki', @mail['reply-to'].addrs[0].phrase a = @mail.reply_to_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.reply_to assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] addr = TMail::Address.parse('Minero Aoki ') @mail.reply_to_addrs = addr assert_equal 1, @mail['reply-to'].addrs.size assert_equal 'aamine@loveruby.net', @mail['reply-to'].addrs[0].spec assert_equal 'Minero Aoki', @mail['reply-to'].addrs[0].phrase a = @mail.reply_to_addrs assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.reply_to assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] @mail.reply_to = '' assert_equal nil, @mail.reply_to assert_equal 'DEFAULT VALUE', @mail.reply_to('DEFAULT VALUE') @mail.reply_to = 'undisclosed-recipients: ;' a = @mail.reply_to assert_equal nil, @mail.reply_to assert_equal 'DEFAULT VALUE', @mail.reply_to('DEFAULT VALUE') end def do_test_address_attr( name ) addr = 'Minero Aoki ' @mail.__send__( name + '=', addr ) a = @mail.__send__( name + '_addrs' ) assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0].spec assert_equal 'Minero Aoki', a[0].phrase a = @mail.__send__( name ) assert_equal 1, a.size assert_equal 'aamine@loveruby.net', a[0] end def test_subject s = 'This is test subject!' @mail.subject = s assert_equal s, @mail.subject assert_equal s, @mail['subject'].to_s end def test_message_id assert_nil @mail.message_id assert_equal 1, @mail.message_id(1) m = '' @mail.message_id = m assert_equal m, @mail.message_id end def test_in_reply_to i = '' @mail.in_reply_to = i a = @mail.in_reply_to assert_equal a.size, 1 assert_equal i, a[0] @mail.in_reply_to = [i] a = @mail.in_reply_to assert_equal a.size, 1 assert_equal i, a[0] end def test_references i = '' @mail.references = i a = @mail.references assert_equal a.size, 1 assert_equal i, a[0] @mail.references = [i] a = @mail.references assert_equal a.size, 1 assert_equal i, a[0] end def test_mime_version assert_nil @mail.mime_version assert_equal 1, @mail.mime_version(1) %w( 1.0 999.999 ).each do |v| @mail.mime_version = v assert_equal v, @mail.mime_version end end def test_content_type [ 'text/plain', 'application/binary', 'multipart/mixed' ].each do |t| @mail.content_type = t assert_equal t, @mail.content_type assert_equal t.split('/',2)[0], @mail.main_type assert_equal t.split('/',2)[1], @mail.sub_type end @mail.content_type = 'text/plain; charset=iso-2022-jp' @mail.content_type = 'application/postscript' assert_raises(ArgumentError) { @mail.content_type = 'text' } end def test_charset c = 'iso-2022-jp' @mail.charset = c assert_equal c, @mail.charset assert_equal 'text', @mail.main_type assert_equal 'plain', @mail.sub_type @mail.content_type = 'application/binary' @mail.charset = c assert_equal c, @mail.charset end def test_transfer_encoding @mail.transfer_encoding = 'base64' assert_equal 'base64', @mail.transfer_encoding @mail.transfer_encoding = 'BASE64' assert_equal 'base64', @mail.transfer_encoding @mail.content_transfer_encoding = '7bit' assert_equal '7bit', @mail.content_transfer_encoding @mail.encoding = 'binary' assert_equal 'binary', @mail.encoding end def test_disposition @mail['content-disposition'] = 'attachment; filename="test.rb"' assert_equal 'attachment', @mail.disposition assert_equal 'attachment', @mail.content_disposition assert_equal 'test.rb', @mail.disposition_param('filename') @mail.disposition = 'none' assert_equal 'none', @mail.disposition assert_nil @mail.disposition_param('filename') assert_equal 1, @mail.disposition_param('filename', 1) src = '=?iso-2022-jp?B?GyRCRnxLXDhsGyhCLnR4dA==?=' @mail['content-disposition'] = %Q(attachment; filename="#{src}") ok = NKF.nkf('-m -e', src) kcode('EUC') { assert_equal ok, @mail.disposition_param('filename') } end def test_set_disposition @mail.set_disposition 'attachment', 'filename'=>'sample.rb' assert_equal 'attachment', @mail.disposition assert_equal 'sample.rb', @mail.disposition_param('filename') end def test_body m = TMail::Mail.parse("To: aamine@loveruby.net\n\ntest body") assert_equal 'test body', m.body m = TMail::Mail.parse('') assert_equal '', m.body m = TMail::Mail.new assert_equal '', m.body # [ruby-list:38050] m = TMail::Mail.new m.set_content_type 'multipart', 'mixed' assert_equal '', m.body end end