ixtlan-remote 0.1.0

data/spec/resource_spec.rb~

@@ -0,0 +1,173 @@
+require 'ixtlan/remote/resource'
+require 'ixtlan/remote/server'
+require 'json'
+class RestClientMock
+
+  def [](path)
+    @path = path
+    self
+  end
+  
+  attr_reader :path
+  attr_accessor :response_payload
+  
+  def response_payload( *args )
+    @response_payload
+  end
+
+  alias :post :response_payload
+  alias :put :response_payload
+  alias :delete :response_payload
+
+end
+class User
+  
+  def initialize( args = {} )
+    @id = (args || {})['id'].to_i
+    @name = (args || {})['name']
+  end
+
+  attr_reader :id, :name
+
+  def attributes
+    {'id' => @id, 'name' => @name }
+  end
+end
+ClientUser = User
+
+describe Ixtlan::Remote::RestResource do
+
+  subject do
+    Ixtlan::Remote::RestResource.new( rest_client, 
+                                      { User => Ixtlan::Remote::Server::Meta.new( nil, User.method(:new) ), 
+                                        ClientUser =>  Ixtlan::Remote::Server::Meta.new( :users, ClientUser.method(:new) ) } )
+  end
+ 
+  let( :rest_client ) { ::RestClientMock.new }
+
+  describe 'create' do
+    [ User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user without root' do
+        
+        rest_client.response_payload = '{ "id": 1, "name": "bla" }'
+        
+        u = subject.create( *user, :name => 'bla' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end
+      
+      it 'user with root' do
+        
+        rest_client.response_payload = '{ "user": { "id": 1, "name": "bla" } }'
+        
+        u = subject.create( *user, :name => 'bla' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end
+    end
+  end
+
+  describe 'retrieve' do
+    [ User.new('id' => 1), User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user without root' do
+        
+        rest_client.response_payload = '{ "id": 1, "name": "bla" }'
+        
+        u = subject.create( *user, 1 ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+      
+      it 'users without root' do
+        
+        rest_client.response_payload = '[ { "id": 1, "name": "bla" }, { "id": 2, "name": "blabla" } ]'
+        
+        u = subject.create( *user ).send_it
+        u.size.must_equal 2
+        u[0].id.must_equal 1
+        u[0].name.must_equal 'bla'
+        u[1].id.must_equal 2
+        u[1].name.must_equal 'blabla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end
+
+      it 'user with root' do
+        
+        rest_client.response_payload = '{ "user": { "id": 1, "name": "bla" } }'
+        
+        u = subject.create( *user, 1 ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+
+      it 'users with root' do
+        
+        rest_client.response_payload = '[ { "user": { "id": 1, "name": "bla" } }, { "user": { "id": 2, "name": "blabla" } } ]'
+        
+        u = subject.create( *user ).send_it
+        u.size.must_equal 2
+        u[0].id.must_equal 1
+        u[0].name.must_equal 'bla'
+        u[1].id.must_equal 2
+        u[1].name.must_equal 'blabla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end       
+    end
+  end
+
+  describe 'update' do
+    [ User.new('id' => 1), User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user without root' do
+        
+        rest_client.response_payload = '{ "id": 1, "name": "bla" }'
+        
+        u = subject.update( *user, 1, :name => 'buh' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+
+      it 'user with root' do
+        
+        rest_client.response_payload = '{ "user": { "id": 1, "name": "bla" } }'
+        
+        u = subject.create( *user, 1, :name => 'buh' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+    end
+  end
+
+  describe 'delete' do
+    [ User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user' do
+        
+        subject.delete( *user, 1 ).send_it.must_be_nil
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+    end
+  end
+end

data/spec/rest_resource_spec.rb~

@@ -0,0 +1,173 @@
+require 'ixtlan/remote/rest_resource'
+require 'ixtlan/remote/server'
+require 'json'
+class RestClientMock
+
+  def [](path)
+    @path = path
+    self
+  end
+  
+  attr_reader :path
+  attr_accessor :response_payload
+  
+  def response_payload( *args )
+    @response_payload
+  end
+
+  alias :post :response_payload
+  alias :put :response_payload
+  alias :delete :response_payload
+
+end
+class User
+  
+  def initialize( args = {} )
+    @id = (args || {})['id'].to_i
+    @name = (args || {})['name']
+  end
+
+  attr_reader :id, :name
+
+  def attributes
+    {'id' => @id, 'name' => @name }
+  end
+end
+ClientUser = User
+
+describe Ixtlan::Remote::RestResource do
+
+  subject do
+    Ixtlan::Remote::RestResource.new( rest_client, 
+                                      { User => Ixtlan::Remote::Server::Meta.new( nil, User.method(:new) ), 
+                                        ClientUser =>  Ixtlan::Remote::Server::Meta.new( :users, ClientUser.method(:new) ) } )
+  end
+ 
+  let( :rest_client ) { ::RestClientMock.new }
+
+  describe 'create' do
+    [ User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user without root' do
+        
+        rest_client.response_payload = '{ "id": 1, "name": "bla" }'
+        
+        u = subject.create( *user, :name => 'bla' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end
+      
+      it 'user with root' do
+        
+        rest_client.response_payload = '{ "user": { "id": 1, "name": "bla" } }'
+        
+        u = subject.create( *user, :name => 'bla' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end
+    end
+  end
+
+  describe 'retrieve' do
+    [ User.new('id' => 1), User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user without root' do
+        
+        rest_client.response_payload = '{ "id": 1, "name": "bla" }'
+        
+        u = subject.create( *user, 1 ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+      
+      it 'users without root' do
+        
+        rest_client.response_payload = '[ { "id": 1, "name": "bla" }, { "id": 2, "name": "blabla" } ]'
+        
+        u = subject.create( *user ).send_it
+        u.size.must_equal 2
+        u[0].id.must_equal 1
+        u[0].name.must_equal 'bla'
+        u[1].id.must_equal 2
+        u[1].name.must_equal 'blabla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end
+
+      it 'user with root' do
+        
+        rest_client.response_payload = '{ "user": { "id": 1, "name": "bla" } }'
+        
+        u = subject.create( *user, 1 ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+
+      it 'users with root' do
+        
+        rest_client.response_payload = '[ { "user": { "id": 1, "name": "bla" } }, { "user": { "id": 2, "name": "blabla" } } ]'
+        
+        u = subject.create( *user ).send_it
+        u.size.must_equal 2
+        u[0].id.must_equal 1
+        u[0].name.must_equal 'bla'
+        u[1].id.must_equal 2
+        u[1].name.must_equal 'blabla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users$/
+      end       
+    end
+  end
+
+  describe 'update' do
+    [ User.new('id' => 1), User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user without root' do
+        
+        rest_client.response_payload = '{ "id": 1, "name": "bla" }'
+        
+        u = subject.update( *user, 1, :name => 'buh' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+
+      it 'user with root' do
+        
+        rest_client.response_payload = '{ "user": { "id": 1, "name": "bla" } }'
+        
+        u = subject.create( *user, 1, :name => 'buh' ).send_it
+        u.id.must_equal 1
+        u.name.must_equal 'bla'
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+    end
+  end
+
+  describe 'delete' do
+    [ User, :users, "users", ["admins", 1, User], ["admins/1", User], ClientUser ].each do |user|
+      it 'user' do
+        
+        subject.delete( *user, 1 ).send_it.must_be_nil
+        
+        subject.model.must_equal User
+        rest_client.path.must_match /(.*\/)?users\/1$/
+      end
+    end
+  end
+end

data/spec/rest_spec.rb

@@ -0,0 +1,94 @@
+require 'ixtlan/remote/sync'
+require 'ixtlan/remote/rest'
+require 'dm-migrations'
+require 'dm-sqlite-adapter'
+require 'webmock/minitest'
+
+class Admin
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :name, String
+end
+DataMapper.setup(:default, "sqlite::memory:")
+Admin.auto_migrate!
+
+describe Ixtlan::Remote::Rest do
+  subject do
+    factory = Ixtlan::Remote::Rest.new
+    factory.server( :users ) do |s|
+      s.url = baseurl
+      s.add_model( Admin )
+    end
+    factory
+  end
+
+  let( :baseurl ) { 'http://www.example.com' }
+  let( :headers ) { { 'Accept'=>'application/json', 'Accept-Encoding'=>'gzip, deflate', 'Content-Type'=>'application/json' }}#, 'User-Agent'=>'Ruby' } }
+  let( :url ) { baseurl + "/admins/" }
+  let( :stub_get ) { stub_request(:get, url ).with(:headers => headers ) }
+  let( :stub_get432 ) { stub_request(:get, url + "432" ).with(:headers => headers ) }
+  let( :stub_post ) { stub_request(:post, url ) }
+  let( :stub_put ) { stub_request(:put, url + "1" ) }
+  let( :stub_delete ) { stub_request(:delete, url + "1" ) }
+
+  [ Admin, :admins, 'admins' ].each do |admin|
+    it 'retrieve collection' do
+      stub_get.to_return(:status => 200, :body => '[ {"id": 123, "name": "bla" } ]', :headers => {})
+
+      a = subject.retrieve( admin ).first
+
+      a.new?.must_equal true
+      a.id.must_equal 123
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ [ Admin, 432 ], [ :admins, 432 ], [ 'admins', 432 ] ].each do |admin|
+    it 'retrieve entity' do
+      stub_get432.to_return(:status => 200, :body => '[ {"id": 123, "name": "bla" } ]', :headers => {})
+
+      a = subject.retrieve( *admin ).first
+
+      a.new?.must_equal true
+      a.id.must_equal 123
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ Admin.new( :name => 'something' ), [ Admin, { :name => 'something' } ], [ :admins, { :name => 'something' } ], [ 'admins', { :name => 'something' } ] ].each do |admin|
+    it 'create' do
+      stub_post.with( :body => "{\"name\":\"something\"}", :headers => headers ).to_return( :status => 200, :body => '{"id": 111, "name": "bla" }' )
+     
+      a = subject.create( *admin )
+
+      a.new?.must_equal true
+      a.id.must_equal 111
+      a.name.must_equal 'bla'
+    end
+  end
+
+  DATA = { :id => 1, :name => 'something' } 
+  [ Admin.new( :id => 1, :name => 'something' ), [ Admin, 1, DATA ], [ :admins, 1, DATA], [ 'admins', 1, DATA ] ].each do |admin|
+    it 'update' do
+      stub_put.with( :body => DATA.to_json, :headers => headers.merge({'Content-Length'=>'27'}) ).to_return( :status => 200, :body => '{"id": 111, "name": "bla" }' )
+     
+      a = subject.update( *admin )
+
+      a.new?.must_equal true
+      a.id.must_equal 111
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ Admin.new( :id => 1, :name => 'something' ), [ Admin, 1, { :id => 1, :name => 'something' } ], [ :admins, 1, { :id => 1, :name => 'something' } ], [ 'admins', 1, { :id => 1, :name => 'something' } ] ].each do |admin|
+    it 'delete' do
+      stub_delete.with( :headers => headers ).to_return( :status => 200 )
+     
+      a = subject.delete( *admin )
+
+      a.must_be_nil
+    end
+  end
+
+end

data/spec/rest_spec.rb~

@@ -0,0 +1,99 @@
+require 'ixtlan/remote/sync'
+require 'ixtlan/remote/rest'
+require 'dm-migrations'
+require 'dm-sqlite-adapter'
+require 'webmock/minitest'
+
+class Admin
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :name, String
+end
+DataMapper.setup(:default, "sqlite::memory:")
+Admin.auto_migrate!
+
+describe Ixtlan::Remote::Rest do
+  subject do
+    factory = Ixtlan::Remote::Rest.new
+    factory.server( :users ) do |s|
+      s.url = baseurl
+      s.add_model( Admin )
+    end
+    factory
+  end
+
+  let( :baseurl ) { 'http://www.example.com' }
+  let( :headers ) { { 'Accept'=>'application/json', 'Accept-Encoding'=>'gzip, deflate', 'Content-Type'=>'application/json', 'User-Agent'=>'Ruby' } }
+  let( :url ) { p baseurl; baseurl + "/admins" }
+  let( :stub_get ) { stub_request(:get, url ).with(:headers => headers ) }
+  let( :stub_get432 ) { stub_request(:get, url + "/432" ).with(:headers => headers ) }
+  let( :stub_post ) { stub_request(:post, url ) }
+  let( :stub_put ) { stub_request(:put, url + "/1" ) }
+  let( :stub_delete ) { stub_request(:put, url + "/1" ) }
+
+  [ Admin, :admins, 'admins' ].each do |admin|
+    it 'retrieve collection' do
+      stub_get.to_return(:status => 200, :body => '[ {"id": 123, "name": "bla" } ]', :headers => {})
+
+      a = subject.retrieve( admin ).first
+
+      a.new?.must_equal true
+      a.id.must_equal 123
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ [ Admin, 432 ], [ :admins, 432 ], [ 'admins', 432 ] ].each do |admin|
+    it 'retrieve entity' do
+      stub_get432.to_return(:status => 200, :body => '[ {"id": 123, "name": "bla" } ]', :headers => {})
+
+      a = subject.retrieve( *admin ).first
+
+      a.new?.must_equal true
+      a.id.must_equal 123
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ Admin.new( :name => 'something' ), [ Admin, { :name => 'something' } ], [ :admins, { :name => 'something' } ], [ 'admins', { :name => 'something' } ] ].each do |admin|
+    it 'create' do
+      stub_post
+        .with( :body => "{\"name\":\"something\"}", :headers => headers )
+        .to_return( :status => 200, :body => '{"id": 111, "name": "bla" }' )
+     
+      a = subject.create( *admin )
+
+      a.new?.must_equal true
+      a.id.must_equal 111
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ Admin.new( :id => 1, :name => 'something' ), [ Admin, 1, { :id => 1, :name => 'something' } ], [ :admins, 1, { :id => 1, :name => 'something' } ], [ 'admins', 1, { :id => 1, :name => 'something' } ] ].each do |admin|
+    it 'update' do
+      stub_put
+        .with( :body => "{\"id\":1,\"name\":\"something\"}", :headers => headers )
+        .to_return( :status => 200, :body => '{"id": 111, "name": "bla" }' )
+     
+      a = subject.update( *admin )
+
+      a.new?.must_equal true
+      a.id.must_equal 111
+      a.name.must_equal 'bla'
+    end
+  end
+
+  [ Admin.new( :id => 1, :name => 'something' ), [ Admin, 1, { :id => 1, :name => 'something' } ], [ :admins, 1, { :id => 1, :name => 'something' } ], [ 'admins', 1, { :id => 1, :name => 'something' } ] ].each do |admin|
+    it 'delete' do
+      stub_delete
+        .with( :body => "{\"id\":1,\"name\":\"something\"}", :headers => headers )
+        .to_return( :status => 200 )
+     
+      a = subject.update( *admin )
+
+      a.must_be_nil
+    end
+  end
+
+end