latompa-fleakr 0.5.1

data/test/unit/fleakr/api/value_parameter_test.rb

@@ -0,0 +1,41 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Api
+  class ValueParameterTest < Test::Unit::TestCase
+
+   context "An instance of the ValueParameter class" do
+      
+     should "have a value" do
+       parameter = ValueParameter.new('foo', 'bar')
+       parameter.value.should == 'bar'
+     end
+      
+      should "know how to generate the query representation of itself" do
+        parameter = ValueParameter.new('foo', 'bar')
+        parameter.to_query.should == 'foo=bar'
+      end
+      
+      should "escape the value when generating the query representation" do
+        parameter = ValueParameter.new('foo', 'Mr. Crystal?')
+        parameter.to_query.should == 'foo=Mr.+Crystal%3F'
+      end
+      
+      should "use an empty string when generating a query if the parameter value is nil" do
+        parameter = ValueParameter.new('foo', nil)
+        parameter.to_query.should == 'foo='
+      end
+      
+      should "know how to generate the form representation of itself" do
+        parameter = ValueParameter.new('foo', 'bar')
+        expected = 
+          'Content-Disposition: form-data; name="foo"' + "\r\n" +
+          "\r\n" +
+          "bar\r\n"
+          
+        parameter.to_form.should == expected
+      end
+   
+   end
+    
+  end
+end

data/test/unit/fleakr/core_ext/false_class_test.rb

@@ -0,0 +1,13 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+class FalseClassTest < Test::Unit::TestCase
+  
+  context "An instance of the FalseClass class" do
+    
+    should "have 0 as its integer value" do
+      false.to_i.should == 0
+    end
+    
+  end
+  
+end

data/test/unit/fleakr/core_ext/hash_test.rb

@@ -0,0 +1,32 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+class HashTest < Test::Unit::TestCase
+  
+  context "An instance of Hash" do
+    context "when extracting key/value pairs" do
+      
+      setup do
+        @hash = {:one => 'two', :three => 'four'}
+      end
+      
+      should "return a hash with the matching key/value pairs" do
+        @hash.extract!(:one).should == {:one => 'two'}
+      end
+      
+      should "return an empty hash if the key isn't found" do
+        @hash.extract!(:foo).should == {}
+      end
+      
+      should "alter the original hash when a value is extracted" do
+        @hash.extract!(:one)
+        @hash.should == {:three => 'four'}
+      end
+      
+      should "be able to extract multiple keys" do
+        @hash.extract!(:one, :three, :missing).should == {:one => 'two', :three => 'four'}
+      end
+      
+    end
+  end
+  
+end

data/test/unit/fleakr/core_ext/true_class_test.rb

@@ -0,0 +1,13 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+class TrueClassTest < Test::Unit::TestCase
+  
+  context "An instance of the TrueClass class" do
+    
+    should "have 1 as its integer value" do
+      true.to_i.should == 1
+    end
+    
+  end
+  
+end

data/test/unit/fleakr/objects/authentication_token_test.rb

@@ -0,0 +1,61 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class AuthenticationTokenTest < Test::Unit::TestCase
+    
+    context "The AuthenticationToken class" do
+      
+      should "be able to create an instance from a mini_token" do
+        token = '123-123-123'
+        auth_token = stub()
+        
+        response = mock_request_cycle :for => 'auth.getFullToken', :with => {:mini_token => token, :authenticate? => false}
+        
+        AuthenticationToken.expects(:new).with(response.body).returns(auth_token)
+        
+        AuthenticationToken.from_mini_token(token).should == auth_token
+      end
+      
+      should "be able to create an instance from an auth_token" do
+        token      = 'abc123'
+        auth_token = stub()
+
+        response = mock_request_cycle :for => 'auth.checkToken', :with => {:auth_token => token, :authenticate? => false}
+        
+        AuthenticationToken.expects(:new).with(response.body).returns(auth_token)
+        AuthenticationToken.from_auth_token(token).should == auth_token
+      end
+      
+      
+      should "be able to create an instance from a frob" do
+        frob       = '12345678901234567-abcde89012fg3456-7890123'
+        auth_token = stub()
+        
+        response = mock_request_cycle :for => 'auth.getToken', :with => {:frob => frob, :authenticate? => false}
+        
+        AuthenticationToken.expects(:new).with(response.body).returns(auth_token)
+        AuthenticationToken.from_frob(frob).should == auth_token
+      end
+      
+    end
+    
+    context "An instance of the AuthenticationToken class" do
+      
+      context "when populating from an XML document" do
+        
+        setup do
+          @object = AuthenticationToken.new(Hpricot.XML(read_fixture('auth.getFullToken')))
+        end
+        
+        should_have_a_value_for :value       => 'abc-123'
+        should_have_a_value_for :permissions => 'delete'
+        should_have_a_value_for :user_id     => '31066442@N69'
+        should_have_a_value_for :full_name   => 'Sir Froot Pants'
+        should_have_a_value_for :user_name   => 'frootpantz'
+        
+      end
+      
+    end
+    
+  end
+end

data/test/unit/fleakr/objects/comment_test.rb

@@ -0,0 +1,66 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class CommentTest < Test::Unit::TestCase
+
+    context "The Comment class" do
+
+      should_find_all :comments, :by => :photo_id, :call => 'photos.comments.getList', :path => 'rsp/comments/comment'
+      should_find_all :comments, :by => :set_id, :using => :photoset_id, :call => 'photosets.comments.getList', :path => 'rsp/comments/comment'
+
+    end
+
+    context "An instance of the Comment class" do
+
+      context "when populating from the photos_comments_getList XML data" do
+        setup do
+          @object = Comment.new(Hpricot.XML(read_fixture('photos.comments.getList')).at('rsp/comments/comment'))
+        end
+
+        should_have_a_value_for :id        => '1'
+        should_have_a_value_for :author_id => '10490170@N04'
+        should_have_a_value_for :created   => '1239217523'
+        should_have_a_value_for :url       => 'http://www.flickr.com/photos/frootpantz/3422268412/#comment72157616515348062'
+        should_have_a_value_for :body      => 'comment one'
+        
+      end
+      
+      context "in general" do
+        
+        setup { @comment = Comment.new }
+
+        should "have a value for :created_at" do
+          @comment.expects(:created).with().returns('1239217523')
+          Time.expects(:at).with(1239217523).returns('time')
+          
+          @comment.created_at.should == 'time'
+        end
+
+        should "use the body as the string representation" do
+          @comment.expects(:body).with().returns('bod')
+          @comment.to_s.should == 'bod'
+        end
+        
+        should "be able to find the author of the comment" do
+          author = stub()
+          
+          
+          @comment.stubs(:author_id).with().returns('1')
+          User.expects(:find_by_id).with('1').returns(author)
+          
+          @comment.author.should == author
+        end
+        
+        should "memoize the owner information" do
+          @comment.stubs(:author_id).with().returns('1')
+          
+          User.expects(:find_by_id).with('1').once.returns(stub())
+          
+          2.times { @comment.author }
+        end
+        
+      end
+    end
+
+  end
+end

data/test/unit/fleakr/objects/contact_test.rb

@@ -0,0 +1,70 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class ContactTest < Test::Unit::TestCase
+
+    context "The Contact class" do
+      
+      setup do
+        @user_1 = stub()
+        @user_2 = stub()
+        @contact_1, @contact_2 = [stub(:to_user => @user_1), stub(:to_user => @user_2)]
+        
+      end
+      
+      should "return a list of users for a specified user's contacts" do
+        response = mock_request_cycle :for => 'contacts.getPublicList', :with => {:user_id => '1'}
+
+        contact_1_doc, contact_2_doc = (response.body/'rsp/contacts/contact').to_a
+
+        Contact.stubs(:new).with(contact_1_doc).returns(@contact_1)
+        Contact.stubs(:new).with(contact_2_doc).returns(@contact_2)
+        Contact.find_all_by_user_id('1').should == [@user_1, @user_2]
+      end
+      
+      should "return a list of users for an authenticated user" do
+        response = mock_request_cycle :for => 'contacts.getList', :with => {}
+        contact_1_doc, contact_2_doc = (response.body/'rsp/contacts/contact').to_a
+
+        Contact.stubs(:new).with(contact_1_doc).returns(@contact_1)
+        Contact.stubs(:new).with(contact_2_doc).returns(@contact_2)
+        Contact.find_all_contacts().should == [@user_1, @user_2]
+      end
+      
+    end
+
+    context "An instance of the Contact class" do
+      context "when populating from an XML document" do
+        setup do
+          @object = Contact.new(Hpricot.XML(read_fixture('contacts.getPublicList')).at('contacts/contact'))
+        end
+
+        should_have_a_value_for :id          => '9302864@N42'
+        should_have_a_value_for :username    => 'blinky'
+        should_have_a_value_for :icon_server => '2263'
+        should_have_a_value_for :icon_farm   => '3'
+
+      end
+
+      context "in general" do
+        
+        should "be able to convert to a user" do
+          contact = Contact.new
+          user    = mock()
+          
+          User.stubs(:new).returns(user)
+          
+          [:id, :username, :icon_server, :icon_farm].each do |method|
+            contact.stubs(method).with().returns(method.to_s)
+            user.expects("#{method}=".to_sym).with(method.to_s)
+          end
+          
+          contact.to_user.should == user
+        end
+        
+      end
+
+    end
+    
+  end
+end

data/test/unit/fleakr/objects/error_test.rb

@@ -0,0 +1,21 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class ErrorTest < Test::Unit::TestCase
+    
+    context "An instance of the Error class" do
+      
+      should "have a code and a message" do
+        response_xml = "<?xml version=\"1.0\" encoding=\"utf-8\" ?>\n<rsp stat=\"fail\">\n\t<err code=\"1\" msg=\"User not found\" />\n</rsp>\n"
+        
+        error = Error.new(Hpricot.XML(response_xml))
+        
+        error.code.should == '1'
+        error.message.should == 'User not found'
+      end
+      
+    end
+    
+    
+  end
+end

data/test/unit/fleakr/objects/group_test.rb

@@ -0,0 +1,46 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class GroupTest < Test::Unit::TestCase
+
+    should_have_many :photos
+    
+    should_search_by :group_id
+
+    context "The Group class" do
+      
+      should_find_all :groups, :by => :user_id, :call => 'people.getPublicGroups', :path => 'rsp/groups/group'
+      
+    end
+    
+    context "An instance of the Group class" do
+      context "when initializing from an Hpricot document" do
+        
+        setup do
+          doc = Hpricot.XML(read_fixture('people.getPublicGroups')).at('rsp/groups/group')
+          @object = Group.new(doc)
+        end
+        
+        should_have_a_value_for :id   => '13378274@N00'
+        should_have_a_value_for :name => 'Group #1'
+        should_have_a_value_for :adult_flag => '1'
+        
+      end
+
+      should "know that the group is adult-only" do
+        group = Group.new
+        group.stubs(:adult_flag).with().returns('1')
+        group.adult?.should be(true)
+      end
+      
+      should "know that the group is not adult-only" do
+        group = Group.new
+        group.stubs(:adult_flag).with().returns('0')
+        group.adult?.should be(false)
+      end
+      
+    end
+    
+  end
+end
+

data/test/unit/fleakr/objects/image_test.rb

@@ -0,0 +1,81 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class ImageTest < Test::Unit::TestCase
+
+    context "The Image class" do
+
+      should_find_all :images, :by => :photo_id, :call => 'photos.getSizes', :path => 'sizes/size'
+
+    end
+
+    context "An instance of the Image class" do
+
+      context "when populating the object from an XML document" do
+
+        setup do
+          @object = Image.new(Hpricot.XML(read_fixture('photos.getSizes')).at('sizes/size'))
+        end
+
+        should_have_a_value_for :size   => 'Square'
+        should_have_a_value_for :width  => '75'
+        should_have_a_value_for :height => '75'
+        should_have_a_value_for :url    => 'http://farm4.static.flickr.com/3093/2409912100_71e14ed08a_s.jpg'
+        should_have_a_value_for :page   => 'http://www.flickr.com/photos/the_decapitator/2409912100/sizes/sq/'
+
+      end
+
+      context "in general" do
+
+        should "know its filename" do
+          image = Image.new
+          image.stubs(:url).with().returns('http://flickr.com/photos/foobar.jpg')
+
+          image.filename.should == 'foobar.jpg'
+        end
+
+        context "when saving the file" do
+
+          setup do
+            @tmp_dir = create_temp_directory
+
+            @url = 'http://host.com/image.jpg'
+            @image_filename = 'image.jpg'
+
+            @image = Image.new
+            @image.stubs(:url).with().returns(@url)
+            @image.stubs(:filename).with().returns(@image_filename)
+            
+            @image_data = 'image_data'
+            Net::HTTP.expects(:get).with(URI.parse(@url)).returns(@image_data)
+          end
+
+          teardown do
+            FileUtils.rm_rf(@tmp_dir)
+          end
+
+          should "be able to save to a directory with the original filename" do
+            @image.save_to(@tmp_dir)
+            File.read("#{@tmp_dir}/image.jpg").should == @image_data
+          end
+
+          should "be able to save to a specified file" do
+            existing_file = "#{@tmp_dir}/existing_file.jpg"
+
+            FileUtils.touch(existing_file)
+
+            @image.save_to(existing_file)
+            File.read(existing_file).should == @image_data
+          end
+          
+          should "be able to save the file using a specified prefix" do
+            @image.save_to(@tmp_dir, '001_')
+            File.read("#{@tmp_dir}/001_image.jpg").should == @image_data
+          end
+
+        end
+      end
+    end
+
+  end
+end

data/test/unit/fleakr/objects/photo_context_test.rb

@@ -0,0 +1,80 @@
+require File.dirname(__FILE__) + '/../../../test_helper'
+
+module Fleakr::Objects
+  class PhotoContextTest < Test::Unit::TestCase
+    
+    context "An instance of the PhotoContext class" do
+      
+      setup { @context = PhotoContext.new }
+      
+      context "when populating from the photos_getContext XML data" do
+        setup do
+          @object = PhotoContext.new(Hpricot.XML(read_fixture('photos.getContext')))
+        end
+        
+        should_have_a_value_for :count       => '5584'
+        should_have_a_value_for :next_id     => '12343'
+        should_have_a_value_for :previous_id => '12345'
+
+      end
+      
+      should "know that there is a previous photo" do
+        @context.expects(:previous_id).with().returns('1')
+        @context.previous?.should be(true)
+      end
+      
+      should "know that there isn't a previous photo" do
+        @context.expects(:previous_id).with().returns('0')
+        @context.previous?.should be(false)
+      end
+      
+      should "know that there is a next photo" do
+        @context.expects(:next_id).with().returns('1')
+        @context.next?.should be(true)
+      end
+      
+      should "know that there isn't a next photo" do
+        @context.expects(:next_id).with().returns('0')
+        @context.next?.should be(false)
+      end
+      
+      should "find the previous photo" do
+        photo = stub()
+        
+        @context.expects(:previous_id).with().returns('1')
+        @context.expects(:previous?).with().returns(true)
+        
+        Photo.expects(:find_by_id).with('1').returns(photo)
+        
+        @context.previous.should == photo
+      end
+      
+      should "not try to find the previous photo if it doesn't exist" do
+        @context.expects(:previous?).with().returns(false)
+        Photo.expects(:find_by_id).never
+        
+        @context.previous.should be(nil)
+      end
+      
+      should "find the next photo" do
+        photo = stub()
+        @context.expects(:next_id).with().returns('1')
+        @context.expects(:next?).with().returns(true)
+                
+        Photo.expects(:find_by_id).with('1').returns(photo)
+        
+        @context.next.should == photo
+      end
+      
+      should "not try to find the next photo if it doesn't exist" do
+        @context.expects(:next?).with().returns(false)
+        Photo.expects(:find_by_id).never
+        
+        @context.next.should be(nil)
+      end
+      
+      
+    end
+    
+  end
+end