www-delicious 0.1.0

data/test/helper.rb

@@ -0,0 +1,108 @@
+# 
+# = WWW::Delicious
+#
+# Ruby client for del.icio.us API.
+# 
+#
+# Category::   WWW
+# Package::    WWW::Delicious
+# Author::     Simone Carletti <weppos@weppos.net>
+#
+#--
+# SVN: $Id$
+#++
+
+
+# prepend lib folder
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+
+require 'test/unit'
+require 'www/delicious'
+
+# testcase file path
+TESTCASE_PATH   = File.dirname(__FILE__) + '/_files' unless defined?(TESTCASE_PATH)
+TEST_REAL_TESTS = ENV['DUSERNAME'] && ENV['DPASSWORD'] unless defined?(TEST_REAL_TESTS)
+
+
+module WWW
+  class Delicious 
+    module TestCase
+
+      TEST_USERNAME = 'u' unless defined? TEST_USERNAME
+      TEST_PASSWORD = 'p' unless defined? TEST_PASSWORD
+
+      def setup
+        @default_username = ENV['DUSERNAME'] || TEST_USERNAME
+        @default_password = ENV['DPASSWORD'] || TEST_PASSWORD
+        @run_online_tests = false
+        @run_real_tests   = TEST_REAL_TESTS
+      end
+
+      protected
+      #
+      # Returns a valid instance of <tt>WWW::Delicious</tt>
+      # initialized with given +options+.
+      #
+      def instance(options = {}, &block)
+        username = options.delete(:username) || @default_username
+        password = options.delete(:password) || @default_password
+        return WWW::Delicious.new(username, password, options, &block)
+      end
+
+      protected
+      #
+      # Returns true if tests that requires an HTTP connection must be skipped.
+      #
+      def skip_online?
+        return !@run_online_tests
+      end
+
+      protected
+      #
+      # Loads a marshaled response for given +path+.
+      #
+      def load_response(path)
+        return Marshal.load(File.read(path))
+      end
+
+      protected
+      #
+      # Loads a marshaled response for given +path+.
+      #
+      def set_response(content, path = nil)
+        path ||= TESTCASE_PATH + '/marshaled_response'
+        response = Marshal.load(File.read(path))
+        response.instance_variable_set(:@body, content)
+        Net::HTTP.response = response
+      end
+      
+    end
+  end
+end
+
+module Net
+  class HTTP < Protocol
+    @@offline_response = nil
+    
+    class << self
+      def response()
+        r = @@offline_response ||= Marshal.load(File.read(TESTCASE_PATH + '/marshaled_response'))
+        @@offline_response = nil
+        r
+      end
+      def response=(r)
+        @@offline_response = r
+      end
+    end
+    
+    alias :request_online :request
+    def request_offline(req, body = nil, &block)
+      return self.class.response
+    end
+    
+    # prepare for offline tests
+    remove_method :request 
+    alias :request :request_offline
+  end
+end
+

data/test/unit/delicious_bundle_test.rb

@@ -0,0 +1,90 @@
+# 
+# = WWW::Delicious
+#
+# Ruby client for del.icio.us API.
+# 
+#
+# Category::   WWW
+# Package::    WWW::Delicious
+# Author::     Simone Carletti <weppos@weppos.net>
+#
+#--
+# SVN: $Id$
+#++
+
+
+require File.dirname(__FILE__) + '/../helper'
+require 'www/delicious/bundle'
+
+
+class DeliciousBundleTest < Test::Unit::TestCase
+  
+  
+  # =========================================================================
+  # These tests check object constructor behavior 
+  # =========================================================================
+  
+  def test_initialize
+    obj = nil
+    assert_nothing_raised() { obj = WWW::Delicious::Bundle.new('name') }
+    assert_instance_of(WWW::Delicious::Bundle, obj)
+  end
+  
+  def test_initialize_with_tags
+    obj = nil
+    assert_nothing_raised() { obj = WWW::Delicious::Bundle.new('name', []) }
+    assert_instance_of(WWW::Delicious::Bundle, obj)
+  end
+  
+  def test_initialize_raises_without_name
+    assert_raise(ArgumentError) { WWW::Delicious::Bundle.new() }
+  end
+  
+  
+  # =========================================================================
+  # These tests check constructor options
+  # =========================================================================
+    
+  def test_initialize_name
+    obj = nil
+    name = 'test_name'
+    assert_nothing_raised() { obj = instance(name) }
+    assert_instance_of(WWW::Delicious::Bundle, obj)
+    assert_equal(name, obj.name)
+  end
+
+  def test_initialize_tags
+    obj = nil
+    name = 'test_name'
+    tags = %w(foo bar)
+    assert_nothing_raised() { obj = instance(name, tags) }
+    assert_instance_of(WWW::Delicious::Bundle, obj)
+    assert_equal(tags, obj.tags)
+  end
+
+  def test_initialize_raises_without_tags_kind_of_array
+    assert_raise(ArgumentError) { instance('foo', 'foo') }
+  end
+
+
+  def test_from_rexml
+    xml = '<bundle name="music" tags="ipod mp3 music" />'
+    dom = REXML::Document.new(xml)
+    obj = WWW::Delicious::Bundle.from_rexml(dom.root)
+    assert_instance_of(WWW::Delicious::Bundle, obj)
+    assert_equal('music', obj.name)
+    assert_equal(%w(ipod mp3 music), obj.tags)
+  end
+
+
+  protected
+  #
+  # Returns a valid instance of <tt>WWW::Delicious::Bundle</tt>
+  # initialized with given +options+.
+  #
+  def instance(name, tags = [], &block)
+    return WWW::Delicious::Bundle.new(name, tags, &block)
+  end
+  
+  
+end

data/test/unit/delicious_online_test.rb

@@ -0,0 +1,143 @@
+# 
+# = WWW::Delicious
+#
+# Ruby client for del.icio.us API.
+# 
+#
+# Category::   WWW
+# Package::    WWW::Delicious
+# Author::     Simone Carletti <weppos@weppos.net>
+#
+#--
+# SVN: $Id$
+#++
+
+
+require File.dirname(__FILE__) + '/../helper'
+
+
+if TEST_REAL_TESTS
+  puts "*WARNING* Running real online tests with account #{ENV['DUSERNAME']} => #{ENV['DPASSWORD']}."
+else
+  puts "Real online tests skipped. Set 'DUSERNAME' and 'DPASSWORD' env variables to run them."
+end
+
+
+module Net
+  class HTTP < Protocol
+    # prepare for online tests
+    remove_method :request 
+    alias :request :request_online
+    puts 'Changed :request for online tests'
+  end
+end if TEST_REAL_TESTS
+
+
+class DeliciousOnlineTest < Test::Unit::TestCase
+  include WWW::Delicious::TestCase
+  
+  def test_valid_account
+    obj = instance(:username => 'foo', :password => 'bar')
+    assert(!obj.valid_account?)
+  end
+  
+  def test_update
+    result = nil
+    assert_nothing_raised() { result = instance.update() }
+    assert_not_nil(result)
+  end
+  
+  def test_bundles_all
+    result = nil
+    assert_nothing_raised() { result = instance.bundles_all() }
+    assert_not_nil(result)
+    result.each do |bundle|
+      assert_instance_of(WWW::Delicious::Bundle, bundle)
+      assert_not_nil(bundle.name)
+      assert_instance_of(Array, bundle.tags)
+    end
+  end
+  
+  def test_bundles_set
+    bundle = WWW::Delicious::Bundle.new('test_bundle', %w(ruby python).sort)
+    obj = instance()
+    
+    # create the bundle
+    assert_nothing_raised() { obj.bundles_set(bundle) }
+    # search for the bundle
+    #assert_not_nil(search_for_bundle(bundle, obj))
+  end
+  
+  def test_bundles_delete
+    bundle = WWW::Delicious::Bundle.new('test_bundle', %w(ruby python).sort)
+    obj = instance()
+    
+    # search for the bundle
+    #assert_not_nil(search_for_bundle(bundle, obj))
+    # delete the bundle
+    assert_nothing_raised() { obj.bundles_delete(bundle) }
+    # search for the bundle again
+    #assert_nil(search_for_bundle(bundle, obj))
+  end
+  
+  def test_tags_get
+    result = nil
+    assert_nothing_raised() { result = instance.tags_get() }
+    assert_not_nil(result)
+    result.each do |tag|
+      assert_instance_of(WWW::Delicious::Tag, tag)
+      assert_not_nil(tag.name)
+      assert_not_nil(tag.count)
+    end
+  end
+  
+  def test_tags_rename
+    ftag = WWW::Delicious::Tag.new(:name => 'old_tag')
+    otag = WWW::Delicious::Tag.new(:name => 'new_tag')
+    obj = instance()
+    
+    assert_nothing_raised() { obj.tags_rename(ftag, otag) }
+  end
+  
+  def test_posts_get
+    obj = instance()
+    results = nil
+    assert_nothing_raised() { results = obj.posts_get() }
+    
+    assert_kind_of(Array, results)
+    results.each do |post|
+      assert_kind_of(WWW::Delicious::Post, result)
+    end
+  end
+  
+  def test_posts_recent
+    obj = instance()
+    results = nil
+    assert_nothing_raised() { results = obj.posts_recent() }
+    
+    assert_kind_of(Array, results)
+    results.each do |post|
+      assert_kind_of(WWW::Delicious::Post, result)
+    end
+  end
+
+  
+  protected
+  def search_for_bundle(bundle, obj)
+    bundles = obj.bundles_all()
+    return bundles.detect { |b| b.name == bundle.name && b.tags.sort == bundle.tags }
+  end
+
+end if TEST_REAL_TESTS
+
+
+module Net
+  class HTTP < Protocol
+    # prepare for offline tests
+    remove_method :request 
+    alias :request :request_offline
+    puts 'Changed :request for offline tests'
+  end
+end if TEST_REAL_TESTS
+
+

data/test/unit/delicious_post_test.rb

@@ -0,0 +1,102 @@
+# 
+# = WWW::Delicious
+#
+# Ruby client for del.icio.us API.
+# 
+#
+# Category::   WWW
+# Package::    WWW::Delicious
+# Author::     Simone Carletti <weppos@weppos.net>
+#
+#--
+# SVN: $Id$
+#++
+
+
+require File.dirname(__FILE__) + '/../helper'
+require 'www/delicious/post'
+
+
+class DeliciousPostTest < Test::Unit::TestCase
+  
+  
+  # =========================================================================
+  # These tests check object constructor behavior 
+  # =========================================================================
+  
+  def test_initialize
+    assert_nothing_raised() do
+      obj = WWW::Delicious::Post.new(:url => 'http://localhost', :title => 'foo')
+      assert_instance_of(WWW::Delicious::Post, obj)
+    end
+  end
+  
+  def test_initialize_with_block
+    assert_nothing_raised() do 
+      obj = WWW::Delicious::Post.new(:url => 'http://localhost', :title => 'foo') do |tag|
+        assert_instance_of(WWW::Delicious::Post, tag)
+      end
+      assert_instance_of(WWW::Delicious::Post, obj)
+    end
+  end
+  
+  def test_initialize_raises_without_values
+    assert_raise(ArgumentError) do
+      obj = WWW::Delicious::Post.new()
+    end
+  end
+  
+  def test_initialize_raises_without_values_hash_or_rexml
+    exception = assert_raise(ArgumentError) do
+      obj = WWW::Delicious::Post.new('foo')
+    end
+    assert_match(/`hash` or `REXML::Element`/i, exception.message)
+  end
+  
+  
+  # =========================================================================
+  # These tests check constructor options
+  # =========================================================================
+    
+  def test_initialize_values_kind_of_hash
+    params = {
+      # TODO
+    }
+    obj = WWW::Delicious::Post.new(params)
+    assert_instance_of(WWW::Delicious::Post, obj)
+  end
+
+
+  def test_initialize_values_kind_of_rexml
+    xml = <<-EOS
+<post href="http://www.howtocreate.co.uk/tutorials/texterise.php?dom=1" 
+  description="JavaScript DOM reference" 
+  extended="dom reference" 
+  hash="c0238dc0c44f07daedd9a1fd9bbdeebd" 
+  others="55" tag="dom javascript webdev" time="2005-11-28T05:26:09Z" />
+EOS
+    dom = REXML::Document.new(xml)
+    obj = WWW::Delicious::Post.new(dom.root)
+    assert_instance_of(WWW::Delicious::Post, obj)
+    # check all attrs
+    assert_equal(URI.parse('http://www.howtocreate.co.uk/tutorials/texterise.php?dom=1'), obj.url)
+    assert_equal("JavaScript DOM reference", obj.title)
+    assert_equal("dom reference", obj.notes)
+    assert_equal("c0238dc0c44f07daedd9a1fd9bbdeebd", obj.uid)
+    assert_equal(55, obj.others)
+    assert_equal(%w(dom javascript webdev), obj.tags)
+    assert_equal(Time.parse("2005-11-28T05:26:09Z"), obj.time)
+  end
+
+
+  protected
+  #
+  # Returns a valid instance of <tt>WWW::Delicious::Tag</tt>
+  # initialized with given +options+.
+  #
+  def instance(values, &block)
+    return WWW::Delicious::Post.new(values, &block)
+  end
+  
+  
+end

data/test/unit/delicious_tag_test.rb

@@ -0,0 +1,140 @@
+# 
+# = WWW::Delicious
+#
+# Ruby client for del.icio.us API.
+# 
+#
+# Category::   WWW
+# Package::    WWW::Delicious
+# Author::     Simone Carletti <weppos@weppos.net>
+#
+#--
+# SVN: $Id$
+#++
+
+
+require File.dirname(__FILE__) + '/../helper'
+require 'www/delicious/tag'
+
+
+class DeliciousTagTest < Test::Unit::TestCase
+  
+  
+  # =========================================================================
+  # These tests check object constructor behavior 
+  # =========================================================================
+  
+  def test_initialize
+    assert_nothing_raised() do
+      obj = WWW::Delicious::Tag.new(:name => 'name')
+      assert_instance_of(WWW::Delicious::Tag, obj)
+    end
+  end
+  
+  def test_initialize_with_block
+    assert_nothing_raised() do 
+      obj = WWW::Delicious::Tag.new(:name => 'name') do |tag|
+        assert_instance_of(WWW::Delicious::Tag, tag)
+      end
+      assert_instance_of(WWW::Delicious::Tag, obj)
+    end
+  end
+  
+  def test_initialize_raises_without_values
+    assert_raise(ArgumentError) do
+      obj = WWW::Delicious::Tag.new()
+    end
+  end
+  
+  def test_initialize_raises_without_values_hash_or_rexml
+    exception = assert_raise(ArgumentError) do
+      obj = WWW::Delicious::Tag.new('foo')
+    end
+    assert_match(/`hash` or `REXML::Element`/i, exception.message)
+  end
+  
+  
+  # =========================================================================
+  # These tests check constructor options
+  # =========================================================================
+    
+  def test_initialize_values_kind_of_hash
+    name = 'test'; count = 20
+    assert_nothing_raised() do 
+      obj = instance(:name => name, :count => count) do |t|
+        assert_instance_of(WWW::Delicious::Tag, t)
+        assert_equal(name, t.name)
+        assert_equal(count, t.count)
+      end
+    end
+  end
+
+  def test_initialize_values_kind_of_rexml
+    xml = '<tag count="1" tag="activedesktop" />'
+    dom = REXML::Document.new(xml)
+    obj = WWW::Delicious::Tag.new(dom.root)
+    assert_instance_of(WWW::Delicious::Tag, obj)
+    assert_equal('activedesktop', obj.name)
+    assert_equal(1, obj.count)
+  end
+
+  
+  def test_name_setter_getter
+    instance('foo') do |tag|
+      assert_equal('foo', tag.name)
+      tag.name = 12
+      assert_equal('12', tag.name)
+      tag.name = :foo
+      assert_equal('foo', tag.name)
+    end
+  end
+
+  def test_name_strip_whitespaces
+    [' foo   ', 'foo  ', ' foo ', '  foo'].each do |v|
+      assert_equal(v.strip, instance(v).name) # => 'foo'
+    end
+  end
+
+  def test_count_setter_getter
+    instance('foo') do |tag|
+      assert_equal(0, tag.count)
+      tag.count = 12
+      assert_equal(12, tag.count)
+      tag.count = '23'
+      assert_equal(23, tag.count)
+    end
+  end
+  
+  def test_to_s
+    instance('foobar') do |tag|
+      assert_equal('foobar', tag.to_s)
+    end
+  end
+  
+  def test_api_valid
+    ['foo', ' foo '].each do |v|
+      assert(instance(v).api_valid?)
+    end
+    ['', '  '].each do |v|
+      assert(!instance(v).api_valid?)
+    end
+  end
+
+
+  protected
+  #
+  # Returns a valid instance of <tt>WWW::Delicious::Tag</tt>
+  # initialized with given +options+.
+  #
+  def instance(args, &block)
+    values = case args
+    when Hash
+      args
+    else
+      { :name => args.to_s() }
+    end
+    return WWW::Delicious::Tag.new(values, &block)
+  end
+  
+  
+end