talia_core 0.5.4 → 0.7.0

data/generators/talia_swicky/templates/test/functional/swicky_notebooks_controller_test.rb

@@ -0,0 +1,44 @@
+require 'test_helper'
+
+class SwickyNotebooksControllerTest < ActionController::TestCase
+  
+  def setup
+    @notebook = Swicky::Notebook.new('dan', 'booky')
+    @notebook_url = (N::LOCAL + 'users/dan/swicky_notebooks/bookyurl').to_s
+    @testpointer = "http://dbin.org/swickynotes/demo/HanselAndGretel.htm#xpointer(start-point(string-range(//BODY/DIV[1]/TABLE[1]/TBODY[1]/TR[1]/TD[2]/P[46]/SPAN[1]/SPAN[1]/text()[1],'',7))/range-to(string-range(//BODY/DIV[1]/TABLE[1]/TBODY[1]/TR[1]/TD[2]/P[47]/SPAN[1]/text()[1],'',189)))"
+  end
+  
+  def teardown
+    @notebook.delete
+  end
+  
+  def test_index_empty
+    get(:index, :user_name => 'admin')
+    assert_response(:success)
+    assert_tag :ul, :children => { :count => 0 }
+  end
+  
+  def test_index
+    load_notebook
+    get(:index, :user_name => 'admin')
+    assert_response(:success)
+    assert_select('ul') { assert_select 'li', @notebook_url }
+  end
+  
+  def test_index_xml
+    load_notebook
+    get(:index, { :user_name => 'admin' }, :headers => { :accept => 'application/xml' })
+    assert_select('notebooks') { assert_select 'notebook', @notebook_url }
+  end
+  
+  def test_user_missing
+    assert_raises(ActiveRecord::RecordNotFound) { get(:index, :user_name => 'foo') }
+  end
+  
+  private
+  
+  def load_notebook
+    @notebook.load(File.join(ActiveSupport::TestCase.fixture_path, "notebook.rdf"))
+  end
+  
+end

data/lib/core_ext/boolean.rb

@@ -0,0 +1,23 @@
+class TrueClass
+  
+  # See String#yes? from the core extensions. Always true here.
+  def yes? ; true ; end
+  alias_method :true?, :yes?
+  
+  # See String#no? from the core extensions. Always false here.
+  def no? ; false ; end
+  alias_method :false?, :no?
+  
+end
+
+class FalseClass
+  
+  # See String#yes? from the core extensions. Always false here.
+  def yes? ; false ; end
+  alias_method :true?, :yes?
+  
+  # See String#no? from the core extensions. Always true here.
+  def no? ; true ; end
+  alias_method :false?, :no?
+  
+end

data/lib/core_ext/jdbc_rake_monkeypatch.rb

@@ -0,0 +1,22 @@
+# Patches a problem that prevents the default rake unit test task working nicely with the
+# JDBC adapter. Note that for this to work correctly, the database type must be set
+# to "mysql" instead of "jdbcmysql"
+
+if((RUBY_PLATFORM =~ /java/) && defined?(ActiveRecord::ConnectionAdapters::JdbcAdapter))
+
+  require 'jdbc_adapter/jdbc_mysql'
+
+  assit(defined?(JdbcSpec::MySQL))
+
+  module JdbcSpec # :nodoc:
+    module MySQL # :nodoc: 
+
+      alias_method :real_recreate_database, :recreate_database
+      def recreate_database(name, dummy = nil) # :nodoc:
+        real_recreate_database(name)
+      end
+
+    end
+  end
+
+end

data/lib/core_ext/nil_class.rb

@@ -0,0 +1,11 @@
+class NilClass
+  
+  # See String#yes? from the core extensions. Always false here
+  def yes? ; false ; end
+  alias_method :true?, :yes?
+  
+  # See String#no? from the core extensions. Always true here
+  def no? ; true ; end
+  alias_method :false?, :no?
+  
+end

data/lib/core_ext/object.rb

@@ -0,0 +1,34 @@
+class Object
+
+
+  class TryObject
+
+    def initialize(original_object)
+      @original_object = original_object
+      
+    end
+
+    def method_missing(method, *args, &block)
+      @original_object.send(method, *args, &block) if(@original_object.respond_to? method) 
+    end
+    
+    # Hacky, Hacky, make all public private (we always want to call on @original_object)
+    # new and alloc etc will automatically be ignored as they raise an exception
+    public_instance_methods.each do |pub_method|
+      begin ; private pub_method ; rescue NameError ; end
+    end
+    
+  end
+
+  
+  # Tries to call the given method if it exists. If the method doesn't
+  # exist, it will just return nil
+  def try_call(*args, &block)
+    if args.empty?
+      TryObject.new(self)
+    else
+      self.send(*args, &block) if(self.respond_to?(args.first))
+    end
+  end
+  
+end

data/lib/core_ext/string.rb

@@ -9,4 +9,19 @@ class String
     N::URI.new(self)
   end
   
+  # Returns true if the string is "yes" or "true", regardless
+  # of capitalization and leading/trailing spaces
+  def yes?
+    me = self.downcase.strip
+    me == 'yes' || me == 'true'
+  end
+  alias_method :true?, :yes?
+  
+  # Like #yes?, just checking for "no" or "false"
+  def no?
+    me = self.downcase.strip
+    me == 'no' || me == 'false'
+  end
+  alias_method :false?, :no?
+  
 end

data/lib/custom_template.rb

@@ -1,4 +1,6 @@
-class CustomTemplate < ActiveRecord::Base
+# Class for custom templates (e.g. css and xslt). Mainly created for customization in the
+# Discovery project. May need a major rework prior of being generally useful.
+class CustomTemplate < ActiveRecord::Base # :nodoc:
   hobo_model # Don't put anything above this
   
   validates_presence_of :name, :content

data/lib/loader_helper.rb

@@ -42,7 +42,13 @@ module TLoad
     require_module("actionpack", "action_controller", "/../../../rails/actionpack", RAILS_GEM_VERSION)
     # This sets the automatic loader path for Talia, allowing the ActiveSupport
     # classes to automatically load classes from this directory.
-    load_paths = ActiveSupport::Dependencies.load_paths
+    # From 2.3.9(?) onward a new method autoload_path is "suggested" but 2.3.8 does not know it and gives error.
+    # This is to avoid the error:
+    begin
+      load_paths = ActiveSupport::Dependencies.autoload_paths
+    rescue NoMethodError
+      load_paths = ActiveSupport::Dependencies.load_paths
+    end      
     load_paths << TLoad.start_dir unless(load_paths.include?(TLoad.start_dir))
     # Add the other plugins to the path, if we have a Rails root
     if(defined?(RAILS_ROOT))
@@ -58,7 +64,14 @@ module TLoad
     root_dir = File.expand_path(File.join(File.dirname(__FILE__), '..'))
     Kernel.const_set(:TALIA_CODE_ROOT, root_dir) unless(defined?(TALIA_CODE_ROOT))
     lib_dir = File.join(root_dir, 'lib')
-    ActiveSupport::Dependencies.load_paths << lib_dir unless(ActiveSupport::Dependencies.load_paths.include?(lib_dir))
+    # From 2.3.9(?) onward a new method autoload_path is "suggested" but 2.3.8 does not know it and gives error.
+    # This is to avoid the error:
+    begin
+      load_paths = ActiveSupport::Dependencies.autoload_paths
+    rescue NoMethodError
+      load_paths = ActiveSupport::Dependencies.load_paths
+    end      
+    load_paths << lib_dir unless(load_paths.include?(lib_dir))
   end
   
   private
@@ -75,4 +88,4 @@ module TLoad
 
 end
 
-TLoad.start_dir # Load the paths and start directory
+TLoad.start_dir # Load the paths and start directory

data/lib/mysql.rb

@@ -4,7 +4,7 @@
 # tommy@tmtm.org
 #
 
-class Mysql
+class Mysql # :nodoc:
 
   VERSION = "4.0-ruby-0.2.6-plus-changes"
 
@@ -576,7 +576,7 @@ class Mysql
     raise Error::new(@errno, @error)
   end
 
-  class Result
+  class Result # :nodoc:
     def initialize(mysql, fields, field_count, data=nil)
       @handle = mysql
       @fields = fields
@@ -691,7 +691,7 @@ class Mysql
 
   end
 
-  class Field
+  class Field # :nodoc:
     # Field type
     TYPE_DECIMAL = 0
     TYPE_TINY = 1
@@ -759,7 +759,7 @@ class Mysql
     end
   end
 
-  class Error < StandardError
+  class Error < StandardError # :nodoc:
     # Server Error
     ER_HASHCHK			= 1000
     ER_NISAMCHK			= 1001
@@ -1076,7 +1076,7 @@ class Mysql
     end
   end
 
-  class Net
+  class Net # :nodoc:
     def initialize(sock)
       @sock = sock
       @pkt_nr = 0
@@ -1145,7 +1145,7 @@ class Mysql
 
   end
 
-  class Random
+  class Random # :nodoc:
     def initialize(seed1, seed2)
       @max_value = 0x3FFFFFFF
       @seed1 = seed1 % @max_value
@@ -1161,7 +1161,7 @@ class Mysql
 
 end
 
-class << Mysql
+class << Mysql # :nodoc:
   def init()
     Mysql::new :INIT
   end

data/lib/progressbar.rb

@@ -9,7 +9,7 @@
 # of Ruby's license.
 #
 
-class ProgressBar
+class ProgressBar # :nodoc:
   VERSION = "0.9"
 
   def initialize (title, total, out = STDERR)
@@ -228,7 +228,7 @@ class ProgressBar
   end
 end
 
-class ReversedProgressBar < ProgressBar
+class ReversedProgressBar < ProgressBar # :nodoc:
   def do_percentage
     100 - super
   end

data/lib/swicky/exhibit_json/item.rb

@@ -0,0 +1,129 @@
+require 'digest/md5'
+
+module Swicky
+  module ExhibitJson
+
+    # An item in the Exhibit JSON. Each item belongs to a collection.
+    class Item
+
+      attr_reader :element, :collection
+
+
+      def initialize(element, collection)
+        raise(ArgumentError, "Element must have an URI, was a #{element.class.name}: #{element.inspect}") unless(element.respond_to?(:uri))
+        raise(ArgumentError, "Element must always belong to a collection") unless(collection)
+        @original_properties = {}
+        @element = element
+        @properties = {}
+        @collection = collection
+        create_label!
+        @properties['uri'] = self.uri
+        @properties['id'] = @collection.make_id(self)
+        @properties['hash'] = ('h_' << Digest::MD5.hexdigest(self.uri))
+      end
+
+      def uri
+        @element.uri.to_s
+      end
+      
+      def id
+        @properties['id']
+      end
+      
+      def label
+        @properties['label']
+      end
+      
+      def [](key)
+        @properties[key]
+      end
+      
+      def []=(key, value)
+        @properties[key] = value
+      end
+      
+      def add_properties(properties)
+        @original_properties = properties
+        create_label!
+        create_types!
+        create_properties!
+      end
+      
+      def to_json(*a)
+        @properties.to_json(*a)
+      end
+      
+      private
+
+      def create_label!
+        label = delete_with_key(N::RDFS.label) # Get the "real" label from the RDFS
+        if(@properties['label'].blank?) 
+          # In this case we have no existing label on the item,
+          # so if we don't have the RDFS label we create one from the URI
+          label = label.blank? ? label_for(self.uri) : label.first
+          @properties['label'] = label
+        else
+          # We already have a label on the item, which we only 
+          # overwrite in case there is a "real" label
+          @properties['label'] = label.first unless(label.blank?)
+        end
+        assit_kind_of(String, @properties['label'])
+      end
+      
+      def create_types!
+        types = delete_with_key(N::RDF.type)
+        types = [ N::RDF.Resource ] if(types.blank?)
+        types.collect! { |t| collection.add_type(t) }
+        types.uniq!
+        @properties['type'] = types
+      end
+      
+      def create_properties!
+        @original_properties.each do |key, values|
+          value_type = values.first.respond_to?(:uri) ? 'item' : 'text'
+          prop = collection.add_property(key, value_type)
+          prop_values = values.collect do |object| 
+            object.respond_to?(:uri) ? collection.add_item(object) : object
+          end
+          prop_values.uniq!
+          if(@properties[prop].blank?)
+            @properties[prop] = (prop_values.size == 1) ? prop_values.first : prop_values
+          else
+            if(@properties[prop].is_a?(Array))
+              @properties[prop] += prop_values
+            else
+              @properties[prop] = (prop_values << @properties[prop])
+            end
+          end
+        end
+      end
+
+      # Little kludge for getting badly-specified keys
+      def delete_with_key(key)
+        real_key = @original_properties.keys.find { |k| k.to_s == key.to_s }
+        @original_properties.delete(real_key)
+      end
+
+      # Get the part of the the uri that can be used as a label
+      def label_for(uri)
+        if(uri =~ /xpointer/)
+          'An Xpointer'
+        else
+          uri_fragment(uri)
+        end
+      end
+
+      def uri_fragment(uri)
+        raise(ArgumentError, "Must have a real uri") unless(uri)
+        fragment_match = /[\/#]?([^\/#]+)\Z/.match(uri.to_s)
+        fragment_match ||= /([^\.\/]+)\.[^\.]*\Z/.match(uri.to_s)
+        if(fragment_match && fragment_match[1] && (fragment_match[1].size > 2))
+          URI.escape(fragment_match[1])
+        else
+          Digest::MD5.hexdigest(uri.to_s)
+        end
+      end
+
+    end
+  end
+end

data/lib/swicky/exhibit_json/item_collection.rb

@@ -0,0 +1,129 @@
+require 'digest/md5'
+
+module Swicky
+  module ExhibitJson
+
+    # Takes a number of triples and encodes them in the SIMILE JSON format.
+    # See http://simile.mit.edu/wiki/Exhibit/Understanding_Exhibit_Database
+    class ItemCollection
+
+      # Intialize with the given triples. The original xpointer will (optionally)
+      # be passed into the resulting JSON for reference
+      def initialize(triples, original_xpointer = nil)
+        @triples = triples
+        @original_xpointer = original_xpointer
+        triple_hash.each { |object, values| add_item(object, values) }
+      end
+
+      # Returns the Exhibit-compatible JSON representation
+      def to_json(*a)
+        my_types = {}
+        types.values.each { |t| my_types[t.id] = t }
+        my_properties = {}
+        properties.values.each { |p| my_properties[p.id] = p }
+        result = {
+          'items' => items.values,
+          'types' => my_types,
+          'properties' => my_properties
+        }
+        if(@original_xpointer)
+          result['annotation-for'] = {
+            'uri' => @original_xpointer,
+            'hash' => ('h_' << Digest::MD5.hexdigest(@original_xpointer))
+          }
+        end
+        result.to_json(*a)
+      end
+      
+      # Add a new item to the collection. This passes in a resource-like
+      # object and returns the id of the resulting item
+      def add_item(item, values = nil)
+        items[item.to_s] = Item.new(item, self) if(!items[item.to_s])
+        items[item.to_s].add_properties(values) if(values)
+        items[item.to_s].id
+      end
+
+      # As #add_item, but for types
+      def add_type(type)
+        types[type.to_s] = Item.new(type, self) if(!types[type.to_s])
+        types[type.to_s].id
+      end
+      
+      # As #add_item, but for properties. This must have a value type
+      # which will be added to the resulting property description
+      def add_property(prop, value_type)
+        properties[prop.to_s] = Item.new(prop, self) if(!properties[prop.to_s])
+        if(!properties[prop.to_s]['valueType'])
+          properties[prop.to_s]['valueType'] = value_type
+        end
+        properties[prop.to_s].id
+      end
+
+      # Make a unique id for the given item, based on the label of the item
+      def make_id(item)
+        if(id_hash_inv[item.uri]) # Already existing id
+          id_hash_inv[item.uri]
+        else
+          first_free(item.label, item.uri)
+        end
+      end
+
+      private
+
+      def triple_hash
+        @triple_hash ||= begin
+          triple_hash = {}
+          # Sort all the triples into a hash, mapping all predicates
+          # to a single subject entry and all objects into a single
+          # predicate entry for each subject or predicate
+          @triples.each do |triple|
+            subject = triple.shift.to_uri
+            triple_hash[subject] ||= {}
+            predicate = triple.shift.to_uri
+            triple_hash[subject][predicate] ||= []
+            triple_hash[subject][predicate] << triple.first
+          end
+          triple_hash
+        end
+      end
+
+      # Finds the first "free" element in the hash. This checks
+      # if hash[initial_value] is empty or equal to "value", if that is not the
+      # case if will try "initial_value2", "initial_value3", ... until the
+      # condition is fulfilled
+      def first_free(initial_key, uri)
+        candidate = initial_key
+        id_hash[candidate] ||= uri
+        count = 1
+        while(id_hash[candidate] != uri)
+          count += 1
+          candidate = "#{initial_key}#{count}"
+          id_hash[candidate] ||= uri
+        end
+        id_hash_inv[uri] ||= candidate
+        candidate
+      end
+      
+      def types
+        @types ||= {}
+      end
+      
+      def properties
+        @properties ||= {}
+      end
+
+      def id_hash
+        @id_hash ||= {}
+      end
+      
+      def items
+        @items ||= {}
+      end
+
+      def id_hash_inv
+        @id_hash_inv ||= {}
+      end
+
+    end
+  end
+end