pjstadig-rena 0.0.1

data/test/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/test/spec/parser.spec.rb

@@ -0,0 +1,288 @@
+require 'lib/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> .\n"
+  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
+end

data/test/spec/rexml_hacks.spec.rb

@@ -0,0 +1,76 @@
+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 = "<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>"
+    doc2.root.elements[1].elements[1].elements[1].write.should == expectedoutput
+    
+#    pending
+  end
+end

data/test/spec/triple.spec.rb

@@ -0,0 +1,32 @@
+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
+    f = Triple.new(URIRef.new("http://tommorris.org/foaf#me"), URIRef.new("http://xmlns.com/foaf/0.1/name"), Literal.new("Tom Morris"))
+    f.to_ntriples.should == "<http://tommorris.org/foaf#me> <http://xmlns.com/foaf/0.1/name> \"Tom Morris\" ."
+  end  
+end

data/test/spec/uriref.spec.rb

@@ -0,0 +1,47 @@
+require 'lib/rena'
+#require 'lib/uriref'
+
+describe "URI References" do
+  it "should output NTriples" do
+    f = URIRef.new("http://tommorris.org/foaf/")
+    f.to_ntriples.should == "<http://tommorris.org/foaf/>"
+  end
+  
+  it "should handle Unicode symbols inside URLs" do
+    lambda do
+      f = URIRef.new("http://example.org/#Andr%E9")
+    end.should_not raise_error
+  end
+  
+  # it "do not contain any control characters (#x00 - #x1F, #x74-#x9F)" do
+  #   lambda do
+  #     f = URIRef.new("http://tommorris.org/blog/")
+  #     f.test_string("http://tommorris.org/blog")
+  #   end.should_not raise_error
+  #   
+  #   lambda do
+  #     f = URIRef.new("http://xmlns.com/foaf/0.1/knows")
+  #     f.test_string("http://xmlns.com/foaf/0.1/knows")
+  #   end.should_not raise_error
+  # end
+  
+  it "produce a valid URI character sequence (per RFC 2396 §2.1) representing an absolute URI with optional fragment identifier" do
+    pending "TODO: figure out a series of tests for RFC 2396 §2.1 adherence"
+  end
+  
+  it "should throw errors on suspicious protocols and non-protocols" do
+    lambda do
+      URIRef.new("javascript:alert(\"pass\")")
+    end.should raise_error
+  end
+  
+  it "must not be a relative URI" do
+    lambda do
+      URIRef.new("foo")
+    end.should raise_error
+  end
+  
+  it "should discourage use of %-escaped characters" do
+    pending "TODO: figure out a way to discourage %-escaped character usage"
+  end
+end