libisi 0.3.0

data/lib/libisi/ui/kde.rb

@@ -0,0 +1,94 @@
+# 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/ui/base.rb"
+class KdeUI < BaseUI
+  def kdialog(option, text)
+    $log.debug("Kdialog: #{option.inspect} #{text.inspect}")
+    ret = system("kdialog",option, text)
+    $log.debug("Kdialog ret: #{ret.inspect}")
+    ret
+  end
+  def question(text, options = {})
+    kdialog("--yesno", text)
+  end
+  def warn(text, options = {})
+    kdialog("--sorry", text)
+  end
+  def info(text, options = {})
+    kdialog("--msgbox", text)
+  end
+  def info_non_blocking(text, options = {})
+    system("xmessage", "-timeout", "5", "-center",text)    
+  end
+  def error(text)
+    kdialog("--error", text)
+  end
+  def password(text)
+    $log.debug("Kdialog passwod: #{text.inspect}")
+    pw = open("|kdialog --password \"#{text}\"") {|f|
+      f.readlines.join.gsub(/\n$/,"")
+    }
+    if $?.exitstatus == 0
+      $log.debug("Pwlength: #{pw.length}")
+      pw
+    else
+      $log.debug("Pw: nil")
+      nil
+    end
+  end
+
+  def progress_bar_implementation(text,total)
+    ret = nil
+    begin
+      @pbar_progress = 0
+      @pbar = open("|kdialog --progressbar '#{text.gsub("'","\\'")}' #{total}") {|f| f.readlines.join.strip}
+      ret = yield
+      pmsg
+      system("dcop",@pbar,"close")
+      @pbar = nil
+    ensure
+      if @pbar
+	system("dcop",@pbar,"close")
+	@pbar = nil
+      end
+    end
+    ret
+  end
+  def progress(count)
+    return unless @pbar
+    @pbar_progress = count
+    system("dcop",@pbar,"setProgress",count.to_s)
+  end
+
+  def progress_message(message)
+    return unless @pbar
+    system("dcop",@pbar,"setLabel",message.to_s)
+  end
+  def progress_inc
+    progress(@pbar_progress + 1)
+  end
+  
+  def execute_in_console(command, options = {})
+    command = command_line_parse(command)
+    konsole = ["konsole", "-T", command.join(" "), "--nomenubar","--noframe","-e"]
+    new_command = konsole + command
+    $log.debug("Executing konsole command #{new_command.inspect}")
+    system(*new_command)
+  end
+
+end

data/lib/libisi/ui/nobody.rb

@@ -0,0 +1,29 @@
+# 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/ui/base.rb"
+class NobodyUI < BaseUI
+  def info(text, options = {})
+    system("logger -t '#{ENV["PROGRAM_NAME"]}' '#{text}'")
+  end
+
+  def question(text, options = {})
+    raise "Cannot ask question. Nobody is here." if options[:default].nil?
+    info(text + ": #{options[:default]}")
+    return options[:default]
+  end  
+end

data/lib/libisi/ui/rails.rb

@@ -0,0 +1,150 @@
+# 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/ui/base.rb"
+class RailsUI < BaseUI
+  $progress_names = {}
+  def info(text, options = {})
+    print "#{text}\n"
+  end
+
+  # PROGRESS    
+  def enable_progress_bar(val = true, &block)
+    raise "Need block around progress for rails ui." unless block_given?
+    params = eval("params",block.binding)
+    if val and not params[:no_progress]
+      @progress = true
+      
+      progress_name = params[:progress_name]
+      
+      if progress_name
+	eval("@progress_name = #{progress_name.inspect}",block.binding)
+	if params[:real_task]
+	  # now this processid will stay until
+	  # the task is finished, takover the file
+	  orig_file = progress_file(progress_name)
+	  new_file = progress_file(current_progress_name)
+	  begin
+	    FileUtils.mv(orig_file,new_file)
+	    orig_file.make_symlink(new_file)
+
+	    $progress_cache[Process.pid] = load_progress
+	  
+	    # this is the real task, go for it
+	    yield
+	    eval('render :layout => false', block.binding)
+	  ensure
+	    orig_file.delete if orig_file.exist?
+	    new_file.delete if new_file.exist?
+	    $progress_cache[Process.pid] = nil
+	  end
+	else
+	  # this is the progressbar call, render it
+	  eval('render :layout => false, :action => "../application/progress_bar"', block.binding)
+	end
+      else
+	# this is the initialization step
+	# create a new id for the progressbar
+	# this name must be able to be an id of a html tag
+	progress_name = current_progress_name
+	# make it unique
+	progress_name += "#{Time.now.to_i}"
+	eval("@progress_name = #{progress_name.inspect}",block.binding)
+	
+	$progress_cache[Process.pid] = {}
+	save_progress(progress_name)
+	$progress_cache[Process.pid] = nil
+	
+	# render a page with progressbar
+	# and a content for the main page
+	eval('render :action => "../application/progress_page"', block.binding)
+      end
+    else
+      @progress = false
+      yield
+    end
+    @progress = false
+  end
+
+  def progress_bar_implementation(text, total, &block)
+    if progress_bar_enabled?
+      $progress_cache[Process.pid] = {:count => total.to_i, :current => 0, :text => text}
+      save_progress
+      yield
+      $progress_cache[Process.pid] = nil
+      save_progress
+    else
+      yield
+    end
+  end
+
+  def progress(count)
+    $progress_cache[Process.pid][:current] = count
+    save_progress
+  end
+  def progress_inc
+    $progress_cache[Process.pid][:current] += 1
+    save_progress
+  end
+  def progress_message(text)
+    $progress_cache[Process.pid][:text] = text
+    save_progress
+  end
+  
+  def progress_values(name)
+    load_progress(name)
+  end
+  private
+  $progress_cache = {}
+  $progress_mutex ||= Mutex.new
+  def current_progress_name
+    "P#{Process.pid}"
+  end
+
+  def progress_file(name = nil)
+    name = current_progress_name if name.nil?
+    Pathname.new("/tmp/progress_#{name}")
+  end
+
+  def save_progress(name = nil)
+    name = current_progress_name if name.nil?
+    $progress_mutex.synchronize {
+      f = progress_file(name)
+      # save if more than 2 seconds
+      # have been passed till last 
+      # save
+      if !f.exist? or ((Time.new - f.mtime) > 2)
+	yaml = $progress_cache[Process.pid].to_yaml
+	f.open("w") {|f| f.write(yaml) }
+      end
+    }
+  end
+
+  def load_progress(name = nil)
+    name = current_progress_name if name.nil?
+    $progress_mutex.synchronize {
+      f = progress_file(name)
+      if f.exist?
+	YAML::load(f.readlines.join)
+      else
+	nil
+      end
+    }
+  end
+
+end
+

data/lib/libisi/ui/x11.rb

@@ -0,0 +1,55 @@
+# 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/ui/base.rb"
+class X11UI < BaseUI
+  def info(text, options = {})
+    system("xmessage", "-center",text)
+  end
+  def info_non_blocking(text, options = {})
+    system("xmessage", "-timeout", "5", "-center",text)    
+  end
+  def question(text, options = {})
+    system("xmessage", "-buttons","yes,no","-center",text)
+    $?.exitstatus == 101
+  end
+
+  def password(text)
+    Open3.popen3("pinentry") { |stdin, stdout, stderr|
+      stdin.write("SETPROMPT Password\n")
+      $log.debug(stdout.readline)
+      stdin.write("SETDESC " + text.gsub("\n","\\\n") + "\n")
+      $log.debug(stdout.readline)
+      stdin.write("GETPIN\n")
+      $log.debug(stdout.readline)
+      ans = stdout.readline
+      return nil if ans == "ERR 111 canceled\n"
+      unless ans =~ /^D (.*)\n$/
+	raise "Unexpected answer #{ans} from pinentry."
+      end
+      $1.gsub("%25","%")
+    }
+  end
+
+  def execute_in_console(command, options = {})
+    command = command_line_parse(command)
+    konsole = ["xterm", "-T", command.join(" "),"-e"]
+    new_command = konsole + command
+    $log.debug("Executing konsole command #{new_command.inspect}")
+    system(*new_command)
+  end
+end

data/lib/libisi/uri.rb

@@ -0,0 +1,42 @@
+# 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/uri/activerecord.rb"
+require "uri"
+class Uri < Base
+
+  def self.parse(string)
+    URI.parse(string)
+  rescue URI::InvalidURIError
+    nil
+  end
+
+  def self.create(uri, options = {})
+    uri = "file://localhost/#{Pathname.pwd + uri}" unless URI::parse(uri.to_s).scheme
+    uri = URI::parse(uri.to_s)
+        
+    if ActiveRecordData.supports?(uri)
+      ActiveRecordData.new(uri,options)
+    else
+      require "libisi/uri/#{uri.scheme.to_s}.rb"    
+      klass = eval("#{uri.scheme.capitalize}Data")
+      klass.new(uri, options)
+    end
+  end
+
+end

data/lib/libisi/uri/activerecord.rb

@@ -0,0 +1,152 @@
+# 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/uri/base"
+class ActiveRecordData < BaseUri
+  @@num = 0
+  
+  ADAPTERS = ["mysql","postgresql","sqlite3","sqlite"]
+
+  def ActiveRecordData.split_path(uri)
+    return {} unless ADAPTERS.include?(uri.scheme)
+
+    return {} if uri.path.length <= 1
+    splited = uri.path[1..-1].split("/")
+    case uri.scheme
+    when "mysql","postgresql"
+      ret = nil
+      case splited.length
+      when 1
+	ret = {:database => splited[0]}
+      when 2
+	ret = {:database => splited[0], :table => splited[1]}
+      else
+      ret = {}
+      end
+    when "sqlite","sqlite3"
+      while splited.length > 1 and (exist = Pathname.new(splited[0]).exist?) and Pathname.new(splited[0]).directory?
+	$log.debug("#{splited[0]} exist and is a directory")
+	splited = [splited[0..1].join("/")] + splited[2..-1]
+      end
+     
+      ret = {:database => splited[0], :table => splited[1]}
+    end
+    $log.debug("ActiveRecordData split_path: #{uri.inspect} => #{ret.inspect}")
+    ret
+  end
+
+  def ActiveRecordData.supports?(uri)
+    !split_path(uri)[:table].nil?
+  end
+
+  attr_reader :adapter, :database, :table
+  def initialize(uri, options)
+    require "rubygems"
+    require "active_record"
+    ActiveRecord::Base.logger = $log
+
+    super
+        
+    @adapter = uri.scheme
+    
+    vals = ActiveRecordData.split_path(uri)
+    @database = vals[:database]
+    @table = vals[:table]
+    raise "No database given" unless @database
+    raise "No table given" unless @table    
+
+    if options[:model]
+      require "active_support/core_ext/string/inflections.rb"
+      
+      $log.info("Loading classes from #{options[:model]}")
+      @model_path = Pathname.new(options[:model])
+      @class_names = []
+
+      raise "Model path #{@model_path} not found" unless @model_path.exist?
+      
+      use_activesupport = true
+      if use_activesupport
+	ActiveSupport::Dependencies.load_paths << @model_path.to_s
+      end
+
+      @model_path.find {|p|
+	next unless p.to_s =~ /\/([^\/]+)\.rb$/
+	
+	class_name = $1.camelize
+	@class_names << class_name
+	
+	unless use_activesupport
+	  $log.debug("Define autoload: #{class_name.to_sym} => #{p}")
+	  autoload(class_name.to_sym, p.to_s)	
+	end
+      }
+    end
+  end
+ 
+  def primary_key; active_record_class.primary_key.to_s ;end
+
+  def column_names; active_record_class.column_names; end
+
+  def items; active_record_class.find(:all).to_a; end
+  def entry_not_found_exception; ActiveRecord::RecordNotFound; end
+  def create(attributes,&block); active_record.create(attributes,&block) ;end
+  
+  private
+  def active_record_class
+    return @myclass if @myclass
+
+    if @model_path
+      $log.debug("Trying to access class: #{@table.inspect}")
+      
+      raise "Model path does not define #{@table.inspect}" unless
+	@class_names.include?(@table)
+
+      @myclass = eval(@table)
+    else
+      ActiveRecordData.module_eval("class ActiveRecordClass#{@@num} < ActiveRecord::Base; end")
+      @myclass = eval("ActiveRecordClass#{@@num}")
+      @@num += 1
+
+      @myclass.set_table_name(table)
+      @class_names = [@myclass.name]
+    end
+    
+    @class_names.each {|klass_name|
+      #      klass.connection = @myclass.connection
+      begin
+	klass = eval(klass_name)
+	connection_options = {
+	  :adapter  => adapter,
+	  :host     => uri.host,
+	  :port => uri.port,
+	  :username => user,
+	  :password => password,
+	  :database => database
+	}
+	connection_options[:encoding] = options[:encoding] if options[:encoding]
+	
+	klass.establish_connection(connection_options) if klass.respond_to?(:establish_connection)
+      rescue LoadError, NameError
+	raise $! if klass_name == @table
+	$log.warn("Error connecting class #{klass_name}, maybe this is not used, continue")
+      end
+
+    }
+    @myclass
+  end
+
+end