libisi 0.3.0

data/lib/libisi/attribute.rb

@@ -0,0 +1,32 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+require "libisi/base.rb"
+require "libisi/concept/base.rb"
+require "libisi/attribute/base.rb"
+class Attribute < Base
+
+  def self.create(concept, val, options = {})
+    if concept.class == ActiverecordConcept
+      require "libisi/attribute/activerecord.rb"
+      return ActiverecordAttribute.new(concept, val)
+    end
+    return BaseAttribute.new(concept,val)
+  end
+
+  
+end

data/lib/libisi/attribute/activerecord.rb

@@ -0,0 +1,34 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+class ActiverecordAttribute < BaseAttribute
+
+  def name; @activerecord_column.name; end
+
+  def initialize(concept, column, options = {})
+    @activerecord_column = column
+    super(concept, column.name, options)    
+  end
+
+  def type
+    @activerecord_column.type
+  end
+  def unit
+    return nil
+  end
+    
+end

data/lib/libisi/attribute/base.rb

@@ -0,0 +1,33 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+class BaseAttribute
+  
+  attr_reader :instance, :name
+
+  def initialize(concept, name, options = {})
+    @concept = concept
+    @name = name
+  end
+
+  def type
+    method = "#{name}_type"
+    return concept.send(method) if context.respond_to?(method)
+    nil
+  end
+
+end

data/lib/libisi/base.rb

@@ -0,0 +1,109 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+require "libisi/tee"
+class Base
+  
+  def output_types; {};  end
+  def self.output_endings
+    output_types.map {|key, endings| endings}.flatten.sort
+  end
+  def self.type_from_ending(ending)
+    output_types.each {|t, endings|
+      return t if endings.include?(ending)
+    }
+    nil
+  end
+
+  def self.output(file)
+    $log.debug("Looking for outputter in #{self.name} for file #{file}")
+    return false unless (file.to_s =~ /\.([^\.]+)$/)    
+    ending = $1
+    t = type_from_ending(ending)
+    $log.debug("Type for ending #{ending.inspect} is #{t.inspect}")
+    return false unless t
+
+    file = Pathname.new(file)
+    
+    new_child = create_output(t, ending, file)
+    # we have to add this to the
+    # global variabel - if this is
+    # nil, the method handes itself
+    return true unless new_child
+
+    add_output(new_child)
+  end
+
+  def self.add_output(new_child)
+    curr = global_variable
+    $log.debug("Current #{self.name} is #{curr.class.name}")
+    case curr
+    when NilClass
+      $log.debug("Setting new child as only instance.")
+      curr = new_child
+    when Tee
+	$log.debug("Setting new child as tee to #{curr.children.length} other instance.")
+      curr.add_child(new_child)
+    else
+      $log.debug("Setting new child with new tee to another instance.")
+      curr = Tee.new([curr, new_child])
+    end
+    self.global_variable = curr
+    curr    
+  end
+
+  def self.create_output(type, ending, file)
+    $log.debug("Create new output of type #{type} to file #{file}")
+    create(type,:writer => file.open("w"))
+  end
+
+  def self.init(options = {})
+    $log.debug("Initialize #{self.class.name}")
+  end
+
+  def self.global_variable
+    eval("$#{self.name.downcase}")
+  end
+  def self.global_variable=(val)
+    eval("$#{self.name.downcase} = val")
+  end
+  
+  def self.change(type, options = {})
+    $log.debug("Change #{self.class.name} to type #{type} with options #{options.inspect}")
+    self.global_variable = create(type, options)
+  end
+
+  def self.load(type_name, options = {})
+    type_name = type_name.to_s
+    raise "Hacking attack!!" unless type_name.class == String
+    raise "Unexpected #{self.name} name #{type_name}." unless type_name =~ /^[a-zA-Z][a-zA-Z0-9]*$/
+    require "libisi/#{self.name.downcase}/#{type_name}.rb"
+    eval("#{type_name.capitalize}#{self.name}")
+  end
+
+  def self.create(type_name, options = {})
+    klass = load(type_name)
+    if klass.respond_to?(:instanciate)
+      ret = klass.instanciate(options)
+      raise "#{klass.name} created null object!" if ret.nil?
+      ret
+    else
+      klass.new(options)
+    end
+  end
+
+end

data/lib/libisi/bridge.rb

@@ -0,0 +1,21 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+require "libisi/base.rb"
+class Bridge < Base
+  
+end

data/lib/libisi/bridge/base.rb

@@ -0,0 +1,23 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+class BaseBridge
+
+  def import(library)
+  end
+
+end

data/lib/libisi/bridge/java.rb

@@ -0,0 +1,71 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+require "libisi/bridge/base"
+
+raise "Java home is not set" unless
+  ENV["JAVA_HOME"]
+
+ld_path = [ENV["LD_LIBRARY_PATH"],
+  Pathname.new("#{ENV["JAVA_HOME"]}/jre/lib/i386").realpath.to_s,
+  Pathname.new("#{ENV["JAVA_HOME"]}/jre/lib/i386/client").realpath.to_s].compact.join(":")
+
+ENV["LD_LIBRARY_PATH"] = ld_path unless ENV["LD_LIBRARY_PATH"]
+
+$log.debug("JAVA_HOME is #{ENV["JAVA_HOME"]}")
+$log.debug("LD_LIBRARY_PATH is #{ENV["LD_LIBRARY_PATH"]}")
+
+# maybe this must be executed to work
+# ln -s /usr/lib/jvm/java-1.5.0-sun-1.5.0.14/jre/lib/i386/libmlib_image.so /usr/lib
+
+require 'rjb'
+
+class JavaBridge < BaseBridge  
+  DEFAULT_LIBRARIES = [
+    "/usr/share/java/jcommon.jar",
+    ENV["LD_LIBRARY_PATH"]
+  ]    
+
+  def self.load(jar_files)
+    jar_files = [jar_files] if jar_files.class == String
+    Rjb::load(classpath = (DEFAULT_LIBRARIES + jar_files).join(":"), jvmargs=[])
+  end
+
+  def self.import(class_name, options = {})
+    @classes ||= []
+
+    import_command = "Rjb::import('#{class_name}')"    
+
+    new_class_name = "#{class_name.split(".")[-1]}"
+    if options[:prefix]
+      new_class_name = "#{options[:prefix]}#{new_class_name}"
+    end
+
+    if @classes.include?(new_class_name)
+      #      $log.warn("#{new_class_name} already imported") 
+      return eval("#{new_class_name}")
+    end
+
+    eval_string = "#{new_class_name} = #{import_command}"
+    
+    $log.info("Loading java class by #{eval_string.inspect}")
+    res = eval(eval_string)
+    @classes << new_class_name
+    res
+  end 
+  
+end

data/lib/libisi/bridge/python.rb

@@ -0,0 +1,37 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+require "libisi/bridge/base"
+require 'rubypython'
+
+# mh, python ruby needs this method
+unless "x".respond_to?("end_with?")
+  class String
+    def end_with?(xx)
+      self[(-xx.length)..-1] == xx
+    end
+  end
+end
+
+RubyPython.start
+
+class PythonBridge < BaseBridge  
+
+  def self.import(klass)
+    RubyPython.import(klass)
+  end
+end  

data/lib/libisi/cache.rb

@@ -0,0 +1,21 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+require "libisi/base.rb"
+class Cache < Base
+
+end

data/lib/libisi/cache/base.rb

@@ -0,0 +1,67 @@
+# Copyright (C) 2007-2010 Logintas AG Switzerland
+#
+# This file is part of Libisi.
+#
+# Libisi is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# Libisi is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Libisi.  If not, see <http://www.gnu.org/licenses/>.
+
+class BaseCache
+  
+  attr_accessor :maxcount
+  def initialize(options = {})
+    @maxcount = (options[:maxcount] or 1000)    
+    @cache = OrderedHash.new
+  end
+
+  def fetch(key, options = {}, &block)
+    if has_key?(key)
+      return get(key)
+    else
+      raise "No block given" unless block
+      value = case block.arity
+	      when 0
+		yield
+	      when 1
+		yield(key)
+	      when 2
+		yield(key, options)
+	      else
+		raise "Unexpected arity count of fetch block #{block.arity}"
+	      end
+	
+      set(key,value)
+      value
+    end
+  end
+
+  def get(key)
+    @cache[key]
+  end
+
+  def set(key, value)
+    while @cache.length >= maxcount
+      @cache.delete(@cache.first.keys[0])
+    end
+    
+    @cache[key] = value
+  end
+
+  def delete(key)
+    @cache.delete(key)
+  end
+
+  def has_key?(key)
+    @cache.has_key?(key)
+  end
+
+end