unageanu-jiji 0.1.0

data/lib/jiji/util/csv_append_support.rb

@@ -0,0 +1,15 @@
+
+require 'csv'
+
+# 追記をサポートするように改造。
+class << CSV
+  alias_method( :open_org, :open )
+  
+  def open( path, mode, fs=nil, rs=nil, &block )
+    if mode == "a" || mode == "ab"
+      open_writer( path, mode, fs, rs, &block)
+    else
+      open_org( path, mode, fs=nil, rs=nil, &block )
+    end
+  end
+end

data/lib/jiji/util/file_lock.rb

@@ -0,0 +1,86 @@
+require "fileutils"
+
+# File.flockを利用したRead-Write-Lock
+class FileLock
+  def initialize(lockfile)
+    @lockfile = lockfile
+  end
+
+  #===読み込みロックする。
+  #- ロックされていても他の読み込みユーザーはブロックさない。
+  #- 他の書き込みユーザーはブロックされる。
+  def readlock ( &block )
+    File.open( @lockfile, "r" ) { |f|
+      f.flock(File::LOCK_SH)
+      begin
+        return block.call(f)
+      ensure
+        f.flock(File::LOCK_UN)
+      end
+    }
+  end
+
+  #===書き込みロックする。
+  #- ロックされている場合、他の読み込みユーザー/書き込みユーザー共にブロックされる。
+  def writelock ( &block )
+    File.open( @lockfile, "w" ) { |f|
+      f.flock(File::LOCK_EX)
+      begin
+        return block.call(f)
+      ensure
+        f.flock(File::LOCK_UN)
+      end
+    }
+  end
+
+end
+
+class DirLock
+  def initialize(lockdir)
+    @lockfile = "#{lockdir}/.lock"
+  end
+
+  #===読み込みロックする。
+  #- ロックされていても他の読み込みユーザーはブロックさない。
+  #- 他の書き込みユーザーはブロックされる。
+  def readlock ( &block )
+    mkfile
+    File.open( @lockfile, "r" ) { |f|
+      f.flock(File::LOCK_SH)
+      begin
+        return block.call
+      ensure
+        f.flock(File::LOCK_UN)
+      end
+    }
+  end
+
+  #===書き込みロックする。
+  #- ロックされている場合、他の読み込みユーザー/書き込みユーザー共にブロックされる。
+  def writelock ( &block )
+    mkfile
+    File.open( @lockfile, "w" ) { |f|
+      f.flock(File::LOCK_EX)
+      begin
+        return block.call
+      ensure
+        f.flock(File::LOCK_UN)
+      end
+    }
+  end
+
+private
+  def mkfile
+    i=0
+    while !File.exist?(@lockfile)
+      begin
+        FileUtils.touch( @lockfile )
+        sleep 0.1
+      rescue Exception
+        i+=1
+        raise $! if i >= 5
+      end
+    end
+  end
+end
+

data/lib/jiji/util/fix_yaml_bug.rb

@@ -0,0 +1,11 @@
+
+require 'yaml'
+
+# for yaml bug.
+class String
+  def is_binary_data? # [ruby-list:16014]
+    return true if self.include?(0)
+    check = self[0, 512]
+    check.size < 10 * check.count("\x00-\x07\x0b\x0e-\x1a\x1c-\x1f")
+  end
+end

data/lib/jiji/util/iterator.rb

@@ -0,0 +1,70 @@
+
+# イテレータ
+class Iterator
+  # 列挙します
+  def each
+    begin
+      while next?
+        yield self.next
+      end
+    ensure
+      self.close
+    end
+  end
+  # 次があるか評価する
+  def next?
+  end
+  # 次の要素を取得
+  def next
+  end
+  # イテレータを破棄
+  def close
+  end
+end
+
+# 空のイテレータ
+class EmptyIterator < Iterator
+  def next?; false; end
+  def next; nil; end
+end
+
+# フィルタ
+class Filter < Iterator
+  def initialize( it, &block )
+    super()
+    @it = it
+    @test = block
+    inner_next
+  end
+  def next?
+    @has_next
+  end
+  def next
+    raise "illegal state." unless next?
+    begin
+      return @next_element
+    ensure
+      inner_next
+    end
+  end
+  def close
+    @it.close if @it
+  end
+
+  private
+  def inner_next
+    while @it.next?
+      item = @it.next
+      matches = @test.call( item )
+      if matches == :break
+        break
+      elsif matches == :true || matches == true
+        @has_next = true
+        @next_element = item
+        return
+      end
+    end
+    @has_next = false
+    @next_element = nil
+  end
+end

data/lib/jiji/util/json_broker.rb

@@ -0,0 +1,53 @@
+#!/usr/bin/ruby --
+
+require "json/lexer"
+require "cgi"
+
+module JSONBroker
+
+# CGI向けAPI
+# パラメータ「request」の値をリクエストとして使う。
+class Cgi
+  def self.invoke( service )
+    print "Content-type: application/json\n\n"
+    cgi =  CGI.new
+    request = cgi.params["request"].to_s
+
+    print Broker.new( service ).invoke( request )
+  end
+end
+
+# JSONリクエストを元にサービスのAPIを実行して結果をJSONで返す。
+#
+# リクエスト:
+# {"method":<サービスメソッド名>, "params":[<引数1>, <引数2>]}
+#
+# レスポンス(正常時):
+# [{"error":null, "result":<実行結果>}]
+#
+# レスポンス(エラー時):
+# [{"error":<例外の詳細>, "result":null}]
+#
+class Broker
+  def initialize ( service )
+    @service = service
+  end
+
+  def invoke ( request )
+    begin
+      json = JSON::Lexer.new(request).nextvalue
+      method   = json["method"]
+      args       = json["params"]
+
+      result = @service.send( method.to_sym, *args )
+      return '[{"error":null, "result":' << result.to_json << "}]"
+    rescue
+      error =  $!.to_s + " : " + $!.backtrace.join("\n")
+      return '[{"error":' << error.to_json << ', "result":null}]'
+    end
+  end
+end
+
+end
+
+#print JSONBroker::Broker.new( "mii,aaa" ).invoke( '{"method":"to_s","params":[]}' )

data/lib/jiji/util/json_rpc_requestor.rb

@@ -0,0 +1,30 @@
+#!/usr/bin/ruby --
+
+require "cgi"
+require 'httpclient'
+require "json/lexer"
+require "json/objects"
+
+module JSONBroker
+
+# クライアント
+class JsonRpcRequestor
+  def initialize( name, host="http://localhost:8080", proxy=nil )
+    @client = HTTPClient.new( proxy, "JsonClientLib")
+    @client.set_cookie_store("cookie.dat")
+    @name = name
+    @host = host
+  end
+  def method_missing( name, *args )
+    body = CGI.escape("{\"method\":#{name.to_s},\"params\":#{args.to_json}}")
+    result = @client.post("#{@host}/json/#{@name}", body )
+    json = JSON::Lexer.new(result.content).nextvalue[0]
+    if json["error"]
+      raise json["error"]
+    else
+      json["result"]
+    end
+  end
+end
+
+end

data/lib/jiji/util/synchronize_interceptor.rb

@@ -0,0 +1,41 @@
+
+require 'thread'
+require 'set'
+
+# 同時実行抑制インターセプタ
+class SynchronizeInterceptor
+
+  @@pool = {}
+  @@pool_mutex = Mutex.new
+
+  # コンストラクタ
+  def initialize( point, options )
+    @id = options[:id] || :default
+    @mutex = mutex( @id )
+  end
+
+  def process( chain, context )
+    # 2重ロックの回避
+    set = Thread.current[:synchronize_interceptor_locked] ||= Set.new
+    if set.include? @id
+      chain.process_next( context )
+    else
+      set.add( @id )
+      begin
+        @mutex.synchronize {
+          chain.process_next( context )
+        }
+      ensure
+        set.delete( @id )
+      end
+    end
+  end
+
+  # IDに対応するmutexを取得する
+  def mutex( id )
+    @@pool_mutex.synchronize {
+       @@pool[id] ||= Mutex.new
+    }
+  end
+
+end

data/lib/jiji/util/thread_use_generator.rb

@@ -0,0 +1,52 @@
+require 'thread'
+
+# スレッドを使ったGenerator
+class ThreadUseGenerator
+  def initialize( enum, buff_size=nil )
+    @alive = true
+    @alive_mutex = Mutex.new
+    @q = buff_size ? SizedQueue.new( buff_size ) : Queue.new
+
+    @end = Object.new
+    @t = Thread.fork {
+      begin
+        enum.each {|*items|
+          break unless @alive_mutex.synchronize { @alive }
+          @q << items
+        }
+      ensure
+        @q << @end
+      end
+    }
+    Thread.pass
+
+    @has_next = true
+    inner_next
+  end
+
+  def next?
+    @has_next
+  end
+  def next
+    raise "illegal state." unless next?
+    begin
+      @next_element
+    ensure
+      inner_next
+    end
+  end
+  def close
+    @alive_mutex.synchronize {
+      @alive = false
+    }
+    @has_next = false
+    @q.clear
+    @t.join
+  end
+private
+  def inner_next
+    item = @q.pop
+    @has_next = false if @end.equal? item
+    @next_element = item
+  end
+end

data/lib/jiji/util/util.rb

@@ -0,0 +1,179 @@
+
+require 'kconv'
+require 'jiji/error'
+
+module JIJI
+  
+  module Util
+  
+  module_function
+    # 通貨ペアコードをシンボルに変換する
+    def convert_currency_pair_code(code)
+      case code
+        when ClickClient::FX::USDJPY
+          return :USDJPY
+        when ClickClient::FX::EURJPY
+          return :EURJPY
+        when ClickClient::FX::GBPJPY
+          return :GBPJPY
+        when ClickClient::FX::AUDJPY
+          return :AUDJPY
+        when ClickClient::FX::NZDJPY
+          return :NZDJPY
+        when ClickClient::FX::CADJPY
+          return :CADJPY
+        when ClickClient::FX::CHFJPY
+          return :CHFJPY
+        when ClickClient::FX::ZARJPY
+          return :ZARJPY
+        when ClickClient::FX::EURUSD
+          return :EURUSD
+        when ClickClient::FX::GBPUSD
+          return :GBPUSD
+        when ClickClient::FX::AUDUSD
+          return :AUDUSD
+        when ClickClient::FX::EURCHF
+          return :EURCHF
+        when ClickClient::FX::GBPCHF
+          return :GBPCHF
+        when ClickClient::FX::USDCHF
+          return :USDCHF
+      end
+    end
+    
+    # シンボルを通貨ペアコードに変換する
+    def convert_currency_pair_code_r(code)
+      case code
+        when :USDJPY
+          return ClickClient::FX::USDJPY
+        when :EURJPY
+          return ClickClient::FX::EURJPY
+        when :GBPJPY
+          return ClickClient::FX::GBPJPY
+        when :AUDJPY
+          return ClickClient::FX::AUDJPY
+        when :NZDJPY
+          return ClickClient::FX::NZDJPY
+        when :CADJPY
+          return ClickClient::FX::CADJPY
+        when :CHFJPY
+          return ClickClient::FX::CHFJPY
+        when :ZARJPY
+          return ClickClient::FX::ZARJPY
+        when :EURUSD
+          return ClickClient::FX::EURUSD
+        when :GBPUSD
+          return ClickClient::FX::GBPUSD
+        when :AUDUSD
+          return ClickClient::FX::AUDUSD
+        when :EURCHF
+          return ClickClient::FX::EURCHF
+        when :GBPCHF
+          return ClickClient::FX::GBPCHF
+        when :USDCHF
+          return ClickClient::FX::USDCHF
+      end
+    end    
+    
+    #ブロック内で例外が発生したらログに出力する。
+    #発生した例外は内部で握る。
+    def log_if_error( logger ) 
+      begin
+        return yield if block_given?
+      rescue Exception
+        logger.error($!)
+      end
+    end
+    #ブロック内で例外が発生したらログに出力する。
+    #ログ出力後、例外を再スローする。
+    def log_if_error_and_throw( logger ) 
+      begin
+        return yield if block_given?
+      rescue Exception
+        logger.error($!)
+        throw $!
+      end
+    end    
+
+    # 文字列をbase64でエンコードする
+    def encode( str ) 
+      [str].pack("m").gsub(/\//, "_").gsub(/\n/, "")
+    end
+    # base64でエンコードした文字列をデコードする
+    def decode( str )
+      str.gsub(/_/, "/").unpack('m')
+    end
+    
+    # モデルオブジェクトの基底モジュール
+    module Model
+      
+      # オブジェクト比較メソッド
+      def ==(other)
+        _eql?(other) { |a,b| a == b }
+      end
+      def ===(other)
+        _eql?(other) { |a,b| a === b }
+      end
+      def eql?(other)
+        _eql?(other) { |a,b| a.eql? b }
+      end
+      def hash
+        hash = 0
+        values.each {|v|
+          hash = v.hash + 31 * hash
+        }
+        return hash
+      end
+    protected
+      def values
+        values = []
+        values << self.class
+        instance_variables.each { |name|
+          values << instance_variable_get(name) 
+        }
+        return values
+      end
+    private
+      def _eql?(other, &block)
+        return false if other == nil
+        return true if self.equal? other
+        return false unless other.kind_of?(JIJI::Util::Model)
+        a = values
+        b = other.values
+        return false if a.length != b.length
+        a.length.times{|i|
+          return false unless block.call( a[i], b[i] )
+        }
+        return true
+      end
+    end
+    
+    module JsonSupport   
+      def to_json
+        buff = "{"
+        instance_variables.each { |name|
+          buff << "#{name[1..-1].to_json}:#{instance_variable_get(name).to_json},"
+        }
+        buff.chop!
+        buff << "}"
+      end
+    end
+    
+      
+    # 期間を示す文字列を解析する
+    def self.parse_scale( scale )
+      return nil if  scale.to_s == "raw"
+      unless scale.to_s =~ /(\d+)([smhd])/
+        raise JIJI::UserError.new( JIJI::ERROR_ALREADY_EXIST, "illegal scale. scale=#{scale}") 
+      end
+      return case $2
+        when "s"; $1.to_i
+        when "m"; $1.to_i * 60
+        when "h"; $1.to_i * 60 * 60
+        when "d"; $1.to_i * 60 * 60 * 24
+      end
+    end
+          
+  
+  end
+end