kangaroo 0.0.3 → 0.1.0.alpha1

data/spec/functional/exception_handling_spec.rb

@@ -0,0 +1,18 @@
+require 'spec_helper'
+
+module Kangaroo
+  describe 'Exception handling' do
+    before :all do
+      @config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      @config.login
+  
+      Kangaroo::Util::Loader.new('res.partner', @config.database, 'ExceptionHandlingSpec').load!
+    end
+    
+    it "catches missing methods" do
+      lambda {
+        @config.client.common.abcdef
+      }.should raise_error(NoMethodError)
+    end
+  end
+end

data/spec/functional/identity_spec.rb

@@ -0,0 +1,48 @@
+require 'spec_helper'
+
+module Kangaroo
+  describe 'Identity' do
+    before :all do
+      @config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      @config.login
+  
+      Kangaroo::Util::Loader.new('res.partner', @config.database, 'IdentitySpec').load!
+    end
+
+    it ': Instances of same OpenERP object are considered equal' do
+      a = IdentitySpec::Res::Partner.first
+      b = IdentitySpec::Res::Partner.first
+      
+      a.should == b
+    end
+    
+    it ': Instances of different OpenERP objects are not equal' do
+      a, b = IdentitySpec::Res::Partner.all[0, 2]
+      
+      a.should_not == b
+    end
+    
+    it ': New records are not equal to anything' do
+      a = IdentitySpec::Res::Partner.first
+      b = IdentitySpec::Res::Partner.new
+      c = IdentitySpec::Res::Partner.new
+      
+      a.should_not == b
+      b.should_not == c
+    end
+    
+    it ': Instances of different models are always not equal' do
+      a = IdentitySpec::Res::Partner.find 1
+      b = IdentitySpec::Res::Country.find 1
+      
+      a.should_not == b
+    end
+    
+    it ': Arrays of same instances should be equal' do
+      a = IdentitySpec::Res::Partner.first
+      b = IdentitySpec::Res::Partner.first
+      
+      [a].should == [b]
+    end
+  end
+end

data/spec/functional/import_export_spec.rb

@@ -0,0 +1,39 @@
+require 'spec_helper'
+
+module Kangaroo
+  describe 'Import / Export' do
+    before :all do
+      @config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      @config.login
+  
+      Kangaroo::Util::Loader.new('res.partner', @config.database, 'ImportExportSpec').load!
+    end
+    
+    after :each do
+      @cleanup && @cleanup.call
+    end
+    
+    it 'exports records' do
+      ids = ImportExportSpec::Res::Partner.select(:id).limit(3).all.map &:id
+      
+      exported = ImportExportSpec::Res::Partner.export_data ids, [:name, :id]
+      
+      exported.should be_a(Array)
+      exported.first.should be_a(Array)
+      exported.first.length.should == 2
+    end
+    
+    it 'imports records' do
+      name = ImportExportSpec::Res::Partner.find(1).name
+      
+      @cleanup = lambda do
+        partner = ImportExportSpec::Res::Partner.find(1)
+        partner.name = name
+        partner.save!
+      end
+      
+      ImportExportSpec::Res::Partner.import_data [".id", "name"], [[1, "XYZ"]]
+      ImportExportSpec::Res::Partner.find(1).name.should == "XYZ"
+    end
+  end
+end

data/spec/functional/lazy_loading_spec.rb

@@ -1,41 +1,48 @@
 require 'spec_helper'
 
-
 module Kangaroo
   describe 'Lazy Loading' do
     before :all do
       config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
       config.login
   
-      Kangaroo::Util::Loader.new('res.partner', config.database).load!
+      Kangaroo::Util::Loader.new('res.partner', config.database, 'LazyLoadSpec').load!
     end
     
-    it 'should raise error if trying to access constant without corresponding OpenERP Model' do
+    it 'raises an error if trying to access constant without corresponding OpenERP Model' do
       lambda {
-        Oo::Abcd
+        LazyLoadSpec::Abcd
       }.should raise_error
       
       lambda {
-        Oo::Res::Bcde
+        LazyLoadSpec::Res::Bcde
       }.should raise_error
     end
     
-    it 'should lazy load additional models in an OpenERP namespace' do
+    it 'lazy loads additional models in an OpenERP namespace' do
+      lambda {
+        LazyLoadSpec::Res::Country
+      }.should_not raise_error
+    end
+    
+    it 'creates namespace modules on demand' do
       lambda {
-        Oo::Res::Country
+        LazyLoadSpec::Product
       }.should_not raise_error
     end
     
-    it 'should create namespace modules on demand' do
+    it 'lazy loads missing models in other namespaces' do
       lambda {
-        Oo::Product
+        LazyLoadSpec::Product::Product
       }.should_not raise_error
     end
     
-    it 'should lazy load missing models in other namespaces' do
+    it 'lazy loads nested models' do
       lambda {
-        Oo::Product::Product
+        LazyLoadSpec::Sale::Order::Line
       }.should_not raise_error
+      
+      LazyLoadSpec::Sale::Order.should be_a(Class)
     end
   end
 end

data/spec/functional/ordering_spec.rb

@@ -0,0 +1,33 @@
+require 'spec_helper'
+
+module Kangaroo
+  describe 'Ordering' do
+    before :all do
+      @config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      @config.login
+  
+      Kangaroo::Util::Loader.new('res.partner', @config.database, 'OrderingSpec').load!
+    end
+
+    it 'can order by id descending' do
+      partners = OrderingSpec::Res::Partner.order('id desc').select(:id).all
+      
+      partners[1..-1].each_with_index do |p, i|
+        partners[i].id.should > p.id
+      end
+    end
+    
+    it 'can reverse queries with default ordering' do
+      partners = OrderingSpec::Res::Partner.select(:id).all
+      reversed_partners = OrderingSpec::Res::Partner.reverse.select(:id).all
+      
+      partners.should == reversed_partners.reverse
+    end
+    
+    it 'can return last element' do
+      last = OrderingSpec::Res::Partner.last
+      
+      last.should == OrderingSpec::Res::Partner.all.last
+    end
+  end
+end

data/spec/functional/readonly_attributes_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+
+module Kangaroo
+  module Model
+    describe ReadonlyAttributes do
+      before :all do
+        config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+        config.login
+  
+        Kangaroo::Util::Loader.new('res.partner', config.database, 'ReadonlyAttributesSpec').load!
+      end
+      
+      it 'raises error if trying to write readonly attributes' do
+        sale_order = ReadonlyAttributesSpec.by_xml_id :sale, :order
+        
+        ReadonlyAttributesSpec::Sale::Order.fields_hash[:amount_untaxed].readonly?.should == true
+        
+        lambda {
+          sale_order.amount_untaxed = 200
+        }.should raise_error
+      end
+      
+      it 'does not raise error if in state where writing is allowed' do
+        sale_order = ReadonlyAttributesSpec.by_xml_id :sale, :order
+        
+        # Asserting the assumptions, in case OpenERPs demo data changes
+        ReadonlyAttributesSpec::Sale::Order.fields_hash[:name].readonly?.should == true
+        ReadonlyAttributesSpec::Sale::Order.fields_hash[:name].readonly_in?('draft').should == false
+        sale_order.state.should == 'draft'
+        
+        lambda {
+          sale_order.name = "abcd"
+        }.should_not raise_error
+      end
+    end
+  end
+end

data/spec/functional/required_attributes_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+
+module Kangaroo
+  describe Model::RequiredAttributes do
+    before :all do
+      config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      config.login
+  
+      Kangaroo::Util::Loader.new('res.country', config.database, 'RequiredAttributesSpec').load!
+    end
+    
+    after :each do
+      @cleanup && @cleanup.call
+    end
+    
+    it 'validates required fields' do
+      c = RequiredAttributesSpec::Res::Country.new :name => 'ABCXYZ'
+      
+      c.valid?.should_not == true
+      c.errors.keys.should include :code
+    end
+    
+    it 'refuses to save invalid records' do
+      a = RequiredAttributesSpec::Res::Country.where(:name => 'ABCXYZ').first
+      a && a.destroy
+      
+      c = RequiredAttributesSpec::Res::Country.new :name => 'ABCXYZ'
+      
+      c.save.should_not == true
+      c.errors.keys.should include :code
+      
+      lambda {
+        c.save!
+      }.should raise_error
+    end
+  end
+end

data/spec/functional/root_namespace_spec.rb

@@ -0,0 +1,19 @@
+require 'spec_helper'
+
+module Kangaroo
+  describe 'Root namespace' do
+    before :all do
+      config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      config.login
+  
+      Kangaroo::Util::Loader.new('res.partner', config.database, 'RootNamespaceSpec').load!
+    end
+    
+    it "gets objects by xml id" do
+      country = RootNamespaceSpec.by_xml_id :base, :de
+      
+      country.should be_a(RootNamespaceSpec::Res::Country)
+      country.code.should == 'DE'
+    end
+  end
+end

data/spec/functional/select_relation_spec.rb

@@ -0,0 +1,26 @@
+require 'spec_helper'
+
+
+module Kangaroo
+  describe 'Select Relation' do
+    before :all do
+      config = Kangaroo::Util::Configuration.new 'spec/test_env/test.yml'
+      config.login
+  
+      Kangaroo::Util::Loader.new('res.partner', config.database, 'SelectRelationSpec').load!
+    end
+    
+    it 'adjusts "attribute_names" when record is fetched with select clause' do
+      partner = SelectRelationSpec::Res::Partner.select(:lang, :email).first
+      
+      partner.attribute_names.should =~ %w(lang email)
+      SelectRelationSpec::Res::Partner.attribute_names.count.should > 2
+    end
+    
+    it 'returns only selected attributes' do
+      partner = SelectRelationSpec::Res::Partner.select(:lang, :email).first
+      
+      partner.attributes.keys.should =~ %w(lang email)
+    end
+  end
+end

data/spec/model/attributes_spec.rb

@@ -6,6 +6,7 @@ module Kangaroo
     describe Attributes do
       before :all do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
       end
 

data/spec/model/base_spec.rb

@@ -6,6 +6,7 @@ module Kangaroo
     describe Base do
       before :all do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
       end
 

data/spec/model/default_attributes_spec.rb

@@ -4,8 +4,9 @@ require 'kangaroo/model/base'
 module Kangaroo
   module Model
     describe DefaultAttributes do
-      before :all do
+      before :each do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
       end
 
@@ -24,6 +25,7 @@ module Kangaroo
 
       it 'fetches default values via default_get on the object service' do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
         @klass.field_names = %w(a b)
         @klass.stub!(:remote).and_return mock('object_service')

data/spec/model/finder_spec.rb

@@ -8,6 +8,7 @@ module Kangaroo
 
       before :each do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
         @klass.stub!(:default_attributes).and_return({})
         @remote_stub = mock 'remote'
@@ -91,7 +92,7 @@ module Kangaroo
           @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).

data/spec/model/inspector_spec.rb

@@ -6,6 +6,7 @@ module Kangaroo
     describe Inspector do
       before :all do
         SomeClass = Class.new(Kangaroo::Model::Base)
+        SomeClass.stub!(:fields_hash).and_return({})
         SomeClass.define_multiple_accessors :first_attribute, :second_attribute
       end
 

data/spec/model/open_object_orm_spec.rb

@@ -9,6 +9,7 @@ module Kangaroo
 
       before :each do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
         @klass.stub!(:default_attributes).and_return({})
         @klass.stub!(:remote).and_return proxy('object', 'some_class')
@@ -17,7 +18,7 @@ module Kangaroo
       describe '#read' do
         it 'reads and instantiates records' do
           object_service.stub!(:xmlrpc_call).
-            with('execute', 'some_class', 'read', [1], ['a', 'b']).
+            with('execute', 'some_class', 'read', [1], ['a', 'b'], false).
             and_return([{:a => 'one', :id => 1}])
           @klass.read([1], :fields => ['a', 'b']).first.a.should == 'one'
         end
@@ -29,7 +30,9 @@ module Kangaroo
         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']).
+          object_service.
+            should_receive(:xmlrpc_call).
+            with('execute', 'some_class', 'read', [1], ['a', 'b'], false).
             and_return([{:a => 'one', :id => 1}])
           @klass.read([1])
         end

data/spec/model/persistence_spec.rb

@@ -7,6 +7,7 @@ module Kangaroo
 
       before :each do
         @klass = Class.new(Kangaroo::Model::Base)
+        @klass.stub!(:fields_hash).and_return({})
         @klass.define_multiple_accessors :a, :b
         @klass.stub!(:default_attributes).and_return({})
       end

data/spec/model/relation_spec.rb

@@ -72,8 +72,8 @@ module Kangaroo
       end
 
       describe '#reverse' do
-        it 'adds descending id order if no order was specified' do
-          @relation.reverse.order_clause.should == ['id desc']
+        it 'sets the reverse flag if no order was specified' do
+          @relation.reverse.reverse_flag.should == true
         end
 
         it 'reverses previously specified orders' do