kangaroo 0.0.1.pre

data/lib/kangaroo/util/proxy/wizard.rb

@@ -0,0 +1,25 @@
+module Kangaroo
+  module Util
+    class Proxy::Wizard < Proxy
+      # Create Wizard
+      #
+      # @param [String] name wizard name to create
+      # @param [Hash] datas
+      # @return [Number] id of created wizard
+      def create name, datas = {}
+        call! :create, name, datas
+      end
+
+      # Execute an action on a wizard
+      #
+      # @param [Number] id wizard id
+      # @param [Hash] datas
+      # @param [String] action
+      # @param [Hash] context
+      # @return return value of action
+      def execute id, datas, action = 'init', context = {}
+        call! :execute, id, datas, action, context
+      end
+    end
+  end
+end

data/lib/kangaroo/util/proxy/workflow.rb

@@ -0,0 +1,14 @@
+module Kangaroo
+  module Util
+    class Proxy::Workflow < Proxy
+      # Advance workflow via exec_workflow on OpenERPs object service.
+      #
+      # @param name function name to call
+      # @param model_name OpenERP model to execute the function on
+      # @return returned value
+      def call! name, model_name, id
+        super :exec_workflow, model_name, id, name
+      end
+    end
+  end
+end

data/lib/kangaroo/version.rb

@@ -0,0 +1,3 @@
+module Kangaroo
+  VERSION = "0.0.1.pre"
+end

data/spec/model/attributes_spec.rb

@@ -0,0 +1,70 @@
+require 'spec_helper'
+require 'kangaroo/model/base'
+
+module Kangaroo
+  module Model
+    describe Attributes do
+      before :all do
+        @klass = Class.new(Kangaroo::Model::Base)
+        @klass.define_multiple_accessors :a, :b
+      end
+
+      before :each do
+        @klass.stub!(:default_attributes).and_return({})
+      end
+
+      it 'stores the attribute names' do
+        @klass.attribute_names.should == ['a', 'b']
+      end
+
+      it 'allows to read attributes via read_attribute' do
+        @object = @klass.new :a => 'one'
+        @object.read_attribute(:a).should == 'one'
+      end
+
+      it 'allows to read attributes via getters' do
+        @object = @klass.new :a => 'one'
+        @object.a.should == 'one'
+      end
+
+      it 'allows to write attributes via write_attribute' do
+        @object = @klass.new :a => 'one'
+        @object.write_attribute :a, 'two'
+        @object.a.should == 'two'
+      end
+
+      it 'allows to write attributes via setters' do
+        @object = @klass.new :a => 'one'
+        @object.a = 'two'
+        @object.a.should == 'two'
+      end
+
+      it 'allows to mass assign attributes via #attributes=' do
+        @object = @klass.new
+        @object.attributes = {:a => 'one'}
+        @object.a.should == 'one'
+      end
+
+      it 'allows to read all attributes via #attributes' do
+        @object = @klass.new :a => 'one'
+        @object.attributes['a'].should == 'one'
+      end
+
+      describe 'ActiveModel::Dirty behavior' do
+        it 'marks changed attributes and stores old value' do
+          @object = @klass.new :a => 'one'
+          @object.a = 'two'
+          @object.should be_changed
+          @object.a_was.should == 'one'
+          @object.should be_a_changed
+        end
+
+        it 'marks initial values as changed' do
+          @object = @klass.new :a => 'one'
+          @object.should be_changed
+          @object.should be_a_changed
+        end
+      end
+    end
+  end
+end

data/spec/model/base_spec.rb

@@ -0,0 +1,19 @@
+require 'spec_helper'
+require 'kangaroo/model/base'
+
+module Kangaroo
+  module Model
+    describe Base do
+      before :all do
+        @klass = Class.new(Kangaroo::Model::Base)
+        @klass.define_multiple_accessors :a, :b
+      end
+
+      it 'sets attributes on initialization' do
+        @klass.stub!(:default_attributes).and_return({})
+        @object = @klass.new :a => 'one'
+        @object.instance_variable_get('@attributes')['a'].should == 'one'
+      end
+    end
+  end
+end

data/spec/model/default_attributes_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+require 'kangaroo/model/base'
+
+module Kangaroo
+  module Model
+    describe DefaultAttributes do
+      before :all do
+        @klass = Class.new(Kangaroo::Model::Base)
+        @klass.define_multiple_accessors :a, :b
+      end
+
+      it 'sets default values on initialization' do
+        @klass.stub!(:default_attributes).and_return(:a => 'one')
+        @object = @klass.new
+        @object.a.should == 'one'
+        @object.should be_a_changed
+      end
+
+      it 'sets default values before initial values' do
+        @klass.stub!(:default_attributes).and_return(:a => 'one')
+        @object = @klass.new :a => 'two'
+        @object.a.should == 'two'
+      end
+
+      it 'fetches default values via default_get on the object service' do
+        @klass = Class.new(Kangaroo::Model::Base)
+        @klass.define_multiple_accessors :a, :b
+        @klass.field_names = %w(a b)
+        @klass.stub!(:remote).and_return mock('object_service')
+        @klass.remote.should_receive(:default_get).with(%w(a b), anything).and_return :a => 'one', :b => 'two'
+        @object = @klass.new
+        @object.a.should == 'one'
+        @object.b.should == 'two'
+      end
+    end
+  end
+end

data/spec/model/finder_spec.rb

@@ -0,0 +1,104 @@
+require 'spec_helper'
+require 'kangaroo/model/base'
+
+module Kangaroo
+  module Model
+    describe Finder do
+      include SpecHelper
+
+      before :each do
+        @klass = Class.new(Kangaroo::Model::Base)
+        @klass.define_multiple_accessors :a, :b
+        @klass.stub!(:default_attributes).and_return({})
+        @remote_stub = mock 'remote'
+        @klass.stub!(:remote).and_return @remote_stub
+      end
+
+      describe 'relational #all' do
+        it 'allows specifying conditions via #where' do
+          @remote_stub.should_receive(:search).with([["a", "=", "one"]], *anythings(5)).
+            and_return [1]
+          @remote_stub.stub!(:read).and_return [{:a => 'one', :id => 1}]
+          @klass.where(:a => 'one').all
+        end
+
+        it 'allows specifying a limit via #limit' do
+          @remote_stub.should_receive(:search).with([], nil, 10, *anythings(3)).
+            and_return [1]
+          @remote_stub.stub!(:read).and_return [{:a => 'one', :id => 1}]
+          @klass.limit(10).all
+        end
+
+        it 'allows specifying an offset via #offset' do
+          @remote_stub.should_receive(:search).with([], 10, nil, *anythings(3)).
+            and_return [1]
+          @remote_stub.stub!(:read).and_return [{:a => 'one', :id => 1}]
+          @klass.offset(10).all
+        end
+
+        it 'allows specifying a sort order via #order' do
+          @remote_stub.should_receive(:search).with([], nil, nil, 'a', *anythings(2)).
+            and_return [1]
+          @remote_stub.stub!(:read).and_return [{:a => 'one', :id => 1}]
+          @klass.order('a').all
+        end
+
+        it 'allows specifying descending sort order via #order(column, true)' do
+          @remote_stub.should_receive(:search).with([], nil, nil, 'a desc', *anythings(2)).
+            and_return [1]
+          @remote_stub.stub!(:read).and_return [{:a => 'one', :id => 1}]
+          @klass.order('a', true).all
+        end
+
+        it 'allows specifying fields to read via #select' do
+          @remote_stub.stub!(:search).and_return [1]
+          @remote_stub.should_receive(:read).with([1], ['a'], {}).
+            and_return [{:a => 'one', :id => 1}]
+          @klass.select('a').all
+        end
+
+        it 'allows specifying the context via #context' do
+          @remote_stub.stub!(:search).and_return [1]
+          @remote_stub.should_receive(:read).
+            with([1], ['a', 'b'], :lang => 'de_DE').
+            and_return [{:a => 'one', :id => 1}]
+          @klass.context(:lang => 'de_DE').all
+        end
+      end
+
+      it 'relational #count returns number of records fulfilling the conditions' do
+        @remote_stub.should_receive(:search).with([['a', '=', 'one']],  *anythings(5)).
+          and_return 5
+        @klass.where(:a => 'one').count.should == 5
+      end
+
+      describe '#all' do
+        it 'searches for all records, and reads all attributes' do
+          @remote_stub.should_receive(:search).with([], *anythings(5)).
+            and_return [1, 2]
+          @remote_stub.should_receive(:read).with([1, 2], ['a', 'b'], anything).
+            and_return [{:id => 1, :a => 'one'}, {:id => 2, :a => 'two'}]
+          @klass.all
+        end
+      end
+
+      describe '#first' do
+        it 'searches for 1 record, and reads all attributes' do
+          @remote_stub.should_receive(:search).with([], nil, 1, *anythings(3)).
+            and_return [1]
+          @remote_stub.should_receive(:read).with([1], ['a', 'b'], anything).
+            and_return [{:id => 1, :a => 'one'}]
+          @klass.first
+        end
+      end
+
+      describe '#count' do
+        it 'only counts how many records are present' do
+          @remote_stub.should_receive(:search).with([], 0, anything, anything, anything, true).
+            and_return 2
+          @klass.count
+        end
+      end
+    end
+  end
+end

data/spec/model/inspector_spec.rb

@@ -0,0 +1,56 @@
+require 'spec_helper'
+require 'kangaroo/model/base'
+
+module Kangaroo
+  module Model
+    describe Inspector do
+      before :all do
+        SomeClass = Class.new(Kangaroo::Model::Base)
+        SomeClass.define_multiple_accessors :first_attribute, :second_attribute
+      end
+
+      before :each do
+        SomeClass.stub!(:default_attributes).and_return({})
+      end
+
+      context 'Class#inspect' do
+        it 'includes attribute names' do
+          SomeClass.inspect.should include('first_attribute')
+          SomeClass.inspect.should include('second_attribute')
+        end
+
+        it 'includes class name' do
+          SomeClass.inspect.should include('SomeClass')
+        end
+
+        it 'includes id' do
+          SomeClass.inspect.should include('id')
+        end
+      end
+
+      context 'Object#inspect' do
+        before :each do
+          @object = SomeClass.new :first_attribute => 'one', :second_attribute => 'two'
+        end
+
+        it 'includes attribute names and values' do
+          @object.inspect.should include('first_attribute: "one"')
+          @object.inspect.should include('second_attribute: "two"')
+        end
+
+        it 'includes class name' do
+          @object.inspect.should include('SomeClass')
+        end
+
+        it 'includes id' do
+          @object.instance_variable_set '@id', 3
+          @object.inspect.should include('id: 3')
+        end
+
+        it 'includes id: nil on new records' do
+          @object.inspect.should include('id: nil')
+        end
+      end
+    end
+  end
+end

data/spec/model/open_object_orm_spec.rb

@@ -0,0 +1,134 @@
+require 'spec_helper'
+require 'server_helper'
+require 'kangaroo/model/base'
+
+module Kangaroo
+  module Model
+    describe OpenObjectOrm do
+      include TestServerHelper
+
+      before :each do
+        @klass = Class.new(Kangaroo::Model::Base)
+        @klass.define_multiple_accessors :a, :b
+        @klass.stub!(:default_attributes).and_return({})
+        @klass.stub!(:remote).and_return proxy('object', 'some_class')
+      end
+
+      describe '#read' do
+        it 'reads and instantiates records' do
+          object_service.stub!(:xmlrpc_call).
+            with('execute', 'some_class', 'read', [1], ['a', 'b']).
+            and_return([{:a => 'one', :id => 1}])
+          @klass.read([1], :fields => ['a', 'b']).first.a.should == 'one'
+        end
+
+        it 'passes on the "context"' do
+          object_service.stub!(:xmlrpc_call).
+            and_return([{:a => 'one', :id => 1}])
+          @klass.read([1], :fields => ['a', 'b'], :context => {:lang => 'de'}).first.context[:lang].should == 'de'
+        end
+
+        it 'uses attribute_names as default value for field list' do
+          object_service.should_receive(:xmlrpc_call).with('execute', 'some_class', 'read', [1], ['a', 'b']).
+            and_return([{:a => 'one', :id => 1}])
+          @klass.read([1])
+        end
+      end
+
+      describe '#fields_get' do
+        it 'fetches details about fields of this model' do
+          object_service.should_receive(:xmlrpc_call).with('execute', 'some_class', 'fields_get', ['a'], false).
+            and_return({:a => {:type => "selection"}})
+          @klass.fields_get(:fields => ['a']).first.read_attribute(:type).should == 'selection'
+        end
+
+        it 'stores the name in the Field model' do
+          object_service.should_receive(:xmlrpc_call).with('execute', 'some_class', 'fields_get', ['a'], false).
+            and_return({:a => {:type => "selection"}})
+          @klass.fields_get(:fields => ['a']).first.name.should == :a
+        end
+
+        it 'uses attribute_names as default value for field list' do
+          object_service.should_receive(:xmlrpc_call).
+            with('execute', 'some_class', 'fields_get', ['a', 'b'], false).
+            and_return({:a => {:type => 'selection'}})
+          @klass.fields_get
+        end
+      end
+
+      describe '#search' do
+        it 'delegates search calls with array conditions to object service' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, false, false, false, false
+          @klass.search [['a', '=', 'one']]
+        end
+
+        it 'allows empty conditions' do
+          object_service.should_receive(:xmlrpc_call).exactly(4).times.
+            with 'execute', 'some_class', 'search', [], 0, false, false, false, false
+          @klass.search []
+          @klass.search ''
+          @klass.search nil
+          @klass.search({})
+        end
+
+        it 'converts simple hash conditions' do
+          object_service.should_receive(:xmlrpc_call).twice.
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, false, false, false, false
+          @klass.search [:a => 'one']
+          @klass.search :a => 'one'
+        end
+
+        it 'converts array hash conditions' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', 'in', ['one', 'two']]], 0, false, false, false, false
+          @klass.search :a => ['one', 'two']
+        end
+
+        describe 'string conditions' do
+          it 'parses equal to string condition' do
+            object_service.should_receive(:xmlrpc_call).
+              with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, false, false, false, false
+            @klass.search "a = one"
+          end
+
+          it 'parses "not in" condition' do
+            object_service.should_receive(:xmlrpc_call).
+              with 'execute', 'some_class', 'search', [['a', 'not in', 'one']], 0, false, false, false, false
+            @klass.search "a not in one"
+          end
+        end
+
+        it 'accepts a limit option' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, 20, false, false, false
+          @klass.search 'a = one', :limit => 20
+        end
+
+        it 'accepts a offset option' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 10, false, false, false, false
+          @klass.search 'a = one', :offset => 10
+        end
+
+        it 'accepts a context option' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, false, false, {"a" => 'b'}, false
+          @klass.search 'a = one', :context => {:a => 'b'}
+        end
+
+        it 'accepts an order option' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, false, 'b', false, false
+          @klass.search 'a = one', :order => 'b'
+        end
+
+        it 'accepts a count option' do
+          object_service.should_receive(:xmlrpc_call).
+            with 'execute', 'some_class', 'search', [['a', '=', 'one']], 0, false, false, false, true
+          @klass.search 'a = one', :count => true
+        end
+      end
+    end
+  end
+end