metade-rena 0.0.2

data/spec/namespaces_spec.rb

@@ -0,0 +1,44 @@
+require 'lib/rena'
+
+describe "Namespaces" do
+  it "should use method_missing to create URIRefs on the fly" do
+    foaf = Namespace.new("http://xmlns.com/foaf/0.1/", "foaf")
+    foaf.knows.to_s.should == "http://xmlns.com/foaf/0.1/knows"
+    
+    foaf_frag = Namespace.new("http://xmlns.com/foaf/0.1/", "foaf", true)
+    foaf_frag.knows.to_s.should == "http://xmlns.com/foaf/0.1/#knows"
+  end
+  
+  it "should have a URI" do
+    lambda do
+      test = Namespace.new(short='foaf')
+    end.should raise_error
+  end
+  
+  it "should have equality with URIRefs" do
+      foaf = Namespace.new("http://xmlns.com/foaf/0.1/", "foaf")
+      foaf_name = URIRef.new("http://xmlns.com/foaf/0.1/name")
+      foaf.name.should == foaf_name
+  end
+  
+  it "should have an XML and N3-friendly prefix" do
+    lambda do
+      test = Namespace.new('http://xmlns.com/foaf/0.1/', '*~{')
+    end.should raise_error
+  end
+  
+  it "should be able to attach to the graph for substitution" do
+    # rdflib does this using graph.bind('prefix', namespace)
+    g = Graph.new
+    foaf = Namespace.new("http://xmlns.com/foaf/0.1/", "foaf")
+    foaf.bind(g)
+    g.nsbinding["foaf"].should == foaf
+  end
+  
+  it "should not allow you to attach to non-graphs" do
+    lambda do
+      foaf = Namespace.new("http://xmlns.com/foaf/0.1/", "foaf")
+      foaf.bind("cheese")
+    end.should raise_error
+  end
+end

data/spec/parser_spec.rb

@@ -0,0 +1,314 @@
+require 'lib/rena'
+include Rena
+
+# w3c test suite: http://www.w3.org/TR/rdf-testcases/
+
+describe "RDF/XML Parser" do
+  it "should be able to detect whether an XML file is indeed an RDF file" do
+    bad_doc = "<?xml version=\"1.0\"?><RDF><foo /></RDF>"
+    bad_graph = RdfXmlParser.new(bad_doc)
+    bad_graph.is_rdf?.should == false
+    
+    good_doc = "<?xml version=\"1.0\"?><rdf:RDF xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\"></rdf:RDF>"
+    good_graph = RdfXmlParser.new(good_doc)
+    good_graph.is_rdf?.should == true
+  end
+  
+  it "should be able to parse a simple single-triple document" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0" ?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+    xmlns:ex="http://www.example.org/" xml:lang="en" xml:base="http://www.example.org/foo">
+      <rdf:Description rdf:about="#" ex:name="bar">
+        <ex:belongsTo rdf:resource="http://tommorris.org/" />
+        <ex:sampleText rdf:datatype="http://www.w3.org/2001/XMLSchema#string">foo</ex:sampleText>
+        <ex:hadADodgyRelationshipWith rdf:parseType="Resource">
+            <ex:name>Tom</ex:name>
+        </ex:hadADodgyRelationshipWith>
+      </rdf:Description>
+    </rdf:RDF>
+    EOF
+    
+    graph = RdfXmlParser.new(sampledoc)
+    graph.is_rdf?.should == true
+    graph.graph.size == 6
+#    print graph.graph.to_ntriples
+  end
+
+  it "should raise an error if rdf:aboutEach is used, as per the negative parser test rdfms-abouteach-error001 (rdf:aboutEach attribute)" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0" ?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+
+      <rdf:Bag rdf:ID="node">
+        <rdf:li rdf:resource="http://example.org/node2"/>
+      </rdf:Bag>
+
+      <rdf:Description rdf:aboutEach="#node">
+        <dc:rights xmlns:dc="http://purl.org/dc/elements/1.1/">me</dc:rights>
+
+      </rdf:Description>
+
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should raise_error
+  end
+  
+  it "should raise an error if rdf:aboutEachPrefix is used, as per the negative parser test rdfms-abouteach-error002 (rdf:aboutEachPrefix attribute)" do
+    sampledoc = <<-EOF;
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+
+      <rdf:Description rdf:about="http://example.org/node">
+        <eg:property>foo</eg:property>
+      </rdf:Description>
+
+      <rdf:Description rdf:aboutEachPrefix="http://example.org/">
+        <dc:creator xmlns:dc="http://purl.org/dc/elements/1.1/">me</dc:creator>
+
+      </rdf:Description>
+
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should raise_error
+  end
+  
+  it "should fail if given a non-ID as an ID (as per rdfcore-rdfms-rdf-id-error001)" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0"?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">
+     <rdf:Description rdf:ID='333-555-666' />
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should raise_error
+  end
+  
+  it "should make sure that the value of rdf:ID attributes match the XML Name production (child-element version)" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0" ?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+     <rdf:Description>
+       <eg:prop rdf:ID="q:name" />
+     </rdf:Description>
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should raise_error
+  end
+  
+  it "should make sure that the value of rdf:ID attributes match the XML Name production (data attribute version)" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0" ?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+     <rdf:Description rdf:ID="a/b" eg:prop="val" />
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should raise_error
+  end
+  
+  it "should handle parseType=Literal according to xml-literal-namespaces-test001.rdf test" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0"?>
+
+    <!--
+      Copyright World Wide Web Consortium, (Massachusetts Institute of
+      Technology, Institut National de Recherche en Informatique et en
+      Automatique, Keio University).
+
+      All Rights Reserved.
+
+      Please see the full Copyright clause at
+      <http://www.w3.org/Consortium/Legal/copyright-software.html>
+
+      Description: Visibly used namespaces must be included in XML
+             Literal values. Treatment of namespaces that are not 
+             visibly used (e.g. rdf: in this example) is implementation
+             dependent. Based on example from Issues List.
+
+
+      $Id: test001.rdf,v 1.2 2002/11/22 13:52:15 jcarroll Exp $
+
+    -->
+    <rdf:RDF xmlns="http://www.w3.org/1999/xhtml"
+       xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+       xmlns:html="http://NoHTML.example.org"
+       xmlns:my="http://my.example.org/">
+       <rdf:Description rdf:ID="John_Smith">
+        <my:Name rdf:parseType="Literal">
+          <html:h1>
+            <b>John</b>
+          </html:h1>
+       </my:Name>
+
+      </rdf:Description>
+    </rdf:RDF>
+    EOF
+    
+    graph = RdfXmlParser.new(sampledoc, "http://www.w3.org/2000/10/rdf-tests/rdfcore/rdfms-xml-literal-namespaces/test001.rdf")
+    graph.graph.to_ntriples.should == "<http://www.w3.org/2000/10/rdf-tests/rdfcore/rdfms-xml-literal-namespaces/test001.rdf#John_Smith> <http://my.example.org/Name> \"<html:h1>\n            <b>John</b>\n          </html:h1>\"^^<http://www.w3.org/1999/02/22-rdf-syntax-ns#XMLLiteral> ."
+  end
+  
+  it "should pass rdfms-syntax-incomplete-test001" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0"?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+
+     <rdf:Description rdf:nodeID="a">
+       <eg:property rdf:nodeID="a" />
+     </rdf:Description>
+
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should_not raise_error
+  end
+  
+  it "should pass rdfms-syntax-incomplete-test002" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0"?>
+
+    <!--
+      Copyright World Wide Web Consortium, (Massachusetts Institute of
+      Technology, Institut National de Recherche en Informatique et en
+      Automatique, Keio University).
+
+      All Rights Reserved.
+
+      Please see the full Copyright clause at
+      <http://www.w3.org/Consortium/Legal/copyright-software.html>
+
+    -->
+    <!--
+
+      rdf:nodeID can be used to label a blank node.
+      These have file scope and are distinct from any
+      unlabelled blank nodes.
+      $Id: test002.rdf,v 1.1 2002/07/30 09:46:05 jcarroll Exp $
+
+    -->
+
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+
+     <rdf:Description rdf:nodeID="a">
+       <eg:property1 rdf:nodeID="a" />
+     </rdf:Description>
+     <rdf:Description>
+       <eg:property2>
+
+    <!-- Note the rdf:nodeID="b" is redundant. -->
+          <rdf:Description rdf:nodeID="b">
+                <eg:property3 rdf:nodeID="a" />
+          </rdf:Description>
+       </eg:property2>
+     </rdf:Description>
+
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should_not raise_error
+  end
+  
+  it "should pass rdfms-syntax-incomplete/test003.rdf" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0"?>
+
+    <!--
+      Copyright World Wide Web Consortium, (Massachusetts Institute of
+      Technology, Institut National de Recherche en Informatique et en
+      Automatique, Keio University).
+
+      All Rights Reserved.
+
+      Please see the full Copyright clause at
+      <http://www.w3.org/Consortium/Legal/copyright-software.html>
+
+    -->
+    <!--
+
+      On an rdf:Description or typed node rdf:nodeID behaves
+      similarly to an rdf:about.
+      $Id: test003.rdf,v 1.2 2003/07/24 15:51:06 jcarroll Exp $
+
+    -->
+
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+             xmlns:eg="http://example.org/">
+
+     <!-- In this example the rdf:nodeID is redundant. -->
+     <rdf:Description rdf:nodeID="a" eg:property1="value" />
+
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should_not raise_error
+  end
+  
+  # when we have decent Unicode support, add http://www.w3.org/2000/10/rdf-tests/rdfcore/rdfms-rdf-id/error005.rdf
+  
+  it "should support reification" do
+    pending
+  end
+  
+  it "detect bad bagIDs" do
+    sampledoc = <<-EOF;
+    <?xml version="1.0" ?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">
+     <rdf:Description rdf:bagID='333-555-666' />
+    </rdf:RDF>
+    EOF
+    
+    lambda do
+      graph = RdfXmlParser.new(sampledoc)
+    end.should raise_error
+  end
+
+  describe "parsing rdf files" do
+    def test_file(filepath, uri = nil)
+      n3_string = File.read(filepath)
+      parser = RdfXmlParser.new(n3_string, uri)
+      ntriples = parser.graph.to_ntriples
+      ntriples.gsub!(/_:bn\d+/, '_:node1')
+      ntriples = ntriples.split("\n").sort
+      
+      nt_string = File.read(filepath.sub('.rdf', '.nt'))
+      nt_string = nt_string.split("\n").sort
+      
+      ntriples.should == nt_string
+    end
+    
+    before(:all) do
+      @rdf_dir = File.join(File.dirname(__FILE__), '..', 'test', 'rdf_tests')
+    end
+    
+    # it "should parse Coldplay's BBC Music profile" do
+    #   gid = 'cc197bad-dc9c-440d-a5b5-d52ba2e14234'
+    #   file = File.join(@rdf_dir, "#{gid}.rdf")
+    #   test_file(file, "http://www.bbc.co.uk/music/artists/#{gid}")
+    # end 
+  end
+end

data/spec/rexml_hacks_spec.rb

@@ -0,0 +1,75 @@
+require 'lib/rena'
+require 'rexml/document'
+#require 'lib/rexml_hacks'
+
+describe "REXML" do
+  before do
+    string = <<-EOF;
+    <?xml version="1.0" ?>
+    <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:ex="http://example.org/" xml:lang="en" xml:base="http://example.org/">
+      <rdf:Description>
+        <foo>bar</foo>
+        <bar:bar xmlns:bar="http://foo.com/">foo</bar:bar>
+        <ex:ex>fap</ex:ex>
+      </rdf:Description>
+    </rdf:RDF>
+    EOF
+    
+    @doc = REXML::Document.new(string)
+  end
+  
+  it "should have support for xml:base" do
+    @doc.root.elements[1].base?.should == true
+    @doc.root.elements[1].base.should == "http://example.org/"
+  end
+  
+  it "should have support for xml:lang" do
+    @doc.root.elements[1].lang?.should == true
+    @doc.root.elements[1].lang.should == "en"
+  end
+  
+  it "should allow individual writing-out of XML" do
+#    puts @doc.root.elements[1].write
+    
+    sampledoc = <<-EOF;
+    <?xml version="1.0"?>
+
+    <!--
+      Copyright World Wide Web Consortium, (Massachusetts Institute of
+      Technology, Institut National de Recherche en Informatique et en
+      Automatique, Keio University).
+
+      All Rights Reserved.
+
+      Please see the full Copyright clause at
+      <http://www.w3.org/Consortium/Legal/copyright-software.html>
+
+      Description: Visibly used namespaces must be included in XML
+             Literal values. Treatment of namespaces that are not 
+             visibly used (e.g. rdf: in this example) is implementation
+             dependent. Based on example from Issues List.
+
+
+      $Id: test001.rdf,v 1.2 2002/11/22 13:52:15 jcarroll Exp $
+
+    -->
+    <rdf:RDF xmlns="http://www.w3.org/1999/xhtml"
+       xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+       xmlns:html="http://NoHTML.example.org"
+       xmlns:my="http://my.example.org/">
+       <rdf:Description rdf:ID="John_Smith">
+        <my:Name rdf:parseType="Literal">
+          <html:h1>
+            <b>John</b>
+          </html:h1>
+       </my:Name>
+
+      </rdf:Description>
+    </rdf:RDF>
+    EOF
+    doc2 = REXML::Document.new(sampledoc)
+    expectedoutput_str = "<html:h1 xmlns:html=\'http://NoHTML.example.org\' xmlns:my=\'http://my.example.org/\' xmlns:rdf=\'http://www.w3.org/1999/02/22-rdf-syntax-ns#\'>\n            <b xmlns=\'http://www.w3.org/1999/xhtml\'>John</b>\n          </html:h1>"
+    expectedout = REXML::Document.new(expectedoutput_str)
+    doc2.root.elements[1].elements[1].elements[1] == expectedout.root
+  end
+end

data/spec/triple_spec.rb

@@ -0,0 +1,100 @@
+require 'lib/rena'
+
+describe "Triples" do
+  it "should have a subject" do
+    f = Triple.new(BNode.new, URIRef.new('http://xmlns.com/foaf/0.1/knows'), BNode.new)
+    f.subject.class.should == BNode
+    # puts f.to_ntriples
+  end
+
+  it "should require that the subject is a URIRef or BNode" do
+   lambda do
+     Triple.new(Literal.new("foo"), URIRef.new("http://xmlns.com/foaf/0.1/knows"), BNode.new)
+    end.should raise_error
+  end
+
+  it "should require that the predicate is a URIRef" do
+    lambda do
+      Triple.new(BNode.new, BNode.new, BNode.new)
+    end.should raise_error
+  end
+
+  it "should require that the object is a URIRef, BNode, Literal or Typed Literal" do
+    lambda do
+      Triple.new(BNode.new, URIRef.new("http://xmlns.com/foaf/0.1/knows"), [])
+    end.should raise_error
+  end
+
+  it "should emit an NTriple" do
+    s = URIRef.new("http://tommorris.org/foaf#me")
+    p = URIRef.new("http://xmlns.com/foaf/0.1/name")
+    o = Literal.untyped("Tom Morris")
+    f = Triple.new(s,p,o)
+
+    f.to_ntriples.should == "<http://tommorris.org/foaf#me> <http://xmlns.com/foaf/0.1/name> \"Tom Morris\" ."
+  end
+
+  describe "#coerce_subject" do
+    it "should accept a URIRef" do
+      ref = URIRef.new('http://localhost/')
+      Triple.coerce_subject(ref).should == ref
+    end
+
+    it "should accept a BNode" do
+      node = BNode.new('a')
+      Triple.coerce_subject(node).should == node
+    end
+
+    it "should accept a uri string and make URIRef" do
+      Triple.coerce_subject('http://localhost/').should == URIRef.new('http://localhost/')
+    end
+
+    it "should turn an other string into a BNode" do
+      Triple.coerce_subject('foo').should == BNode.new('foo')
+    end
+
+    it "should raise an InvalidSubject exception with any other class argument" do
+      lambda do
+        Triple.coerce_subject(Object.new)
+      end.should raise_error(Rena::Triple::InvalidSubject)
+    end
+  end
+
+  describe "#coerce_predicate" do
+    it "should make a string into a URI ref" do
+      Triple.coerce_predicate("http://localhost/").should == URIRef.new('http://localhost')
+    end
+
+    it "should leave a URIRef alone" do
+      ref = URIRef.new('http://localhost/')
+      Triple.coerce_predicate(ref).should == ref
+    end
+
+    it "should barf on an illegal uri string" do
+      lambda do
+        Triple.coerce_predicate("I'm just a soul whose intention is good")
+      end.should raise_error(Rena::Triple::InvalidPredicate)
+    end
+  end
+
+  describe "#coerce_object" do
+    it "should leave URIRefs alone" do
+      ref = URIRef.new("http://localhost/")
+      Triple.coerce_object(ref).should == ref
+    end
+    
+    it "should leave BNodes alone" do
+      ref = BNode.new()
+      Triple.coerce_object(ref).should == ref
+    end
+    
+    it "should leave Literals alone" do
+      ref = Literal.untyped('foo')
+      Triple.coerce_object(ref).should == ref
+      
+      typedref = Literal.build_from('foo')
+      Triple.coerce_object(ref).should == ref
+    end
+    
+  end
+end