sds-rest 0.1.1

data/spec/authority_spec.rb

@@ -0,0 +1,35 @@
+require 'net/http'
+require File.dirname(__FILE__) + '/spec_helper'
+
+class SDSSpec < Test::Unit::TestCase
+  context "A service instance" do
+    setup do
+      @service = SDSRest::Service.new
+      @service.authority = nil
+    end
+  
+    should "respond to :create_authority" do
+      assert_respond_to @service, :create_authority
+    end
+    
+    should "be able to create an authority" do
+      results = @service.create_authority random
+      assert_instance_of Net::HTTPCreated, results
+    end
+    
+    should "respond to :get_authority" do
+      assert_respond_to @service, :get_authority
+    end
+    
+    should "be able to get an authority" do
+      authority_name = random
+      
+      @service.create_authority authority_name
+      
+      results = @service.get_authority authority_name
+      assert_instance_of Net::HTTPOK, results
+    end
+    
+  end
+
+end

data/spec/blob_spec.rb

@@ -0,0 +1,53 @@
+require 'net/http'
+require File.dirname(__FILE__) + '/spec_helper'
+
+class SSDSSpec < Test::Unit::TestCase
+  context "A service instance" do
+    setup do
+      @service = SDSRest::Service.new
+      @container = random
+      @service.create_container @container
+    end
+  
+    should "respond to :create_blob" do
+      assert_respond_to @service, :create_blob
+    end
+    
+    should "be able to create a blob" do
+      results = @service.create_blob @container, "test-text", 1
+      assert_instance_of Net::HTTPCreated, results
+    end
+    
+    should "respond to :get_blob" do
+      assert_respond_to @service, :get_blob
+    end
+    
+    should "be able to get a blob" do
+      @service.create_blob @container, "test-text", 1
+      results = @service.get_blob @container, 1
+      assert_instance_of Net::HTTPOK, results
+    end
+    
+    should "respond to :update_blob" do
+      assert_respond_to @service, :update_blob
+    end
+    
+    should "be able to update a blob" do
+      @service.create_blob @container, "test-text", 1
+      results = @service.update_blob @container, "test-text2", 1
+      assert_instance_of Net::HTTPOK, results
+    end
+    
+    should "respond to :delete_blob" do
+      assert_respond_to @service, :delete_blob
+    end
+    
+    should "be able to delete a blob" do
+      @service.create_blob @container, "test-text", 1
+      results = @service.delete_blob @container, 1
+      assert_instance_of Net::HTTPOK, results
+    end
+    
+  end
+
+end

data/spec/container_spec.rb

@@ -0,0 +1,46 @@
+require 'net/http'
+require File.dirname(__FILE__) + '/spec_helper'
+
+class SSDSSpec < Test::Unit::TestCase
+  context "A service instance" do
+    setup do
+      @service = SDSRest::Service.new
+    end
+    
+    should "respond to :create_container" do
+      assert_respond_to @service, :create_container
+    end
+    
+    should "be able to create a container" do
+      results = @service.create_container random
+      assert_instance_of Net::HTTPCreated, results
+    end
+    
+    should "respond to :delete_container" do
+      assert_respond_to @service, :delete_container
+    end
+    
+    should "be able to delete a container" do
+      container_name = random
+      
+      @service.create_container container_name
+      
+      results = @service.delete_container container_name
+      assert_instance_of Net::HTTPOK, results    
+    end
+    
+    should "respond to :get_container" do
+      assert_respond_to @service, :get_container
+    end
+    
+    should "be able to get a container" do
+      container_name = random
+      
+      @service.create_container container_name
+      
+      results = @service.get_container container_name
+      assert_instance_of Net::HTTPOK, results
+    end
+    
+  end
+end

data/spec/entity_spec.rb

@@ -0,0 +1,118 @@
+require 'net/http'
+require 'date'
+require File.dirname(__FILE__) + '/spec_helper'
+
+class SSDSSpec < Test::Unit::TestCase
+  context "A service instance" do
+    setup do
+      @service = SDSRest::Service.new
+      @container = random
+      @service.create_container @container
+    end
+    
+    should "respond to :create_entity" do
+      assert_respond_to @service, :create_entity
+    end
+    
+    should "be able to create an entity" do
+      results = @service.create_entity @container, 'car', 1, :make => 'BMW', :model => '3-series'
+      assert_instance_of Net::HTTPCreated, results
+    end
+    
+    should "respond to :delete_entity" do
+      assert_respond_to @service, :delete_entity
+    end
+    
+    should "be able to delete an entity" do
+      @service.create_entity @container, 'car', 2, :make => 'BMW', :model => '3-series'
+      
+      results = @service.delete_entity @container, 2
+      assert_instance_of Net::HTTPOK, results    
+    end
+    
+    should "respond to :get_entity" do
+      assert_respond_to @service, :get_entity
+    end
+    
+    should "be able to get an entity" do
+      @service.create_entity @container, 'car', 3, :make => 'BMW', :model => '3-series'
+ 
+      results = @service.get_entity @container, 3
+      assert_instance_of Net::HTTPOK, results  
+    end
+    
+    should "respond to :update_entity" do
+      assert_respond_to @service, :update_entity
+    end
+    
+    should "be able to update an entity" do
+      @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+ 
+      results = @service.update_entity @container, 'car', 4, nil, :make => 'Toyota', :mode => '3-series'
+      assert_instance_of Net::HTTPOK, results            
+    end
+    
+    should "be able to query" do
+      @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      
+      results =  @service.query(@container, 'from c in entities select c')
+      assert_instance_of Net::HTTPOK, results
+      
+    end
+    
+    should "be able to conditionally get" do
+      results = @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      version = results['etag']     
+      results = @service.get_entity @container, 4, version
+      assert_instance_of Net::HTTPNotModified, results
+    end
+    
+    should "be able to conditionally get an updated entity" do
+      results = @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      version = results['etag']     
+      @service.update_entity @container, 'car', 4, nil, :make => 'Toyota', :model => '3-series'
+      results = @service.get_entity @container, 4, version
+      assert_instance_of Net::HTTPOK, results
+    end
+    
+    should "be able to conditionally delete correct version" do
+      results = @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      version = results['etag']     
+      results = @service.delete_entity @container, 4, version
+      assert_instance_of Net::HTTPOK, results 
+    end
+    
+    should "not be able to conditionally delete wrong version" do
+      results = @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      version = results['etag']     
+      @service.update_entity @container, 'car', 4, nil, :make => 'Toyota', :model => '3-series'
+      results = @service.delete_entity @container, 4, version
+      assert_instance_of Net::HTTPPreconditionFailed, results 
+    end
+    
+    should "be able to conditionally update correct version" do
+      results = @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      version = results['etag']     
+      results = @service.update_entity @container, 'car', 4, version, :make => 'Toyota', :model => '3-series'
+      assert_instance_of Net::HTTPOK, results 
+    end
+    
+    should "not be able to conditionally update wrong version" do
+      results = @service.create_entity @container, 'car', 4, :make => 'BMW', :model => '3-series'
+      version = results['etag']     
+      @service.update_entity @container, 'car', 4, nil, :make => 'Toyota', :model => '3-series'
+      results = @service.update_entity @container, 'car', 4, version, :make => 'Toyota', :model => '3-series'
+      assert_instance_of Net::HTTPPreconditionFailed, results 
+    end
+    
+    should "correctly infer type" do
+      assert_equal 'x:string', @service.infer_type('test')
+      assert_equal 'x:decimal', @service.infer_type(12)
+      assert_equal 'x:decimal', @service.infer_type(12.1)
+      assert_equal 'x:boolean', @service.infer_type(true)
+      assert_equal 'x:dateTime', @service.infer_type(DateTime.parse('12/12/2006'))
+      
+    end
+    
+  end
+end

data/spec/sdsactiveresource_spec.rb

@@ -0,0 +1,88 @@
+require 'net/http'
+
+require File.dirname(__FILE__) + '/spec_helper'
+
+class Car < SDSActiveResource::Base
+  #self.site = 'http://infozerktest15.data.beta.mssds.com/infozerk'
+   
+  
+end
+
+class SDSSpec < Test::Unit::TestCase
+  context "An SDSActiveResource class" do
+    setup do
+      
+      @service = SDSRest::Service.new
+      @container = random
+      @service.create_container @container
+      Car.site = 'http://infozerktest12.data.beta.mssds.com/' + @container + "/"
+      Car.user = ENV['username']
+      Car.password = ENV['password']
+    end
+    
+    should "be able to save an entity" do
+      car = Car.new
+      car.make = 'Toyota'
+      car.model = '3-series'
+      car.Id = "2"
+      assert_equal car.save, true
+      assert_equal car.Id, car.id
+    end
+    
+    should "be able to destroy an entity" do
+      car = get_test_entity
+      assert_instance_of Net::HTTPOK, car.destroy
+    end
+    
+    should "be able to update an entity" do
+      car = get_test_entity
+      car.make = 'BMW'
+      car.year = 2007
+      assert_equal car.save, true
+    end
+    
+    should "be able to find an entity" do
+      car = get_test_entity
+      foundcar = Car.find(car.Id)
+      assert_not_nil foundcar
+      assert_equal foundcar.Id.to_s, car.Id.to_s
+      assert_equal 2007, foundcar.year
+      assert_equal true, foundcar.for_sale
+      assert_equal DateTime.parse("1/1/2007"), foundcar.created
+      assert_equal 1.4, foundcar.miles
+    end
+    
+    should "be able to find all entities" do
+      get_test_entity
+      get_test_entity
+      cars = Car.find(:all)
+      assert_equal cars.length, 2
+      assert_equal cars[0].make, 'toyota'
+      assert_equal cars[0].year, 2007
+    end
+    
+    should "be able to query entities" do
+      get_test_entity
+      car = Car.new()
+      car.make = 'ford'
+      car.Id = rand(999999)
+      car.save
+      cars = Car.query('from c in entities where c.Kind == "Car" and c["make"] == "toyota" select c')
+      assert_equal 1, cars.length
+    end
+    
+  end
+  
+  def get_test_entity
+    car = Car.new()
+    car.make = 'toyota'
+    car.Id = rand(999999)
+    car.year = 2007
+    car.for_sale = true
+    car.created = DateTime.parse("1/1/2007")
+    car.miles = 1.4
+    car.save
+    car
+  end
+  
+end

data/spec/sdsconnection_spec.rb

@@ -0,0 +1,49 @@
+require 'net/http'
+
+require File.dirname(__FILE__) + '/spec_helper'
+
+class SDSSpec < Test::Unit::TestCase
+  context "An SDSActiveResource class" do
+    setup do
+      @connection = SDSActiveResource::SDSConnection.new('http://infozerktest15.data.beta.mssds.com/infozerk')
+    end
+  
+    should "respond to get_container" do
+      assert_respond_to @connection, :get_container
+    end
+    
+    should "parse containers out of the path" do
+      uri = '/infozerk/12'
+      assert_equal 'infozerk', @connection.get_container(uri)
+    end
+    
+    should "respond to get_id" do
+      assert_respond_to @connection, :get_id
+    end
+    
+    should "parse ids out of the path" do
+      uri = "/infozerk/car/1"
+      assert_equal '1', @connection.get_id(uri)
+    end
+    should "parse ids out of the path with .xml extension" do
+      uri = "/infozerk/car/1.xml"
+      assert_equal '1', @connection.get_id(uri)
+    end
+    
+    should "parse an authority out of the path" do
+      uri = "http://infozerktest15.data.beta.mssds.com/infozerk"
+      assert_equal 'infozerktest15', @connection.get_authority(uri)
+    end
+    
+    should "parse a URL out of the path" do
+      uri = "http://infozerktest15.data.beta.mssds.com/infozerk"
+      assert_equal 'data.beta.mssds.com', @connection.get_url(uri)
+    end
+    
+    should "parse a URL out of the path with trailing slash" do
+      uri = "http://infozerktest15.data.beta.mssds.com/infozerk/"
+      assert_equal 'data.beta.mssds.com', @connection.get_url(uri)
+    end
+    
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,24 @@
+RAILS_ROOT = ''
+RAILS_ENV = ''
+
+$LOAD_PATH << File.join(File.dirname(__FILE__), '..', 'lib')
+require 'sds-rest'
+require 'sds-activeresource'
+require 'test/unit'
+require 'rubygems'
+require 'shoulda'
+
+# set your connection information for your SSDS account here.
+# if you have not created an authority you can use the SSDS object to do so
+ENV['username'] = 'javery'
+ENV['password'] = "YAnrZWh8a3y7vw9VfF8q"
+ENV['url'] = "data.beta.mssds.com"
+ENV['authority'] = 'infozerktest12'
+
+def random(length=6)  
+   chars = 'abcdefghjkmnpqrstuvwxyz'  
+   randomstring = ''  
+   length.times { |i| randomstring << chars[rand(chars.length)] }  
+   randomstring  
+ end
+

data/tasks/deployment.rake

@@ -0,0 +1,34 @@
+desc 'Release the website and new gem version'
+task :deploy => [:check_version, :website, :release] do
+  puts "Remember to create SVN tag:"
+  puts "svn copy svn+ssh://#{rubyforge_username}@rubyforge.org/var/svn/#{PATH}/trunk " +
+    "svn+ssh://#{rubyforge_username}@rubyforge.org/var/svn/#{PATH}/tags/REL-#{VERS} "
+  puts "Suggested comment:"
+  puts "Tagging release #{CHANGES}"
+end
+
+desc 'Runs tasks website_generate and install_gem as a local deployment of the gem'
+task :local_deploy => [:website_generate, :install_gem]
+
+task :check_version do
+  unless ENV['VERSION']
+    puts 'Must pass a VERSION=x.y.z release version'
+    exit
+  end
+  unless ENV['VERSION'] == VERS
+    puts "Please update your version.rb to match the release version, currently #{VERS}"
+    exit
+  end
+end
+
+desc 'Install the package as a gem, without generating documentation(ri/rdoc)'
+task :install_gem_no_doc => [:clean, :package] do
+  sh "#{'sudo ' unless Hoe::WINDOZE }gem install pkg/*.gem --no-rdoc --no-ri"
+end
+
+namespace :manifest do
+  desc 'Recreate Manifest.txt to include ALL files'
+  task :refresh do
+    `rake check_manifest | patch -p0 > Manifest.txt`
+  end
+end