rtm 0.1.6 → 0.2

data/spec/rtm/sugar/topic/hash_access_spec.rb

@@ -0,0 +1,234 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../../../spec_helper'
+
+module RTM::Sugar::Topic::HashAccess
+  
+  describe self do
+    before(:each) do
+      @tm = get_used_tm_sys_tm
+    end
+    after(:each) do
+      @tm.close
+    end
+    describe "#[]" do
+      before(:each) do
+        @topic1 = @tm.get!("Hans")
+        @name1 = @topic1.create_name("Hans")
+        @name2 = @topic1.create_name("first","George",["en","always"])
+        @name3 = @topic1.create_name("last","Meyer",["underground"])
+        @occ1  = @topic1.create_occurrence("Heimat","Sachsen",:scope => ["de"])
+        @occ2  = @topic1.create_occurrence("Heimat","Germany",:scope => ["de","always"])
+        @occ3  = @topic1.create_occurrence("Birthyear","1969",:scope => ["always"])
+        @occ4  = @topic1.create_occurrence("parents","none")
+      end
+      it "should give back an Occurrence of the specified type, in an Array, if the argument is a Topic" do
+        @topic1[@tm.get("Something")].size.should == 0
+        @topic1[@tm.get("Heimat")].size.should == 2
+        @topic1[@tm.get("Heimat")].should include(@occ1)
+        @topic1[@tm.get("Heimat")].should include(@occ2)
+      end
+      it "should give back an empty Array if the argument is nil" do
+        @topic1[nil].should be_empty
+        @topic1.[](nil).should be_empty
+      end
+      it "should give back all occurrences of this Topic if no argument is given" do
+        @topic1[].size.should == 4
+        @topic1[].should include(@occ1)
+        @topic1[].should include(@occ2)
+        @topic1[].should include(@occ3)
+        @topic1[].should include(@occ4)
+      end
+      it "should return an array of names with default nametype if the argument equals '-'" do
+        @topic1["-"].size.should == 1
+        @topic1["-"].should include(@name1)
+      end
+      it "should give back all names that have the given name type if argument equals '-type'" do
+        @topic1["-first"].size.should == 1
+        @topic1["-first"].should include(@name2)
+      end
+      it "should give back all names that have the given name type and scope if argument equals '-type @scope" do
+        @topic1["-last @underground"].size.should == 1
+        @topic1["-last @underground"].should include(@name3)
+      end
+      it "should give back an empty Array if argument equals '-type' or '-type @scope' or '-type @scope1 scope2' but type or scope/1/2 does not exist" do
+        @topic1["-nothing"].should be_empty
+        @topic1["-first @nothing"].should be_empty
+        @topic1["-nothing @nothing"].should be_empty
+        @topic1["-first @en nothing"].should be_empty
+        @topic1["-first @nothing en"].should be_empty
+        @topic1["-nothing @nothing nothing"].should be_empty
+      end
+      it "should give back all names that have the given name type and scope if argument equals '-type @scope1 scope2" do
+        @topic1["-first @en always"].size.should == 1
+        @topic1["-first @en always"].should include(@name2)
+        @topic1["-first @en, always"].should == @topic1["-first @en always"]
+      end
+      it "should give back all occurrences that have the given occurrence type if argument equals 'type'" do
+        @topic1["Heimat"].size.should == 2
+        @topic1["Heimat"].should include(@occ1)
+        @topic1["Heimat"].should include(@occ2)
+      end
+      it "should give back all occurrences that have the given occurrence type and scope if argument equals 'type @scope'" do
+        @topic1["Heimat @de"].size.should == 2
+        @topic1["Heimat @de"].should include(@occ1)
+        @topic1["Heimat @de"].should include(@occ2)
+      end
+      it "should give back all occurrences that have the given occurrence type and scope if argument equals 'type @scope1 scope2'" do
+        @topic1["Heimat @de always"].size.should == 1
+        @topic1["Heimat @de always"].should include(@occ2)
+        @topic1["Heimat @de, always"].should == @topic1["Heimat @de always"]
+      end
+      it "should give back an empty Array if argument equals 'type' or 'type @scope' or 'type @scope1 scope2' but type or scope/1/2 does not exist" do
+        @topic1["nothing"].should be_empty
+        @topic1["first @nothing"].should be_empty
+        @topic1["nothing @nothing"].should be_empty
+        @topic1["parents @en nothing"].should be_empty
+        @topic1["parents @nothing en"].should be_empty
+        @topic1["nothing @nothing nothing"].should be_empty
+      end
+      it "should give back all name and occurrences of this Topic if argument equals '*'" do
+        @topic1["*"].size.should == 7
+      end
+      it "should give back all name and occurrences that have the given type if argument equals '*type'" do
+        name = @topic1.create_name("dummy_type","dummy_name")
+        occ = @topic1.create_occurrence("dummy_type","dummy_occ")
+        @topic1["*dummy_type"].size.should == 2
+        @topic1["*dummy_type"].should include(name)
+        @topic1["*dummy_type"].should include(occ)
+        @topic1["*first"].size.should == 1
+        @topic1["*first"].should include(@name2)
+        @topic1["*parents"].size.should == 1
+        @topic1["*parents"].should include(@occ4)
+      end
+      it "should give back all name and occurrences that have the given type and scope if argument equals '*type @scope'" do
+        name1 = @topic1.create_name("dummy_type","dummy_name1",["theme0"])
+        name2 = @topic1.create_name("dummy_type","dummy_name2",["theme1"])
+        occ1 = @topic1.create_occurrence("dummy_type","dummy_occ1", :scope => ["theme0","theme1"])
+        occ2 = @topic1.create_occurrence("dummy_type","dummy_occ2",:scope => ["theme1"])
+        @topic1["*dummy_type @theme0"].size.should == 2
+        @topic1["*dummy_type @theme0"].should include(occ1)
+        @topic1["*dummy_type @theme0"].should include(name1)
+        @topic1["*dummy_type @theme1"].size.should == 3
+        @topic1["*dummy_type @theme1"].should include(name2)
+        @topic1["*dummy_type @theme1"].should include(occ1)
+        @topic1["*dummy_type @theme1"].should include(occ2)
+      end
+      it "should give back all name and occurrences that have the given type and scope if argument equals '*type @scope1 scope2'" do
+        name1 = @topic1.create_name("dummy_type","dummy_name1",["theme0","theme1"])
+        name2 = @topic1.create_name("dummy_type","dummy_name2",["theme1"])
+        occ1 = @topic1.create_occurrence("dummy_type","dummy_occ1",:scope => ["theme0"])
+        occ2 = @topic1.create_occurrence("dummy_type","dummy_occ2",:scope => ["theme0","theme1"])
+        @topic1["*dummy_type @theme0 theme1"].size.should == 2
+        @topic1["*dummy_type @theme0 theme1"].should include(name1)
+        @topic1["*dummy_type @theme0 theme1"].should include(occ2)
+      end
+      it "should handle spaces if argument is a String" do
+        @topic1["  -   "].should == @topic1["-"]
+        @topic1["  -    first   "].should == @topic1["-first"]
+        @topic1["  -   last   @   underground"].should == @topic1["-last @underground"]
+        @topic1["  -   first   @   en   always"].should == @topic1["-first @en always"]
+        @topic1[" -   first   @   en,    always"].should == @topic1["-first @en, always"]
+        @topic1["   Heimat   "].should == @topic1["Heimat"]
+        @topic1["     Heimat @   de    "].should == @topic1["Heimat @de"]
+        @topic1["  Heimat   @  de    always     "].should == @topic1["Heimat @de always"]
+        @topic1["  *  "].should == @topic1["*"]
+      end
+      it "should give back occurrences and names whose type have item identifier" do
+        topic = @tm.get!("name_ii_test")
+        name = topic.create_name("ii:firstname_ii_test","Hans")
+        @tm.get("^firstname_ii_test").should_not be_nil
+        occ = topic.create_occurrence("ii:age_ii_test","12")
+        @tm.get("^age_ii_test").should_not be_nil
+        topic["-ii:firstname_ii_test"].size.should == 1
+        topic["-ii:firstname_ii_test"].should include name
+        topic["ii:age_ii_test"].size.should == 1
+        topic["ii:age_ii_test"].should include occ
+        topic["-firstname_ii_test"].should be_empty
+        topic["age_ii_test"].should be_empty
+        topic["*"].size.should == 2
+      end
+      it "should give back occurrences and names whose type have subject locator"
+    end
+    
+    describe "#[]=" do
+      before(:each) do
+        @topic2 = @tm.get!("Peter")
+      end
+      it "should set a name with standard name type given '-'" do
+        @topic2["-"] = "Peter"
+        @topic2["Hausnummer"] = "1"
+        @topic2.names.size.should == 1
+        @topic2.names.first.type.should == @tm.get(RTM::PSI[:name_type])
+        @topic2.names.first.value.should == "Peter"
+      end
+      it "should set a name with standard name type and scope given '- @scope'" do
+        scope = RTM::PREFIX[:language] + "german"
+        @topic2["- @" + scope] = "Peter"
+        @topic2["Hausnummer"] = "1"
+        @topic2.names.size.should == 1
+        @topic2.names.first.type.should == @tm.get(RTM::PSI[:name_type])
+        @topic2.names.first.value.should == "Peter"
+        @topic2.names.first.scope.first.should == @tm.get(scope)
+      end
+      it "should set a name with standard name type and scope (which is a qname) given '-@qname'" do
+        @tm.add_prefix("lang",RTM::PREFIX[:language])
+        @topic2["- @lang:german"] = "Peter"
+        @topic2["Hausnummer"] = "1"
+        @topic2.names.size.should == 1
+        @topic2.names.first.type.should == @tm.get(RTM::PSI[:name_type])
+        @topic2.names.first.value.should == "Peter"
+        scope = RTM::PREFIX[:language] + "german"
+        @topic2.names.first.scope.first.should == @tm.get(scope)
+      end
+      it "should set a name and nametype type given '-nametype'" do
+        @topic2["-first"] = "Peter"
+        @topic2["Hausnummer"] = "1"
+        @topic2.names.size.should == 1
+        @topic2.names.first.type.should == @tm.get("first")
+        @topic2.names.first.value.should == "Peter"
+      end
+      it "should set an Occurrence and Occurrence type given 'occurrencetype'" do
+        @topic2["-first"] = "Peter"
+        @topic2["Hausnummer"] = "1"
+        @topic2.occurrences.size.should == 1
+        @topic2.occurrences.first.type.should == @tm.get("Hausnummer")
+        @topic2.occurrences.first.value.should == "1"
+      end
+      it "should set the Scope given [...@ scope] or [...@ scope1, scope2 scope3 ...]" do
+        @topic2["-first @deutsch"] = "Peter"
+        @topic2["Hausnummer @scope1, scope2 scope3"] = "1"
+        @topic2.names.first.type.should == @tm.get("first")
+        @topic2.names.first.value.should == "Peter"
+        @topic2.names.first.scope.first.should == @tm.get("deutsch")
+        @topic2.occurrences.first.type.should == @tm.get("Hausnummer")
+        @topic2.occurrences.first.value.should == "1"
+        @topic2.occurrences.first.scope.size.should == 3
+        @topic2.occurrences.first.scope.should include(@tm.get("scope1"))
+        @topic2.occurrences.first.scope.should include(@tm.get("scope2"))
+        @topic2.occurrences.first.scope.should include(@tm.get("scope3"))
+      end
+      it "should allow spaces before and after and between - and Nametype and @" do
+        @topic2[" -  first   @  scope1 scope2 scope3"] = "Peter"
+        @topic2.names.size.should == 1
+        @topic2.names.first.type.should == @tm.get("first")
+        @topic2.names.first.scope.size.should == 3
+        @topic2.names.first.scope.should include(@tm.get("scope1"))
+        @topic2.names.first.scope.should include(@tm.get("scope2"))
+        @topic2.names.first.scope.should include(@tm.get("scope3"))
+      end 
+      it "should create names whose types have item identifier" do
+        @topic2["-ii:a_name"] = "Billy"
+        @tm.get("^a_name").should_not be_nil
+        @topic2.names.first.type.should == @tm.get("^a_name")
+      end
+      it "should create occurrences whose types have item identifier" do
+        @topic2["ii:an_occ"] = "42"
+        @tm.get("^an_occ").should_not be_nil
+        @topic2.occurrences.first.type.should == @tm.get("^an_occ")
+      end
+    end
+  end
+  
+end

data/spec/rtm/sugar/topic/scoped_spec.rb

@@ -0,0 +1,195 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../../../spec_helper'
+
+module RTM::Sugar::Topic
+  module Scoped
+    describe self do
+      before(:all) do
+        @tm = get_used_tm_sys_tm
+        @theme0 = @tm.get!("negative")
+        @theme1 = @tm.get!("german")
+        @theme2 = @tm.get!("english")
+        @theme3 = @tm.get!("2009")
+        @theme4 = @tm.get!("sorbian")
+        @test_theme = @tm.get!("dummy")
+        @leipzig = @tm.get!("leipzig")
+        @germany = @tm.get!("germany")
+        @name1 = @leipzig.create_name("Leipzig",[@theme1,@theme2])
+        @name2 = @germany.create_name("Germany",[@theme2,@test_theme])
+        @name3 = @germany.create_name("Deutschland",[@theme1])
+        @name4 = @leipzig.create_name("Leipzisch")
+        @name5 = @leipzig.create_name("Lipsk",[@theme4])
+        @occ1 = @leipzig.create_occurrence("inhabitants","500000", :scope => [@theme3])
+        @occ2 = @germany.create_occurrence("states","16", :scope => [@test_theme])
+        @occ3 = @leipzig.create_occurrence("state","Sachsen")
+        @tm.create_association("assoc_dummy")
+        @assoc = @tm.create_association("contained", [@test_theme])
+        @role1 = @assoc.create_role("containee",@leipzig)
+        @role2 = @assoc.create_role("container",@germany)
+        @variant = @name1.create_variant("LE",[@test_theme])
+      end
+      after(:all) do
+        @tm.close
+      end
+        
+      describe "#scoped" do
+        it "should give back all constructs which have this Topic in their scope" do
+          @theme1.scoped.size.should == 3
+          @theme1.scoped.should include(@name1)
+          @theme1.scoped.should include(@name3)
+          @theme1.scoped.should include(@variant)
+          @theme2.scoped.size.should == 3
+          @theme2.scoped.should include(@name1)
+          @theme2.scoped.should include(@name2)
+          @theme2.scoped.should include(@variant)
+          @theme3.scoped.size.should == 1
+          @theme3.scoped.should include(@occ1)
+          @theme4.scoped.size.should == 1
+          @theme4.scoped.should include(@name5)
+          @test_theme.scoped.size.should == 4
+          @test_theme.scoped.should include(@name2)
+          @test_theme.scoped.should include(@occ2)
+          @test_theme.scoped.should include(@assoc)
+          @test_theme.scoped.should include(@variant)
+        end
+        it "should give back an empty Array if there are no Constructs which have this Topic in their scope" do
+          @theme0.scoped.should be_empty
+        end
+      end
+        
+      describe "#scoped_associations" do
+        it "should give back all Associations which have this Topic in their scope" do
+          @theme1.scoped_associations.should be_empty
+          @theme2.scoped_associations.should be_empty
+          @theme3.scoped_associations.should be_empty
+          @theme4.scoped_associations.should be_empty
+          @test_theme.scoped_associations.size.should == 1
+          @test_theme.scoped_associations.should include(@assoc)
+        end
+        it "should give back an empty Array if there are no Associations which have this Topic in their scope" do
+          @theme0.scoped_associations.should be_empty
+        end
+      end
+        
+      describe "#scoped_names" do
+        it "should give back all Names which have this Topic in their scope" do
+          @theme1.scoped_names.size.should == 2
+          @theme1.scoped_names.should include(@name1)
+          @theme1.scoped_names.should include(@name3)
+          @theme2.scoped_names.size.should == 2
+          @theme2.scoped_names.should include(@name1)
+          @theme2.scoped_names.should include(@name2)
+          @theme3.scoped_names.should be_empty
+          @theme4.scoped_names.size.should == 1
+          @theme4.scoped_names.should include(@name5)
+          @test_theme.scoped_names.size.should == 1
+          @test_theme.scoped_names.should include(@name2)
+        end
+        it "should give back an empty Array if there are no Names which have this Topic in their scope" do
+          @theme0.scoped_names.should be_empty
+        end
+      end
+        
+      describe "#scoped_occurrences" do
+        it "should give back all Occurrences which have this Topic in their scope" do
+          @theme1.scoped_occurrences.should be_empty
+          @theme2.scoped_occurrences.should be_empty
+          @theme3.scoped_occurrences.size.should == 1
+          @theme3.scoped_occurrences.should include(@occ1)
+          @theme4.scoped_occurrences.should be_empty
+          @test_theme.scoped_occurrences.size.should == 1
+          @test_theme.scoped_occurrences.should include(@occ2)
+        end
+        it "should give back an empty Array if there are no Occurrences which have this Topic in their scope" do
+          @theme0.scoped_occurrences.should be_empty
+        end
+      end
+        
+      describe "#scoped_variants" do
+        it "should give back all Variants which have this Topic in their scope" do
+          @theme1.scoped_variants.size.should == 1
+          @theme1.scoped_variants.should include(@variant)
+          @theme2.scoped_variants.size.should == 1
+          @theme2.scoped_variants.should include(@variant)
+          @theme3.scoped_variants.should be_empty
+          @theme4.scoped_variants.should be_empty
+          @test_theme.scoped_variants.size.should == 1
+          @test_theme.scoped_variants.should include(@variant)
+        end
+        it "should give back an empty Array if there are no Variants which have this Topic in their scope" do
+          @theme0.scoped_variants.should be_empty
+        end
+      end
+
+      describe "#used_as_theme?" do
+        it "should give back true if this topic is used as theme in a scope" do
+          @theme1.used_as_theme?.should be_true
+          @theme2.used_as_theme?.should be_true
+          @theme3.used_as_theme?.should be_true
+          @theme4.used_as_theme?.should be_true
+          @test_theme.used_as_theme?.should be_true
+        end
+        it "should give back false if this topic is not used as theme in a scope" do
+          @theme0.used_as_theme?.should be_false
+        end
+      end
+
+      describe "#used_as_association_theme?" do
+        it "should give back true if this topic is used as theme in a scope of an association" do
+          @test_theme.used_as_association_theme?.should be_true
+        end
+        it "should give back false if this topic is not used as theme in a scope of an association" do
+          @theme0.used_as_association_theme?.should be_false
+          @theme1.used_as_association_theme?.should be_false
+          @theme2.used_as_association_theme?.should be_false
+          @theme3.used_as_association_theme?.should be_false
+          @theme4.used_as_association_theme?.should be_false
+        end
+      end
+
+      describe "#used_as_name_theme?" do
+        it "should give back true if this topic is used as theme in a scope of a name" do
+          @test_theme.used_as_name_theme?.should be_true
+          @theme1.used_as_name_theme?.should be_true
+          @theme2.used_as_name_theme?.should be_true
+          @theme4.used_as_name_theme?.should be_true
+        end
+        it "should give back false if this topic is not used as theme in a scope of a name" do
+          @theme0.used_as_name_theme?.should be_false         
+          @theme3.used_as_name_theme?.should be_false
+          
+        end
+      end
+
+      describe "#used_as_occurrence_theme?" do
+        it "should give back true if this topic is used as theme in a scope of an occurrence" do
+          @test_theme.used_as_occurrence_theme?.should be_true
+          @theme3.used_as_occurrence_theme?.should be_true
+        end
+        it "should give back false if this topic is not used as theme in a scope of an occurrence" do
+          @theme0.used_as_occurrence_theme?.should be_false
+          @theme1.used_as_occurrence_theme?.should be_false
+          @theme2.used_as_occurrence_theme?.should be_false
+          @theme4.used_as_occurrence_theme?.should be_false
+        end
+      end
+
+      describe "#used_as_variant_theme?" do
+        it "should give back true if this topic is used as theme in a scope of a variant" do
+          @test_theme.used_as_variant_theme?.should be_true
+          @theme1.used_as_variant_theme?.should be_true
+          @theme2.used_as_variant_theme?.should be_true
+        end
+        it "should give back false if this topic is not used as theme in a scope of a variant" do
+          @theme0.used_as_variant_theme?.should be_false
+          @theme3.used_as_variant_theme?.should be_false
+          @theme4.used_as_variant_theme?.should be_false
+        end
+      end
+
+    end #of describe self
+  end
+end
+

data/spec/rtm/sugar/topic/topic_ref_spec.rb

@@ -0,0 +1,44 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../../../spec_helper'
+
+module Sugar
+  module Topic
+    module TopicRef
+      describe self do
+        before(:each) do
+          @tm = get_used_tm_sys_tm
+          @topic = @tm.get!("ii:uni_leipzig")
+        end
+        after(:each) do
+          @tm.close
+        end
+        describe "#references" do
+          it "should not give back an empty Array" do
+            @topic.references.should_not be_empty
+          end
+          it "should give back an item identifier that starts with a ^" do
+            pending if implementation_for_spec == :ontopia
+            @topic.references.first[0].should == ?^
+            @topic.references.should include("^http://www.topicmapslab.de/uni_leipzig")
+          end
+          it "should give back subject locators also" do
+            pending if implementation_for_spec == :ontopia
+            @topic.addSubjectLocator(@tm.create_locator("uni_leipzig")) 
+            @topic.references.size.should == 2
+            @topic.references.should include("^http://www.topicmapslab.de/uni_leipzig")
+            @topic.references.should include("=http://www.topicmapslab.de/uni_leipzig")
+          end
+          it "should give back subject identifiers also" do
+            pending if implementation_for_spec == :ontopia
+            @topic.add_subject_identifier(@tm.create_locator("uni_leipzig"))
+            @topic.references.size.should == 2
+            @topic.references.should include("^http://www.topicmapslab.de/uni_leipzig")
+            @topic.references.should include("http://www.topicmapslab.de/uni_leipzig")
+          end
+        end #of describe "#identifiers"
+      end #of describe self
+    end
+  end
+end