rtm 0.2.1 → 0.3.0

data/spec/rtm/io/tmapix_to_spec.rb

@@ -26,11 +26,11 @@ module RTM::IO::TmapiXTo::TopicMap
       it "should serialize a topic map to a file given a base iri" do
         @tm.to_xtm20(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.xtm20", "http://www.example.org/testtm").should be_true
       end
-      it "should serialize a topic map to a java.io.Stream" do
-        @tm.to_xtm20(java.io.ByteArrayOutputStream.new).should be_true
+      it "should serialize a topic map to a Java::JavaIo::Stream" do
+        @tm.to_xtm20(Java::JavaIo::ByteArrayOutputStream.new).should be_true
       end
       it "should be the case that the xtm20 writer does not respond to :setProperty" do
-        org.tmapix.io.XTM20TopicMapWriter.new(java.io.ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
+        Java::OrgTmapixIo::XTM20TopicMapWriter.new(Java::JavaIo::ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
       end
       it "should provide an alias for to_xtm" do
         @tm.method(:to_xtm).should == @tm.method(:to_xtm20)
@@ -53,11 +53,11 @@ module RTM::IO::TmapiXTo::TopicMap
       it "should serialize a topic map to a file given a base iri" do
         @tm.to_xtm10(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.xtm10", "http://www.example.org/testtm").should be_true
       end
-      it "should serialize a topic map to a java.io.Stream" do
-        @tm.to_xtm10(java.io.ByteArrayOutputStream.new).should be_true
+      it "should serialize a topic map to a Java::JavaIo::Stream" do
+        @tm.to_xtm10(Java::JavaIo::ByteArrayOutputStream.new).should be_true
       end
       it "should be the case that the xtm10 writer does not respond to :setProperty" do
-        org.tmapix.io.XTM10TopicMapWriter.new(java.io.ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
+        Java::OrgTmapixIo::XTM10TopicMapWriter.new(Java::JavaIo::ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
       end
       it "should provide an alias for to_xtm1" do
         @tm.method(:to_xtm1).should == @tm.method(:to_xtm10)
@@ -77,13 +77,13 @@ module RTM::IO::TmapiXTo::TopicMap
       it "should serialize a topic map to a file given a base iri" do
         @tm.to_jtm(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.jtm", "http://www.example.org/testtm").should be_true
       end
-      it "should serialize a topic map to a java.io.Stream" do
-        @tm.to_jtm(java.io.ByteArrayOutputStream.new).should be_true
+      it "should serialize a topic map to a Java::JavaIo::Stream" do
+        @tm.to_jtm(Java::JavaIo::ByteArrayOutputStream.new).should be_true
       end
-      it "should be the case that the xtm10 writer does not respond to :setProperty" do
-        org.tmapix.io.JTMTopicMapWriter.new(java.io.ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
+      it "should be the case that the jtm writer does not respond to :setProperty" do
+        Java::OrgTmapixIo::JTMTopicMapWriter.new(Java::JavaIo::ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
       end
-      it "should provide an alias fpr to_json" do
+      it "should provide an alias for to_json" do
         @tm.method(:to_json).should == @tm.method(:to_jtm)
       end
     end
@@ -101,34 +101,34 @@ module RTM::IO::TmapiXTo::TopicMap
       it "should serialize a topic map to a file given a base iri" do
         @tm.to_ltm(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.ltm", "http://www.example.org/testtm").should be_true
       end
-      it "should serialize a topic map to a java.io.Stream" do
-        @tm.to_ltm(java.io.ByteArrayOutputStream.new).should be_true
+      it "should serialize a topic map to a Java::JavaIo::Stream" do
+        @tm.to_ltm(Java::JavaIo::ByteArrayOutputStream.new).should be_true
       end
-      it "should be the case that the xtm10 writer does not respond to :setProperty" do
-        org.tmapix.io.LTMTopicMapWriter.new(java.io.ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
+      it "should be the case that the ltm writer does not respond to :setProperty" do
+        Java::OrgTmapixIo::LTMTopicMapWriter.new(Java::JavaIo::ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
       end
     end
 
-    describe "#to_tmxml" do
-      before(:each) do
-        @tm.from_ctm(File.dirname(__FILE__) + "/../../resources/toyTM.ctm")
-      end
-      it "should serialize a topic map to String" do
-        @tm.to_tmxml.should be_a_kind_of String
-      end
-      it "should serialize a topic map to a file" do
-        @tm.to_tmxml(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.tmxml").should be_true
-      end
-      it "should serialize a topic map to a file given a base iri" do
-        @tm.to_tmxml(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.tmxml", "http://www.example.org/testtm").should be_true
-      end
-      it "should serialize a topic map to a java.io.Stream" do
-        @tm.to_tmxml(java.io.ByteArrayOutputStream.new).should be_true
-      end
-      it "should be the case that the xtm10 writer does not respond to :setProperty" do
-        org.tmapix.io.TMXMLTopicMapWriter.new(java.io.ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
-      end
-    end
+#    describe "#to_tmxml" do
+#      before(:each) do
+#        @tm.from_tmxml(File.dirname(__FILE__) + "/../../resources/toyTM.tmxml")
+#      end
+#      it "should serialize a topic map to String" do
+#        @tm.to_tmxml.should be_a_kind_of String
+#      end
+#      it "should serialize a topic map to a file" do
+#        @tm.to_tmxml(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.tmxml").should be_true
+#      end
+#      it "should serialize a topic map to a file given a base iri" do
+#        @tm.to_tmxml(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.tmxml", "http://www.example.org/testtm").should be_true
+#      end
+#      it "should serialize a topic map to a Java::JavaIo::Stream" do
+#        @tm.to_tmxml(Java::JavaIo::ByteArrayOutputStream.new).should be_true
+#      end
+#      it "should be the case that the tmxml writer does not respond to :setProperty" do
+#        Java::OrgTmapixIo::TMXMLTopicMapWriter.new(Java::JavaIo::ByteArrayOutputStream.new,"http://www.example.org/testtm").should_not respond_to(:setProperty)
+#      end
+#    end
 
     describe "#to_ctm" do
       before(:each) do
@@ -143,11 +143,11 @@ module RTM::IO::TmapiXTo::TopicMap
       it "should serialize a topic map to a file given a base iri" do
         @tm.to_ctm(File.dirname(__FILE__) + "/../../resources/toyTM_after_spec.ctm", "http://www.example.org/testtm").should be_true
       end
-      it "should serialize a topic map to a java.io.Stream" do
-        @tm.to_ctm(java.io.ByteArrayOutputStream.new).should be_true
+      it "should serialize a topic map to a Java::JavaIo::Stream" do
+        @tm.to_ctm(Java::JavaIo::ByteArrayOutputStream.new).should be_true
       end
       it "should be the case that the xtm10 writer does respond to :setProperty" do
-        de.topicmapslab.ctm.writer.core.CTMTopicMapWriter.new(java.io.ByteArrayOutputStream.new,"http://www.example.org/testtm").should respond_to(:setProperty)
+        Java::DeTopicmapslabCtmWriterCore::CTMTopicMapWriter.new(Java::JavaIo::ByteArrayOutputStream.new,"http://www.example.org/testtm").should respond_to(:setProperty)
       end
       it "should read it afterwards" do
         emptyTM = get_used_tm_sys.create("http://blub.org/")

data/spec/rtm/io/to_yaml_spec.rb

@@ -33,6 +33,7 @@ module RTM::IO::ToYAML
           @tm.should be_a_kind_of RTM::TopicMap
         end
         it "should give back a String" do
+          pending
           @output = @tm.to_yaml
         end
       end
@@ -41,6 +42,7 @@ module RTM::IO::ToYAML
           @topic.should be_a_kind_of RTM::Topic
         end
         it "should give back a String" do
+          pending
           @output = @topic.to_yaml
         end
       end
@@ -49,6 +51,7 @@ module RTM::IO::ToYAML
           @assoc.should be_a_kind_of RTM::Association
         end
         it "should give back a String" do
+          pending
           @output = @assoc.to_yaml
         end
       end
@@ -57,6 +60,7 @@ module RTM::IO::ToYAML
           @role.should be_a_kind_of RTM::Role
         end
         it "should give back a String" do
+          pending
           @output = @role.to_yaml
         end
       end
@@ -65,6 +69,7 @@ module RTM::IO::ToYAML
           @name.should be_a_kind_of RTM::Name
         end
         it "should give back a String" do
+          pending
           @output = @name.to_yaml
         end
       end
@@ -73,6 +78,7 @@ module RTM::IO::ToYAML
           @occ.should be_a_kind_of RTM::Occurrence
         end
         it "should give back a String" do
+          pending
           @output = @occ.to_yaml
         end
       end
@@ -81,6 +87,7 @@ module RTM::IO::ToYAML
           @var.should be_a_kind_of RTM::Variant
         end
         it "should give back a String" do
+          pending
           @output = @var.to_yaml
         end
       end

data/spec/rtm/javatmapi_spec.rb

@@ -0,0 +1,64 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../spec_helper'
+
+module RTM
+
+  describe "JavaTMAPI" do
+
+    describe "#create" do
+      it "should give always give back the same topic map" do
+        tm_identifier = "http://www.exampl.org/test/"
+        engine = RTM.connect(:implementation => implementation_for_spec)
+        tm = engine.create(tm_identifier)
+        1000.times do
+          tm_other = engine.create(tm_identifier)
+          tm_other.should == tm
+          tm_other.engine.should_not be_nil
+          tm_other.prefixes.should_not be_empty
+        end
+      end
+      it "should raise an error if topic map identifier is relative" do
+        tm_identifier = "www.exampl.org/test/"
+        engine = RTM.connect(:implementation => implementation_for_spec)
+        if implementation_for_spec == :tinytim
+          pending do
+            lambda{engine.create(tm_identifier)}.should raise_error
+          end
+        else
+          lambda{engine.create(tm_identifier)}.should raise_error
+        end
+      end
+      it "should be tested"
+    end
+
+    describe "#delete" do
+      it "should delete a topic map" do
+        tm_identifier = "http://www.exampl.org/test/"
+        engine = RTM.connect(:implementation => implementation_for_spec)
+        tm = engine.create(tm_identifier)
+        tm.should be_a_kind_of RTM::TopicMap
+        tm.create_topic
+        tm.create_association(tm.create_topic)
+        engine.tms.getTopicMap(tm_identifier).should_not be_nil
+        engine.delete(tm_identifier)
+        engine.tms.getTopicMap(tm_identifier).should be_nil
+      end
+    end
+
+    describe "#existing?" do
+      it "should tell if the map is existing" do
+        tm_identifier = "http://www.exampl.org/test/"
+        engine = RTM.connect(:implementation => implementation_for_spec)
+        engine.existing?(tm_identifier).should_not be_true
+        tm = engine.create(tm_identifier)
+        engine.existing?(tm_identifier).should be_true
+        engine.delete(tm_identifier)
+        engine.existing?(tm_identifier).should_not be_true
+      end
+    end
+      
+  end # of describe self
+    
+end

data/spec/rtm/navigation/topic/scope_spec.rb

@@ -9,7 +9,7 @@ module RTM::Navigation::Topic
       @tm = get_used_tm_sys_tm
       @topic = @tm.get!("nikolaus")
       
-      puts @topic.class.ancestors
+      # puts @topic.class.ancestors
       
     end
     after(:each) do

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

@@ -15,10 +15,62 @@ module RTM::Sugar::Topic::BestName
     describe "#best_name" do
       before(:each) do
         @topic = @tm.get!("Leipzig")
+        @topic.add_si("LE")
+        @topic.add_ii("http://example.org/id-10")
+        @topic.add_ii("1")
       end
-      it "should return a String" do
+      after(:each) do
         @topic.best_name.should be_a_kind_of String
-        #puts @topic.best_name
+      end
+      it "should return an identfier if the topic has no name, resolved" do
+        @topic.best_name.should == "LE"
+      end
+      it "should give back the name if the topic has one name" do
+        @topic["-city-name"] = "Leipzig"
+        @topic.best_name.should == "Leipzig"
+      end
+      it "should give back the default name if the topic has several names" do
+        @topic["-city-name"] = "Leipzig"
+        @topic["-"] = "Leipzisch"
+        @topic.best_name.should == "Leipzisch"
+      end
+      it "should give back the default name with the smallest value if the topic has several names" do
+        @topic["-city-name"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["-"] = "Leipzisch"
+        @topic.best_name.should == "LE"
+      end
+      it "should give back the default name with the smallest value sorted alphabetically if the topic has several names" do
+        @topic["-city-name"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["-"] = "Leipzisch"
+        @topic["-"] = "LA"
+        @topic.best_name.should == "LA"
+      end
+      it "should give back the name with the given theme" do
+        @topic["-city-name name @test_theme"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["-"] = "Leipzisch"
+        @topic["-"] = "LA"
+        test_theme = @tm.get("test_theme")
+        test_theme.should_not be_nil
+        @topic.best_name(test_theme).should == "Leipzig"
+      end
+      it "should give back the name with the given theme preferring default names" do
+        @topic["-city-name name @test_theme"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["- @test_theme"] = "Leipzisch"
+        @topic["- @test_theme_other"] = "LA"
+        test_theme = @tm.get("test_theme")
+        test_theme.should_not be_nil
+        @topic.best_name(test_theme).should == "Leipzisch"
+      end
+    end
+
+    describe "#shortest_topic_identifier" do
+      it "should give back the shortest most significant identifier in yaml-style" do
+        topic = @tm.get!("LE")
+        topic.shortest_topic_identifier.should == "si:LE"
       end
     end
   end

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

@@ -3,42 +3,66 @@
 
 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")
+module RTM::Sugar::Topic::TopicRef
+  describe self do
+    before(:each) do
+      @tm = get_used_tm_sys_tm
+      @topic_with_ii = @tm.get!("ii:uni-leipzig")
+      @topic_with_si = @tm.get!("si:uni-berlin")
+      @topic_with_sl = @tm.get!("sl:uni-munich")
+    end
+    after(:each) do
+      @tm.close
+    end
+    describe "#references" do
+      it "should not give back an empty Array" do
+        @topic_with_si.references.should_not be_empty
+      end
+      it "should give back an item identifier that starts with an ^" do
+        @topic_with_ii.references.first[0].should == ?^
+        @topic_with_ii.references.should include("^http://www.topicmapslab.de/uni-leipzig")
+      end
+      it "should give back a subject locator that starts with a ^=" do
+        @topic_with_sl.references.first[0].should == ?=
+        @topic_with_sl.references.should include("=http://www.topicmapslab.de/uni-munich")
+      end
+      it "should give back a subject identifier start does not start with a special character" do
+        @topic_with_si.references.first[0].should == ?h
+        @topic_with_si.references.should include("http://www.topicmapslab.de/uni-berlin")
+      end
+
+      describe ":resolve_qnames => :true" do
+        it "should resolve the qnames" do
+          @tm.add_prefix("tml", "http://www.topicmapslab.de/")
+          @topic_with_ii.references(:resolve_qnames => :true).first[0].should == ?^
+          @topic_with_ii.references(:resolve_qnames => :true).should include("^tml:uni-leipzig")
+          @topic_with_sl.references(:resolve_qnames => :true).first[0].should == ?=
+          @topic_with_sl.references(:resolve_qnames => :true).should include("=tml:uni-munich")
+          @topic_with_si.references(:resolve_qnames => :true).first[0].should == ?t
+          @topic_with_si.references(:resolve_qnames => :true).should include("tml:uni-berlin")
         end
-        after(:each) do
-          @tm.close
+        it "should resolve the qnames for a topic with many identifiers" do
+          topic = @tm.get!("http://www.example.org/si")
+          topic.add_subject_identifier("http://www.example.net/si")
+          topic.add_item_identifier("http://www.example.org/i i")
+          topic.add_item_identifier("http://www.example.net/i i")
+          topic.add_subject_locator("http://www.example.org/there#sl")
+          topic.add_subject_locator("http://www.example.net/sl")
+          @tm.add_prefix("example", "http://www.example.org/")
+          topic.references(:outputstyle => :yaml, :resolve_qnames => :true).size.should == 6
+          topic.references(:outputstyle => :yaml, :resolve_qnames => :true).should include("si:example:si", "si:http://www.example.net/si", "ii:example:i i", "ii:http://www.example.net/i i", "sl:example:there#sl", "sl:http://www.example.net/sl")
+        end
+      end
+
+      describe "#unresolve" do
+        it "should unresolve an iri that starts with the base iri of the parent topic map" do
+          topic = @tm.get!("Leipzig")
+          identifier = "http://www.topicmapslab.de/Leipzig"
+          topic.reference.should == identifier
+          topic.unresolve(identifier).should == "Leipzig"
         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
+        it "should not raise an error"
+      end
     end
-  end
+  end #of describe self
 end

data/spec/rtm/sugar/topic_map/remove_spec.rb

@@ -0,0 +1,50 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../../../spec_helper'
+
+module RTM::Sugar::TopicMap
+  module Remove
+    describe self do
+      before(:each) do
+        @tm = get_used_tm_sys_tm
+        @tm.from_xtm(File.dirname(__FILE__) + "/../../../resources/toyTM.xtm")
+      end
+
+      it "should respond to remove_everything" do
+        @tm.should respond_to(:clear)
+      end
+
+      describe "#clear" do
+        before(:each) do
+          @tm.variants.should_not be_empty
+          @tm.names.should_not be_empty
+          @tm.occurrences.should_not be_empty
+          @tm.roles.should_not be_empty
+          @tm.associations.should_not be_empty
+          @tm.topics.should_not be_empty
+          @tm.clear
+        end
+        it "should remove all variants" do
+          @tm.variants.should be_empty
+        end
+        it "should remove all names" do
+          @tm.names.should be_empty
+        end
+        it "should remove all occurrences" do
+          @tm.occurrences.should be_empty
+        end
+        it "should remove all roles" do
+          @tm.roles.should be_empty
+        end
+        it "should remove all associations" do
+          @tm.associations.should be_empty
+        end
+        it "should remove all topics" do
+          @tm.topics.should be_empty
+        end
+      end
+    end
+  end
+end
+