metade-rena 0.0.2

data/README.txt

@@ -0,0 +1,48 @@
+= rena
+
+* http://github.com/tommorris/rena
+
+== DESCRIPTION:
+
+Rena is an RDF library for Ruby.
+
+== FEATURES/PROBLEMS:
+
+* Features
+
+== SYNOPSIS:
+
+  Synopsis
+
+== REQUIREMENTS:
+
+* Addressable gem
+
+== INSTALL:
+
+* (sudo gem install rena)
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 Tom Morris
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,54 @@
+require 'rubygems'
+require 'rake'
+require 'spec/rake/spectask'
+
+task :default => [:spec]
+
+desc "Install dependencies"
+task :dependencies do
+  require ''
+  gems = ['addressable/uri', 'treetop']
+  gems.each do |g|
+    g2 = g.split('/')[0]
+    begin
+      require g
+    rescue
+      sh "sudo gem install " + g2
+    end
+  end
+end
+
+desc "Pushes to git"
+task :push do
+  sh "git push --all"
+  sh "growlnotify -m \"Updates pushed\" \"Git\""
+end
+
+task :spec do
+  sh "spec --colour spec"
+end
+
+desc "Turns spec results into HTML and publish to web (Tom only!)"
+task :spec_html do
+  sh "spec --format html:rena_new_spec.html spec"
+  sh "scp rena_new_spec.html bbcityco@bbcity.co.uk:www/tom/files/rena_new_spec.html"
+  sh "rm rena_new_spec.html"
+end
+
+desc "Turns spec results into local HTML"
+task :spec_local do
+  sh "spec --format html:rena_new_spec.html spec/"
+#  sh "open rena_new_spec.html"
+end
+
+desc "Run specs through RCov"
+Spec::Rake::SpecTask.new('coverage') do |t|
+  t.spec_files = FileList['spec']
+  t.rcov = true
+  t.rcov_opts = ['--exclude', 'spec,test,\/Library\/Ruby\/Gems\/1.8\/gems']
+end
+
+desc "Runs specs on JRuby"
+task :jspec do
+  sh "jruby -S `whereis spec` --colour spec"
+end

data/lib/rena/bnode.rb

@@ -0,0 +1,69 @@
+module Rena
+  class BNode
+    attr_accessor :identifier
+    def initialize(identifier = nil)
+      if identifier != nil && self.valid_id?(identifier) != false
+        @identifier = identifier
+      else
+        @identifier = "bn" + self.hash.to_s
+      end
+    end
+
+    def eql? (other)
+      other.is_a?(self.class) && other.identifier == self.identifier
+    end
+
+    alias_method :==, :eql?
+
+    ## 
+    # Exports the BNode in N-Triples form.
+    #
+    # ==== Example
+    #   b = BNode.new; b.to_n3  # => returns a string of the BNode in n3 form
+    #
+    # ==== Returns
+    # @return [String] The BNode in n3.
+    #
+    # @author Tom Morris
+
+    def to_n3
+      "_:" + @identifier
+    end
+
+
+    ## 
+    # Exports the BNode in N-Triples form.
+    #
+    # ==== Example
+    #   b = BNode.new; b.to_ntriples  # => returns a string of the BNode in N-Triples form
+    #
+    # ==== Returns
+    # @return [String] The BNode in N-Triples.
+    #
+    # @author Tom Morris
+
+    def to_ntriples
+      self.to_n3
+    end
+
+    ##
+    # Returns the identifier as a string.
+    # 
+    # === Returns
+    # @return [String] Blank node identifier.
+    #
+    # @author Tom Morris
+    def to_s
+      @identifier
+    end  
+
+    protected
+    def valid_id? name
+      if name =~ /^[a-zA-Z_][a-zA-Z0-9]*$/
+        true
+      else
+        false
+      end
+    end
+  end
+end

data/lib/rena/exceptions/about_each_exception.rb

@@ -0,0 +1,2 @@
+class AboutEachException
+end

data/lib/rena/exceptions/uri_relative_exception.rb

@@ -0,0 +1,2 @@
+class UriRelativeException < RuntimeError
+end

data/lib/rena/graph.rb

@@ -0,0 +1,188 @@
+require 'rena/namespace'
+require 'rena/bnode'
+require 'rena/uriref'
+require 'rena/literal'
+require 'rena/triple'
+
+module Rena
+  class Graph
+    attr_accessor :triples, :nsbinding
+
+    def initialize
+      @triples = []
+      @nsbinding = {}
+    end
+
+    def size
+      @triples.size
+    end
+
+    def each
+      @triples.each { |value| yield value }
+    end
+    
+    def [] (item)
+      @triples[item]
+    end
+
+    def each_with_subject(subject)
+      @triples.each do |value|
+        yield value if value.subject == subject
+      end
+    end
+
+    def get_resource(subject)
+      temp = []
+      each_with_subject(subject) do |value|
+        temp << subject
+      end
+      if temp.any?
+        Resource.new(temp)
+      end
+    end
+
+    ## 
+    # Adds a triple to a graph directly from the intended subject, predicate, and object.
+    #
+    # ==== Example
+    #   g = Graph.new; g.add_triple(BNode.new, URIRef.new("http://xmlns.com/foaf/0.1/knows"), BNode.new) # => results in the triple being added to g; returns an array of g's triples
+    #
+    # @param [URIRef, BNode] s the subject of the triple
+    # @param [URIRef] p the predicate of the triple
+    # @param [URIRef, BNode, Literal, TypedLiteral] o the object of the triple
+    #
+    # ==== Returns
+    # @return [Array] An array of the triples (leaky abstraction? consider returning the graph instead)
+    #
+    # @raise [Error] Checks parameter types and raises if they are incorrect.
+    # @author Tom Morris
+
+    def add_triple(s, p, o)
+      @triples += [ Triple.new(s, p, o) ]
+    end
+
+    ## 
+    # Adds an extant triple to a graph
+    #
+    # ==== Example
+    #   g = Graph.new; t = Triple.new(BNode.new, URIRef.new("http://xmlns.com/foaf/0.1/knows"), BNode.new); g << t) # => results in the triple being added to g; returns an array of g's triples
+    #
+    # @param [Triple] t the triple to be added to the graph
+    #
+    # ==== Returns
+    # @return [Array] An array of the triples (leaky abstraction? consider returning the graph instead)
+    #
+    # @author Tom Morris
+
+
+    def << (triple)
+  #    self.add_triple(s, p, o)
+      @triples += [ triple ]
+    end
+
+    ## 
+    # Exports the graph to RDF in N-Triples form.
+    #
+    # ==== Example
+    #   g = Graph.new; g.add_triple(BNode.new, URIRef.new("http://xmlns.com/foaf/0.1/knows"), BNode.new); g.to_ntriples  # => returns a string of the graph in N-Triples form
+    #
+    # ==== Returns
+    # @return [String] The graph in N-Triples.
+    #
+    # @author Tom Morris
+
+    def to_ntriples
+      @triples.collect do |t|
+        t.to_ntriples
+      end * "\n"
+    end
+
+    ## 
+    # Creates a new namespace given a URI and the short name and binds it to the graph.
+    #
+    # ==== Example
+    #   g = Graph.new; g.namespace("http://xmlns.com/foaf/0.1/", "foaf") # => binds the Foaf namespace to g
+    #
+    # @param [String] uri the URI of the namespace
+    # @param [String] short the short name of the namespace
+    #
+    # ==== Returns
+    # @return [Namespace] The newly created namespace.
+    #
+    # @raise [Error] Checks validity of the desired shortname and raises if it is incorrect.
+    # @raise [Error] Checks that the newly created Namespace is of type Namespace and raises if it is incorrect.
+    # @author Tom Morris
+
+    def namespace(uri, short)
+      self.bind Namespace.new(uri, short)
+    end
+
+    def bind(namespace)
+      if namespace.class == Namespace
+        @nsbinding["#{namespace.short}"] = namespace
+      else
+        raise
+      end
+    end
+
+    def has_bnode_identifier?(bnodeid)
+      temp_bnode = BNode.new(bnodeid)
+      returnval = false
+      @triples.each { |triple|
+        if triple.subject.eql?(temp_bnode)
+          returnval = true
+          break
+        end
+        if triple.object.eql?(temp_bnode)
+          returnval = true
+          break
+        end
+      }
+      return returnval
+    end
+
+    def get_bnode_by_identifier(bnodeid)
+      temp_bnode = BNode.new(bnodeid)
+      each do |triple|
+        if triple.subject == temp_bnode
+          return triple.subject
+        end
+        if triple.object == temp_bnode
+          return triple.object
+        end
+      end
+      return false
+    end
+    
+    def get_by_type(object)
+      out = []
+      each do |t|
+        next unless t.is_type?
+        next unless case object
+                    when String
+                      object == t.object.to_s
+                    when Regexp
+                      object.match(t.object.to_s)
+                    else
+                      object == t.object
+                    end
+        out << t.subject
+      end
+      return out
+    end
+    
+    def join(graph)
+      if graph.class == Graph
+        graph.each { |t| 
+          self << t
+        }
+      else
+        raise "join requires you provide a graph object"
+      end
+    end
+  #  alias :add, :add_triple
+    #  alias (=+, add_triple)
+    private
+
+  end
+end

data/lib/rena/literal.rb

@@ -0,0 +1,207 @@
+module Rena
+  class Literal
+    class Encoding
+      def self.integer
+        @integer ||= coerce "http://www.w3.org/2001/XMLSchema#int"
+      end
+
+      def self.float
+        @float ||= coerce "http://www.w3.org/2001/XMLSchema#float"
+      end
+
+      def self.string
+        @string ||= coerce "http://www.w3.org/2001/XMLSchema#string"
+      end
+
+      def self.coerce(string_or_nil)
+        if string_or_nil.nil? || string_or_nil == ''
+          the_null_encoding
+        else
+          new string_or_nil
+        end
+      end
+
+      class Null
+        def to_s
+          ''
+        end
+
+        def format_as_n3(content)
+          "\"#{content}\""
+        end
+
+        def format_as_trix(content)
+          "<plainLiteral>#{content}</plainLiteral>"
+        end
+
+        def inspect
+          "<theRena::TypeLiteral::Encoding::Null>"
+        end
+
+        def xmlliteral?
+          false
+        end
+      end
+
+      def self.the_null_encoding
+        @the_null_encoding ||= Null.new
+      end
+
+      attr_reader :value
+      def initialize(value)
+        @value = value
+      end
+
+      def should_quote?
+        @value != self.class.integer.to_s
+      end
+
+      def ==(other)
+        case other
+        when String
+          other == @value
+        when self.class
+          other.value == @value
+        else
+          false
+        end
+      end
+
+      def hash
+        @value.hash
+      end
+
+      def to_s
+        @value
+      end
+
+      def format_as_n3(content)
+        quoted_content = should_quote? ? "\"#{content}\"" : content
+        "#{quoted_content}^^<#{value}>"
+      end
+
+      def format_as_trix(value)
+        "<typedLiteral datatype=\"#{@value}\">#{value}</typedLiteral>"
+      end
+
+      def xmlliteral?
+        @value == "http://www.w3.org/1999/02/22-rdf-syntax-ns#XMLLiteral"
+      end
+    end
+
+    class Language < Encoding
+      def initialize(string)
+        @value = string.downcase
+      end
+
+      def clean(string)
+        case string
+        when "eng"; "en"
+        else string
+        end
+      end
+
+      def format_as_n3(contents)
+        "\"#{contents}\"@#{@value}"
+      end
+
+      def format_as_trix(contents)
+        "<plainLiteral xml:lang=\"#{@value}\">#{contents}</plainLiteral>"
+      end
+      
+      def == (other)
+        case other
+        when String
+          other == @value
+        when self.class
+          other.value == @value
+        end
+      end
+    end
+
+    attr_accessor :contents, :encoding
+    def initialize(contents, encoding)
+      @contents = contents.to_s
+      unless encoding.is_a?(Encoding) || encoding.is_a?(Encoding::Null)
+        raise TypeError, "#{encoding.inspect} should be an instance of Encoding"
+      end
+      @encoding = encoding
+    end
+
+    def self.untyped(contents, language = nil)
+      new(contents, Language.coerce(language))
+    end
+
+    def self.typed(contents, encoding)
+      new(contents, Encoding.coerce(encoding))
+    end
+
+    def self.build_from(object)
+      new(object.to_s, infer_encoding_for(object))
+    end
+
+    def self.infer_encoding_for(object)
+      case object
+      when Integer; Encoding.integer
+      when Float;   Encoding.float
+      else          Encoding.string
+      end
+    end
+
+    require 'whatlanguage'
+    unless WhatLanguage.nil?
+      def self.infer_language_for(object)
+        inferred_lang = object.language
+        case inferred_lang
+        when :dutch; Language.new("nl")
+        when :english; Language.new("en")
+        when :farsi; Langauge.new("fa")
+        when :french; Language.new("fr")
+        when :german; Language.new("de")
+        when :pinyin; Language.new("zh-CN")
+        when :portugese; Language.new("pt")
+        when :russian; Language.new("ru")
+        when :spanish; Language.new("es")
+        when :swedish; Language.new("sv")
+        end
+      end
+      
+      def self.build_from_language(object)
+        new(object.to_s, infer_language_for(object))
+      end
+    end
+
+    class << self
+      protected :new
+    end
+
+    def == (obj)
+      obj.is_a?(self.class) && obj.contents == @contents && obj.encoding == @encoding
+    end
+
+    def to_n3
+      encoding.format_as_n3(@contents)
+    end
+
+    ## alias_method breaks subclasses! Beware! Here be dragons!
+    def to_ntriples
+      to_n3
+    end
+
+    def to_trix
+      encoding.format_as_trix(@contents)
+    end
+
+    def xmlliteral?
+      encoding.xmlliteral?
+    end
+    
+    def to_s
+      @contents.to_s
+    end
+    
+    def lang
+      encoding.is_a?(Language) ? encoding : nil
+    end
+  end
+end