rack-mail_exception 0.0.1

data/vendor/mail/spec/mail/fields/bcc_field_spec.rb

@@ -0,0 +1,89 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe Mail::BccField do
+  
+  #    The "Bcc:" field (where the "Bcc" means "Blind Carbon Copy") contains
+  #    addresses of recipients of the message whose addresses are not to be
+  #    revealed to other recipients of the message.  There are three ways in
+  #    which the "Bcc:" field is used.  In the first case, when a message
+  #    containing a "Bcc:" field is prepared to be sent, the "Bcc:" line is
+  #    removed even though all of the recipients (including those specified
+  #    in the "Bcc:" field) are sent a copy of the message.  In the second
+  #    case, recipients specified in the "To:" and "Cc:" lines each are sent
+  #    a copy of the message with the "Bcc:" line removed as above, but the
+  #    recipients on the "Bcc:" line get a separate copy of the message
+  #    containing a "Bcc:" line.  (When there are multiple recipient
+  #    addresses in the "Bcc:" field, some implementations actually send a
+  #    separate copy of the message to each recipient with a "Bcc:"
+  #    containing only the address of that particular recipient.) Finally,
+  #    since a "Bcc:" field may contain no addresses, a "Bcc:" field can be
+  #    sent without any addresses indicating to the recipients that blind
+  #    copies were sent to someone.  Which method to use with "Bcc:" fields
+  #    is implementation dependent, but refer to the "Security
+  #    Considerations" section of this document for a discussion of each.
+  
+  describe "initialization" do
+
+    it "should initialize" do
+      doing { Mail::BccField.new("Bcc: Mikel") }.should_not raise_error
+    end
+
+    it "should mix in the CommonAddress module" do
+      Mail::BccField.included_modules.should include(Mail::CommonAddress) 
+    end
+
+    it "should accept a string with the field name" do
+      t = Mail::BccField.new('Bcc: Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>')
+      t.name.should == 'Bcc'
+      t.value.should == 'Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>'
+    end
+
+    it "should accept a string without the field name" do
+      t = Mail::BccField.new('Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>')
+      t.name.should == 'Bcc'
+      t.value.should == 'Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>'
+    end
+
+  end
+  
+  # Actual testing of CommonAddress methods occurs in the address field spec file
+
+  describe "instance methods" do
+    it "should return an address" do
+      t = Mail::BccField.new('Mikel Lindsaar <mikel@test.lindsaar.net>')
+      t.formatted.should == ['Mikel Lindsaar <mikel@test.lindsaar.net>']
+    end
+
+    it "should return two addresses" do
+      t = Mail::BccField.new('Mikel Lindsaar <mikel@test.lindsaar.net>, Ada Lindsaar <ada@test.lindsaar.net>')
+      t.formatted.first.should == 'Mikel Lindsaar <mikel@test.lindsaar.net>'
+      t.addresses.last.should == 'ada@test.lindsaar.net'
+    end
+
+    it "should return one address and a group" do
+      t = Mail::BccField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.addresses[0].should == 'sam@me.com'
+      t.addresses[1].should == 'mikel@me.com'
+      t.addresses[2].should == 'bob@you.com'
+    end
+    
+    it "should return the formatted line on to_s" do
+      t = Mail::BccField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.value.should == 'sam@me.com, my_group: mikel@me.com, bob@you.com;'
+    end
+    
+    it "should return nothing on encoded as Bcc should not be in the mail" do
+      t = Mail::BccField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.encoded.should == ""
+    end
+    
+    it "should return the decoded line" do
+      t = Mail::BccField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.decoded.should == "sam@me.com, my_group: mikel@me.com, bob@you.com;"
+    end
+    
+  end
+  
+  
+end

data/vendor/mail/spec/mail/fields/cc_field_spec.rb

@@ -0,0 +1,79 @@
+# encoding: utf-8
+require 'spec_helper'
+
+#    The "Cc:" field (where the "Cc" means "Carbon Copy" in the sense of
+#    making a copy on a typewriter using carbon paper) contains the
+#    addresses of others who are to receive the message, though the
+#    content of the message may not be directed at them.
+
+describe Mail::CcField do
+  
+  describe "initialization" do
+
+    it "should initialize" do
+      doing { Mail::CcField.new("Cc: Mikel") }.should_not raise_error
+    end
+
+    it "should mix in the CommonAddress module" do
+      Mail::CcField.included_modules.should include(Mail::CommonAddress) 
+    end
+
+    it "should accept a string with the field name" do
+      t = Mail::CcField.new('Cc: Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>')
+      t.name.should == 'Cc'
+      t.value.should == 'Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>'
+    end
+
+    it "should accept a string without the field name" do
+      t = Mail::CcField.new('Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>')
+      t.name.should == 'Cc'
+      t.value.should == 'Mikel Lindsaar <mikel@test.lindsaar.net>, "Bob Smith" <bob@me.com>'
+    end
+
+  end
+  
+  # Actual testing of CommonAddress methods occurs in the address field spec file
+
+  describe "instance methods" do
+    it "should return an address" do
+      t = Mail::CcField.new('Mikel Lindsaar <mikel@test.lindsaar.net>')
+      t.formatted.should == ['Mikel Lindsaar <mikel@test.lindsaar.net>']
+    end
+
+    it "should return two addresses" do
+      t = Mail::CcField.new('Mikel Lindsaar <mikel@test.lindsaar.net>, Ada Lindsaar <ada@test.lindsaar.net>')
+      t.formatted.first.should == 'Mikel Lindsaar <mikel@test.lindsaar.net>'
+      t.addresses.last.should == 'ada@test.lindsaar.net'
+    end
+
+    it "should return one address and a group" do
+      t = Mail::CcField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.addresses[0].should == 'sam@me.com'
+      t.addresses[1].should == 'mikel@me.com'
+      t.addresses[2].should == 'bob@you.com'
+    end
+    
+    it "should return the formatted line on to_s" do
+      t = Mail::CcField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.value.should == 'sam@me.com, my_group: mikel@me.com, bob@you.com;'
+    end
+    
+    it "should return the encoded line for one address" do
+      t = Mail::CcField.new('sam@me.com')
+      t.encoded.should == "Cc: sam@me.com\r\n"
+    end
+    
+    it "should return the encoded line" do
+      t = Mail::CcField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.encoded.should == "Cc: sam@me.com, \r\n\tmy_group: mikel@me.com, \r\n\tbob@you.com;\r\n"
+    end
+    
+    it "should return the decoded line" do
+      t = Mail::CcField.new('sam@me.com, my_group: mikel@me.com, bob@you.com;')
+      t.decoded.should == "sam@me.com, my_group: mikel@me.com, bob@you.com;"
+    end
+    
+  end
+  
+  
+end

data/vendor/mail/spec/mail/fields/comments_field_spec.rb

@@ -0,0 +1,25 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe Mail::CommentsField do
+  # 
+  # comments        =       "Comments:" unstructured CRLF
+  
+  it "should initialize" do
+    doing { Mail::CommentsField.new("this is a comment") }.should_not raise_error
+  end
+
+  it "should accept a string with the field name" do
+    t = Mail::CommentsField.new('Comments: this is a comment')
+    t.name.should == 'Comments'
+    t.value.should == 'this is a comment'
+  end
+
+  it "should accept a string with the field name" do
+    t = Mail::CommentsField.new('this is a comment')
+    t.name.should == 'Comments'
+    t.value.should == 'this is a comment'
+  end
+  
+  
+end

data/vendor/mail/spec/mail/fields/common/address_container_spec.rb

@@ -0,0 +1,18 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe 'AddressContainer' do
+  it "should allow you to append an address to an address field result" do
+    m = Mail.new("To: mikel@test.lindsaar.net")
+    m.to.should == ['mikel@test.lindsaar.net']
+    m.to << 'bob@test.lindsaar.net'
+    m.to.should == ['mikel@test.lindsaar.net', 'bob@test.lindsaar.net']
+  end
+  
+  it "should handle complex addresses correctly" do
+    m = Mail.new("From: mikel@test.lindsaar.net")
+    m.from.should == ['mikel@test.lindsaar.net']
+    m.from << '"Ada Lindsaar" <ada@test.lindsaar.net>, bob@test.lindsaar.net'
+    m.from.should == ['mikel@test.lindsaar.net', 'ada@test.lindsaar.net', 'bob@test.lindsaar.net']
+  end
+end

data/vendor/mail/spec/mail/fields/common/common_address_spec.rb

@@ -0,0 +1,132 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe "Mail::CommonAddress" do
+  
+  describe "address handling" do
+  
+    it "should give the addresses it is going to" do
+      field = Mail::ToField.new("To: test1@lindsaar.net")
+      field.addresses.first.should == "test1@lindsaar.net"
+    end
+  
+    it "should split up the address list into individual addresses" do
+      field = Mail::ToField.new("To: test1@lindsaar.net, test2@lindsaar.net")
+      field.addresses.should == ["test1@lindsaar.net", "test2@lindsaar.net"]
+    end
+
+    it "should give the formatted addresses" do
+      field = Mail::ToField.new("To: Mikel <test1@lindsaar.net>, Bob <test2@lindsaar.net>")
+      field.formatted.should == ["Mikel <test1@lindsaar.net>", "Bob <test2@lindsaar.net>"]
+    end
+
+    it "should give the display names" do
+      field = Mail::ToField.new("To: Mikel <test1@lindsaar.net>, Bob <test2@lindsaar.net>")
+      field.display_names.should == ["Mikel", "Bob"]
+    end
+
+    it "should give the actual address objects" do
+      field = Mail::ToField.new("To: Mikel <test1@lindsaar.net>, Bob <test2@lindsaar.net>")
+      field.addrs.each do |addr|
+        addr.class.should == Mail::Address
+      end
+    end
+
+    it "should handle groups as well" do
+      field = Mail::ToField.new("To: test1@lindsaar.net, group: test2@lindsaar.net, me@lindsaar.net;")
+      field.addresses.should == ["test1@lindsaar.net", "test2@lindsaar.net", "me@lindsaar.net"]
+    end
+
+    it "should provide a list of groups" do
+      field = Mail::ToField.new("To: test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;")
+      field.group_names.should == ["My Group"]
+    end
+
+    it "should provide a list of addresses per group" do
+      field = Mail::ToField.new("To: test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;")
+      field.groups["My Group"].length.should == 2
+      field.groups["My Group"].first.to_s.should == 'test2@lindsaar.net'
+      field.groups["My Group"].last.to_s.should == 'me@lindsaar.net'
+    end
+
+    it "should provide a list of addresses that are just in the groups" do
+      field = Mail::ToField.new("To: test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;")
+      field.group_addresses.should == ['test2@lindsaar.net', 'me@lindsaar.net']
+    end
+
+    it "should handle initializing as an empty string" do
+      field = Mail::ToField.new("")
+      field.addresses.should == []
+      field.value = 'mikel@test.lindsaar.net'
+      field.addresses.should == ['mikel@test.lindsaar.net']
+    end
+
+    it "should encode to an empty string if it has no addresses or groups" do
+      field = Mail::ToField.new("")
+      field.encoded.should == ''
+      field.value = 'mikel@test.lindsaar.net'
+      field.encoded.should == "To: mikel@test.lindsaar.net\r\n"
+    end
+
+    it "should allow you to append an address" do
+      field = Mail::ToField.new("")
+      field << 'mikel@test.lindsaar.net'
+      field.addresses.should == ["mikel@test.lindsaar.net"]
+    end
+
+    it "should preserve the display name" do
+      field = Mail::ToField.new('"Mikel Lindsaar" <mikel@test.lindsaar.net>')
+      field.display_names.should == ["Mikel Lindsaar"]
+    end
+
+    it "should handle multiple addresses" do
+      field = Mail::ToField.new(['test1@lindsaar.net', 'Mikel <test2@lindsaar.net>'])
+      field.addresses.should == ['test1@lindsaar.net', 'test2@lindsaar.net']
+    end
+
+  end
+  
+  describe "encoding and decoding fields" do
+    
+    it "should allow us to encode an address field" do
+      field = Mail::ToField.new("test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;")
+      field.encoded.should == "To: test1@lindsaar.net, \r\n\tMy Group: test2@lindsaar.net, \r\n\tme@lindsaar.net;\r\n"
+    end
+    
+    it "should allow us to encode a simple address field" do
+      field = Mail::ToField.new("test1@lindsaar.net")
+      field.encoded.should == "To: test1@lindsaar.net\r\n"
+    end
+    
+    it "should allow us to encode an address field" do
+      field = Mail::CcField.new("test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;")
+      field.encoded.should == "Cc: test1@lindsaar.net, \r\n\tMy Group: test2@lindsaar.net, \r\n\tme@lindsaar.net;\r\n"
+    end
+
+    it "should allow us to decode an address field" do
+      field = Mail::ToField.new("test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;")
+      field.decoded.should == "test1@lindsaar.net, My Group: test2@lindsaar.net, me@lindsaar.net;"
+    end
+    
+    it "should allow us to decode a non ascii address field" do
+      field = Mail::ToField.new("=?UTF-8?B?44G/44GR44KL?= <raasdnil@text.lindsaar.net>")
+      field.decoded.should == '"みける" <raasdnil@text.lindsaar.net>'
+    end
+    
+    it "should allow us to decode a non ascii address field" do
+      field = Mail::ToField.new("=?UTF-8?B?44G/44GR44KL?= <raasdnil@text.lindsaar.net>, =?UTF-8?B?44G/44GR44KL?= <mikel@text.lindsaar.net>")
+      field.decoded.should == '"みける" <raasdnil@text.lindsaar.net>, "みける" <mikel@text.lindsaar.net>'
+    end
+
+  end
+  
+  it "should yield each address object in turn" do
+    field = Mail::ToField.new("test1@lindsaar.net, test2@lindsaar.net, me@lindsaar.net")
+    addresses = []
+    field.each do |address|
+      addresses << address.address
+    end
+    addresses.should == ["test1@lindsaar.net", "test2@lindsaar.net", "me@lindsaar.net"]
+  end
+
+end

data/vendor/mail/spec/mail/fields/common/common_date_spec.rb

@@ -0,0 +1,25 @@
+require 'spec_helper'
+
+describe Mail::CommonAddress do
+  
+  describe "encoding and decoding fields" do
+    
+    it "should allow us to encode an date field" do
+      field = Mail::DateField.new('12 Aug 2009 00:00:02 GMT')
+      field.encoded.should == "Date: Wed, 12 Aug 2009 00:00:02 +0000\r\n"
+    end
+    
+    it "should allow us to encode an resent date field" do
+      field = Mail::ResentDateField.new('12 Aug 2009 00:00:02 GMT')
+      field.encoded.should == "Resent-Date: Wed, 12 Aug 2009 00:00:02 +0000\r\n"
+    end
+
+    it "should allow us to decode an address field" do
+      field = Mail::DateField.new('12 Aug 2009 00:00:02 GMT')
+      field.decoded.should == "Wed, 12 Aug 2009 00:00:02 +0000"
+    end
+    
+  end
+  
+  
+end

data/vendor/mail/spec/mail/fields/common/common_field_spec.rb

@@ -0,0 +1,69 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe Mail::CommonField do
+
+  describe "multi-charset support" do
+    
+    before(:each) do
+      @original = $KCODE if RUBY_VERSION < '1.9'
+    end
+
+    after(:each) do
+      $KCODE = @original if RUBY_VERSION < '1.9'
+    end
+    
+    it "should leave ascii alone" do
+      field = Mail::SubjectField.new("This is a test")
+      field.encoded.should == "Subject: This is a test\r\n"
+      field.decoded.should == "This is a test"
+    end
+    
+    it "should encode a utf-8 string as utf-8 quoted printable" do
+      value = "かきくけこ"
+      if RUBY_VERSION < '1.9'
+        $KCODE = 'u'
+        result = "Subject: =?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n"
+      else
+        value.force_encoding('UTF-8')
+        result = "Subject: =?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n"
+      end
+      field = Mail::SubjectField.new(value)
+      field.encoded.should == result
+      field.decoded.should == value
+      field.value.should == value
+    end
+
+    it "should wrap an encoded at 60 characters" do
+      value = "かきくけこ かきくけこ かきくけこ かきくけこ かきくけこ かきくけこ かきくけこ かきくけこ かきくけこ"
+      if RUBY_VERSION < '1.9'
+        $KCODE = 'u'
+        result = "Subject: =?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n"
+      else
+        value.force_encoding('UTF-8')
+        result = "Subject: =?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n\t=?UTF-8?Q?_=E3=81=8B=E3=81=8D=E3=81=8F=E3=81=91=E3=81=93=?=\r\n"
+      end
+      field = Mail::SubjectField.new(value)
+      field.encoded.should == result
+      field.decoded.should == value
+      field.value.should == value
+    end
+  
+    it "should handle charsets in assigned addresses" do
+      value = '"かきくけこ" <mikel@test.lindsaar.net>'
+      if RUBY_VERSION < '1.9'
+        $KCODE = 'u'
+        result = "From: =?UTF-8?B?44GL44GN44GP44GR44GT?= <mikel@test.lindsaar.net>\r\n"
+      else
+        value.force_encoding('UTF-8')
+        result = "From: =?UTF-8?B?44GL44GN44GP44GR44GT?= <mikel@test.lindsaar.net>\r\n"
+      end
+      field = Mail::FromField.new(value)
+      field.encoded.should == result
+      field.decoded.should == value
+      field.value.should == "=?UTF-8?B?44GL44GN44GP44GR44GT?= <mikel@test.lindsaar.net>"
+    end
+    
+  end
+
+end

data/vendor/mail/spec/mail/fields/common/common_message_id_spec.rb

@@ -0,0 +1,30 @@
+require 'spec_helper'
+require 'mail/fields/common/common_message_id'
+
+describe Mail::CommonMessageId do
+  
+  describe "encoding and decoding fields" do
+    
+    it "should allow us to encode a message id field" do
+      field = Mail::MessageIdField.new('<ThisIsANonUniqueMessageId@me.com>')
+      field.encoded.should == "Message-ID: <ThisIsANonUniqueMessageId@me.com>\r\n"
+    end
+    
+    it "should allow us to encode a message id field" do
+      field = Mail::MessageIdField.new('<1234@test.lindsaar.net>')
+      field.encoded.should == "Message-ID: <1234@test.lindsaar.net>\r\n"
+    end
+    
+    it "should allow us to encode an in reply to field" do
+      field = Mail::InReplyToField.new('<1234@test.lindsaar.net>')
+      field.encoded.should == "In-Reply-To: <1234@test.lindsaar.net>\r\n"
+    end
+
+    it "should allow us to decode a message id field" do
+      field = Mail::MessageIdField.new('<1234@test.lindsaar.net>')
+      field.decoded.should == "<1234@test.lindsaar.net>"
+    end
+    
+  end
+  
+end