pickle-has_many_support 0.3.1

data/spec/pickle/email/parser_spec.rb

@@ -0,0 +1,51 @@
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+require 'pickle/email/parser'
+
+describe Pickle::Email::Parser do
+  include Pickle::Parser::Matchers
+  include Pickle::Email::Parser
+  
+  describe "#match_email" do
+    it "should match 'the email'" do
+      'the email'.should match(/^#{match_email}$/)
+    end
+    
+    it "should match 'the first email'" do
+      'the first email'.should match(/^#{match_email}$/)
+    end
+    
+    it "should match 'the last email'" do
+      'the last email'.should match(/^#{match_email}$/)
+    end
+    
+    it "should match 'the 3rd email'" do
+      'the 3rd email'.should match(/^#{match_email}$/)
+    end
+    
+    it "should match 'an email'" do
+      'an email'.should match(/^#{match_email}$/)
+    end
+  end
+  
+  it "#capture_email should just capture match_email" do
+    capture_email.should == "(#{match_email})"
+  end
+  
+  describe "#capture_index_in_email" do
+    it "should extract the '2nd' from 'the 2nd email'" do
+      match = 'the 2nd email'.match(/^#{capture_index_in_email}$/)
+      match[1].should == '2nd'
+    end
+    
+    it "should extract nil from 'the email'" do
+      match = 'the email'.match(/^#{capture_index_in_email}$/)
+      match[1].should == nil
+    end
+    
+    it "should extract the 'last' from 'the last email'" do
+      match = 'the last email'.match(/^#{capture_index_in_email}$/)
+      match[1].should == 'last'
+    end
+  end
+end

data/spec/pickle/email_spec.rb

@@ -0,0 +1,160 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+require 'pickle/email'
+require 'pickle/email/parser'
+require 'action_mailer'
+
+describe Pickle::Email do
+  include Pickle::Session
+  include Pickle::Email
+  include Pickle::Email::Parser
+
+  before do
+    @email1 = mock("Email 1")
+    @email2 = mock("Email 2")
+    ActionMailer::Base.stub!(:deliveries).and_return([@email1, @email2])
+    if defined?(ActiveRecord::Base)
+      ActiveRecord::Base::PickleAdapter.stub!(:model_classes).and_return([])
+    end
+  end
+
+  describe "#emails" do
+    it "should return ordered deliveries" do
+      emails.should == [@email1, @email2]
+    end
+
+    describe "(after)" do
+      before do
+        emails
+      end
+
+      it "#email('the email') should return the last delivery" do
+        email('the email').should == @email2
+      end
+
+      it "#email('the 1st email') should return the first delivery" do
+        email('the 1st email').should == @email1
+      end
+
+      it "#email('the first email') should return the first delivery" do
+        email('the first email').should == @email1
+      end
+
+      it "#email('the 2nd email') should return the second delivery" do
+        email('the 2nd email').should == @email2
+      end
+
+      it "#email('the last email') should return the second delivery" do
+        email('the last email').should == @email2
+      end
+
+      it "#email2('the 3rd email') should be nil" do
+        email('the 3rd email').should == nil
+      end
+    end
+
+    describe "when email1 is to fred & joe, and email2 is to joe" do
+      before do
+        @email1.stub!(:to).and_return(['fred@gmail.com', 'joe@gmail.com'])
+        @email2.stub!(:to).and_return('joe@gmail.com')
+      end
+
+      it "#emails('to: \"fred@gmail.com\"') should just return email1" do
+        emails('to: "fred@gmail.com"').should == [@email1]
+      end
+
+      describe "after #emails('to: \"fred@gmail.com\"')" do
+        before do
+          emails('to: "fred@gmail.com"')
+        end
+
+        it "#email('first') should be #email('last')" do
+          email('first email').should == email('last email')
+          email('first email').should == @email1
+        end
+
+        it "#email('the email', 'to: \"blah\") should be nil" do
+          email('the email', 'to: "blah"').should == nil
+        end
+
+        it "#email('the email', 'to: \"fred@gmail.com\") should be email1" do
+          email('the email', 'to: "fred@gmail.com"').should == @email1
+        end
+      end
+
+      it "#emails('to: \"joe@gmail.com\"') should return both emails" do
+        emails('to: "joe@gmail.com"').should == [@email1, @email2]
+      end
+
+      describe "and emails have subjects 'email1', 'email2'" do
+        before do
+          @email1.stub!(:subject).and_return('email1')
+          @email2.stub!(:subject).and_return('email2')
+        end
+
+        it "#emails('to: \"joe@gmail.com\", subject: \"email1\"') should return email1" do
+          emails('to: "joe@gmail.com", subject: "email1"').should == [@email1]
+        end
+
+        it "#emails('to: \"fred@gmail.com\", subject: \"email2\"') should return empty array" do
+          emails('to: "fred@gmail.com", subject: "email2"').should == []
+        end
+      end
+    end
+  end
+
+  describe "#save_and_open_emails" do
+    before do
+      stub!(:open_in_browser)
+      stub!(:emails).and_return(["Contents of Email 1"])
+      @now = "2008-01-01".to_time
+      Time.stub!(:now).and_return(@now)
+    end
+
+    it "should call #emails to get emails" do
+      should_receive(:emails).and_return([])
+      save_and_open_emails
+    end
+
+    describe "when emails have been already been found" do
+      before { @emails = [] }
+
+      it "should not call #emails" do
+        should_not_receive(:emails)
+        save_and_open_emails
+      end
+    end
+
+    it "should create a file in Rails/tmp with the emails in it" do
+      save_and_open_emails
+      File.read("pickle-email-#{@now.to_i}.html").should == "<h1>Email 1</h1><pre>Contents of Email 1</pre><hr />"
+    end
+
+    it "should call open_in_browser on created tmp file" do
+      should_receive(:open_in_browser).with("pickle-email-#{@now.to_i}.html")
+      save_and_open_emails
+    end
+  end
+
+  describe "following links in emails" do
+    before do
+      stub!(:open_in_browser)
+      @email1.stub!(:body).and_return('some text <a href="http://example.com/page">example page</a> more text')
+    end
+
+    it "should find a link for http://example.com/page" do
+      should_receive(:visit).with('/page')
+      visit_in_email(@email1, 'http://example.com/page')
+    end
+
+    it "should find a link for \"example page\"" do
+      should_receive(:visit).with('/page')
+      visit_in_email(@email1, 'example page')
+    end
+
+    it "should follow the first link in an email" do
+      should_receive(:visit).with('/page')
+      click_first_link_in_email(@email1)
+    end
+  end
+end

data/spec/pickle/parser/matchers_spec.rb

@@ -0,0 +1,74 @@
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe Pickle::Parser::Matchers do
+  include Pickle::Parser::Matchers
+
+  describe "(config: [factories: user, car, fast_car] [predicates: name, status, fancy?, super_fancy?, has_style?, has_super_style?]" do
+    def config
+      @config ||= Pickle::Config.new do |c|
+        c.factories = {
+          'user'      => mock('factory'),
+          'car'       => mock('factory'),
+          'fast_car'  => mock('factory')
+        }
+        c.predicates = %w(name status fancy? super_fancy? has_style? has_super_style?)
+      end
+    end
+
+    describe "Match atoms" do
+      def self.atom_should_match(atom, strings)
+        Array(strings).each do |string|
+          it "#{atom} should match '#{string}'" do
+            string.should match(/^#{send atom}$/)
+          end
+        end
+      end
+
+      def self.atom_should_not_match(atom, strings)
+        Array(strings).each do |string|
+          it "#{atom} should NOT match '#{string}'" do
+            string.should_not match(/^#{send atom}$/)
+          end
+        end
+      end
+
+      atom_should_match     :match_ordinal, ['1st', '2nd', '23rd', '104th']
+      atom_should_not_match :match_ordinal, ['1', '2']
+
+      atom_should_match     :match_index, ['first', 'last', '23rd', '104th']
+      atom_should_not_match :match_index, ['1', '2', 'foo']
+
+      atom_should_match     :match_label, [': "gday"', ': "gday mate"']
+      atom_should_not_match :match_label, [': "gday""', ': gday']
+
+      atom_should_match     :match_collection, ['[]', '[that user]', '[that car, user "Bob"]']
+      atom_should_not_match :match_collection, ['[, ]', '[a giraffe]', '[a 1st faster car: "jim", an event created]']
+
+      atom_should_match     :match_field, ['foo: "this is the life"', 'bar_man: "and so is this"', 'boolean: false', 'boolean: true', 'numeric: 10', 'numeric: 12.5', 'numeric: +10', 'numeric: +12.5', 'numeric: -10', 'numeric: -12.5', 'nil_field: nil', 'collection: [that car, user "Bob"]']
+      atom_should_not_match :match_field, ['foo bar: "this aint workin"', 'not_numeric: --10', 'not_numeric: -ten']
+
+      atom_should_match     :match_fields, ['foo: "bar"', 'foo: "bar", baz: "bah"']
+      atom_should_not_match :match_fields, ['foo bar: "baz"', 'email: "a", password: "b", and password_confirmation: "c"']
+
+      atom_should_match     :match_model, ['a user', '1st fast car', 'the 23rd fast_car', 'the user: "fred flinstone"']
+
+      atom_should_not_match :match_model, ['a giraffe', 'a 1st faster car: "jim"', 'an event created']
+  
+      atom_should_match     :match_predicate, ['name', 'status', 'fancy', 'super fancy', 'super_fancy', 'style', 'super style', 'super_style']
+      atom_should_not_match :match_predicate, ['nameo', 'increment', 'not a predicate', 'has style']
+    
+      atom_should_match     :match_factory, ['user', 'fast car', 'fast_car', 'car']
+      atom_should_not_match :match_factory, ['users', 'faster car', 'event created']
+
+      atom_should_match     :match_plural_factory, ['users', 'fast cars']
+      atom_should_not_match :match_plural_factory, ['usereres', 'fasts cars']
+    end
+  end
+
+  describe "capture methods" do
+    it "capture_field should == '(' + match_field + ')'" do
+      should_receive(:match_field).and_return('MATCH_FIELD')
+      capture_field.should == '(MATCH_FIELD)'
+    end
+  end
+end

data/spec/pickle/parser_spec.rb

@@ -0,0 +1,165 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe Pickle::Parser do
+  before do
+    @parser = Pickle::Parser.new(:config => Pickle::Config.new)
+  end
+
+  it "should raise error when created with no config" do
+    lambda{ Pickle::Parser.new }.should raise_error(ArgumentError)
+  end
+
+  describe "when a 'user' factory exists in config" do
+    before do
+      @parser.config.stub(:factories).and_return('user' => mock('User'))
+    end
+
+    describe 'misc regexps' do
+      describe '/^#{capture_model} exists/' do
+        before do
+          @regexp = /^(#{@parser.capture_model}) exists$/
+        end
+
+        it "should match 'a user exists'" do
+          'a user exists'.should match(@regexp)
+        end
+
+        it "should caputure 'a user' from  'a user exists'" do
+          'a user exists'.match(@regexp)[1].should == 'a user'
+        end
+      end
+    end
+
+    describe '#parse_field' do
+      it "should return {'a' => 'b'} for 'a: \"b\"'" do
+        @parser.parse_field('a: "b"').should == {'a' => 'b'}
+      end
+
+      it "should return {'a' => ['that user', 'user \"Bob\"']} for 'a: [that user, user \"Bob\"]'" do
+        @parser.parse_field('a: [that user, user "Bob"]').should == {'a' => ['that user', 'user "Bob"']}
+      end
+
+      it "should raise error for invalid field 'a : b'" do
+        lambda { @parser.parse_field('a : b') }.should raise_error(ArgumentError)
+      end
+    end
+
+    describe '#parse_fields' do
+      it 'should return {} for blank argument' do
+        @parser.parse_fields(nil).should == {}
+        @parser.parse_fields('').should == {}
+      end
+
+      it 'should raise error for invalid argument' do
+        lambda { @parser.parse_fields('foo foo') }.should raise_error(ArgumentError)
+      end
+
+      it '(\'foo: "bar"\') should == { "foo" => "bar"}' do
+        @parser.parse_fields('foo: "bar"').should == { "foo" => "bar"}
+      end
+
+      it '("bool: true") should == { "bool" => true}' do
+        @parser.parse_fields('bool: true').should == {"bool" => true}
+      end
+
+      it '("bool: false") should == { "bool" => false}' do
+        @parser.parse_fields('bool: false').should == {"bool" => false}
+      end
+
+      it '("int: 10") should == { "int" => 10 }' do
+        @parser.parse_fields('int: 10').should == {"int" => 10}
+      end
+
+      it '("float: 10.1") should == { "float" => 10.1 }' do
+        @parser.parse_fields('float: 10.1').should == {"float" => 10.1}
+      end
+
+      it '(\'foo: "bar", bar_man: "wonga wonga", gump: 123, many: [that user]\') should == {"foo" => "bar", "bar_man" => "wonga wonga", "gump" => 123, "many" => ["that user"]}' do
+        @parser.parse_fields('foo: "bar", bar_man: "wonga wonga", gump: 123, many: [that user]').should == {"foo" => "bar", "bar_man" => "wonga wonga", "gump" => 123, "many" => ["that user"]}
+      end
+    end
+
+    describe '#parse_model' do
+      it '("a user") should == ["user", ""]' do
+        @parser.parse_model("a user").should == ["user", ""]
+      end
+
+      it '("the user") should == ["user", ""]' do
+        @parser.parse_model("the user").should == ["user", ""]
+      end
+
+      it '("1 user") should == ["user", ""]' do
+        @parser.parse_model("1 user").should == ["user", ""]
+      end
+
+      it '(\'an user: "jim jones"\') should == ["user", "jim_jones"]' do
+        @parser.parse_model('an user: "jim jones"').should == ["user", "jim_jones"]
+      end
+
+      it '(\'that user: "herbie"\') should == ["user", "herbie"]' do
+        @parser.parse_model('that user: "herbie"').should == ["user", "herbie"]
+      end
+
+      it '(\'the 12th user\') should == ["user", 11]' do
+        @parser.parse_model('the 12th user').should == ["user", 11]
+      end
+
+      it '(\'the last user\') should == ["user", -1]' do
+        @parser.parse_model('the last user').should == ["user", -1]
+      end
+
+      it '("the first user") should == ["user", 0]' do
+        @parser.parse_model('the first user').should == ["user", 0]
+      end
+
+      it '("the 1st user") should == ["user", 0]' do
+        @parser.parse_model('the 1st user').should == ["user", 0]
+      end
+    end
+
+    describe "#parse_index" do
+      it '("1st") should == 0' do
+        @parser.parse_index("1st").should == 0
+      end
+
+      it '("24th") should == 23' do
+        @parser.parse_index("24th").should == 23
+      end
+      it '("first") should == 0' do
+        @parser.parse_index("first").should == 0
+      end
+
+      it '("last") should == -1' do
+        @parser.parse_index("last").should == -1
+      end
+    end
+  end
+
+  describe "customised mappings" do
+    describe "config maps 'I|myself' to 'user: \"me\"'" do
+      before do
+        @config = Pickle::Config.new do |c|
+          c.map 'I', 'myself', :to => 'user: "me"'
+        end
+        @parser = Pickle::Parser.new(:config => @config)
+        @parser.config.stub(:factories).and_return('user' => mock('User'))
+      end
+
+      it "'I' should match /\#{match_model}/" do
+        'I'.should match(/#{@parser.match_model}/)
+      end
+
+      it "'myself' should match /\#{match_model}/" do
+        'myself'.should match(/#{@parser.match_model}/)
+      end
+
+      it "parse_model('I') should == ['user', 'me']" do
+        @parser.parse_model('I').should == ["user", "me"]
+      end
+
+      it "parse_model('myself') should == ['user', 'me']" do
+        @parser.parse_model('myself').should == ["user", "me"]
+      end
+    end
+  end
+end

data/spec/pickle/path_spec.rb

@@ -0,0 +1,101 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+require 'pickle/path'
+
+describe Pickle::Path do
+  include Pickle::Path
+  
+  describe "#path_to_pickle, when the model doesn't exist" do
+    before do
+      stub!(:model).and_return(nil)
+    end
+    it "('that user', :extra => 'new comment') should raise the error raised by model!" do
+      lambda { path_to_pickle "that user", "new comment" }.should raise_error(RuntimeError, 'Could not figure out a path for ["that user", "new comment"] {}')
+    end
+    
+  end
+  
+  describe "#path_to_pickle" do
+    describe "when model returns a user" do
+      let :user_class do
+        mock 'User', :name => 'User'
+      end
+      
+      let :user do
+        mock 'user', :class => user_class
+      end
+      
+      before do
+        stub!(:model).and_return(user)
+      end
+    
+      it "('a user', 'the user: \"fred\"') should retrieve 'a user', and 'the user: \"fred\"' models" do
+        should_receive(:model).with('a user')
+        should_receive(:model).with('the user: "fred"')
+        stub!(:user_user_path).and_return('the path')
+        path_to_pickle('a user', 'the user: "fred"').should == 'the path'
+      end
+    
+      it "('a user', :action => 'foo') should return foo_user_path(<user>)" do
+        should_receive(:foo_user_path).with(user).and_return('the path')
+        path_to_pickle('a user', :action => 'foo').should == 'the path'
+      end
+    
+      it "('a user', :action => 'foo') should raise informative error if foo_user_path not defined" do
+        should_receive(:foo_user_path).with(user).and_raise(NoMethodError)
+        lambda { path_to_pickle('a user', :action => 'foo') }.should raise_error(Exception, /Could not figure out a path for/)
+      end
+    
+      it "('a user', :segment => 'foo') should return user_foo_path(<user>)" do
+        should_receive(:user_foo_path).with(user).and_return('the path')
+        path_to_pickle('a user', :segment => 'foo').should == 'the path'
+      end
+    
+      it "('a user', :segment => 'foo') should raise informative error if foo_user_path not defined" do
+        should_receive(:user_foo_path).with(user).and_raise(NoMethodError)
+        lambda { path_to_pickle('a user', :segment => 'foo') }.should raise_error(Exception, /Could not figure out a path for/)
+      end
+    
+      it "('a user', :action => 'new', :segment => 'comment') should return new_user_comment_path(<user>)" do
+        should_receive(:new_user_comment_path).with(user).and_return('the path')
+        path_to_pickle('a user', :segment => 'comment', :action => 'new').should == 'the path'
+      end
+    
+      it "('a user', :action => 'new', :segment => 'comment') should raise informative error if new_user_comment_path not defined" do
+        should_receive(:new_user_comment_path).with(user).and_raise(NoMethodError)
+        lambda { path_to_pickle('a user', :action => 'new', :segment => 'comment') }.should raise_error(Exception, /Could not figure out a path for/)
+      end
+    
+      it "('a user', :extra => 'new comment') should return new_user_comment_path(<user>)" do
+        should_receive(:new_user_comment_path).with(user).and_return('the path')
+        path_to_pickle('a user', :extra => 'new comment').should == 'the path'
+      end
+    
+      it "('a user', :extra => 'new comment') should raise informative error if new_user_comment_path not defined" do
+        should_receive(:new_user_comment_path).with(user).and_raise(NoMethodError)
+        lambda { path_to_pickle('a user', :extra => 'new comment') }.should raise_error(Exception, /Could not figure out a path for/)
+      end
+      
+      describe "when args is a list of pickle and non pickle models" do
+        before do
+          stub!(:model).with("account").and_return(nil)
+        end
+      
+        it "('account', 'the user') should return account_user_path(<user>)" do
+          should_receive(:account_user_path).with(user).and_return("the path")
+          path_to_pickle('account', 'the user').should == 'the path'
+        end
+      end
+      
+      describe "(private API)" do
+        it "('a user', :extra => 'new ish comment') should try combinations of 'new', 'ish', 'comment'" do
+          should_receive(:pickle_path_for_resources_action_segment).with([user], '', 'new_ish_comment').once
+          should_receive(:pickle_path_for_resources_action_segment).with([user], 'new', 'ish_comment').once
+          should_receive(:pickle_path_for_resources_action_segment).with([user], 'new_ish', 'comment').once
+          should_receive(:pickle_path_for_resources_action_segment).with([user], 'new_ish_comment', '').once
+          lambda { path_to_pickle('a user', :extra => 'new ish comment') }.should raise_error(Exception, /Could not figure out a path for/)
+        end
+      end
+    end
+  end
+end