update.
[chise/ruby.git] / chise / chisedb.rb
index b7124e6..f52732a 100755 (executable)
@@ -4,45 +4,120 @@ require "singleton"
 require "chise/libchise"
 
 module CHISE
+  module ParseValueModule
+    def parse_value(v)
+      return nil if v.nil?
+      return v.to_i if /\A\d+\Z/ =~ v # number?
+      return $1 if /\A"(.+)"\Z/ =~ v # remove surrounding "
+      v # sexp?
+    end
+  end
+
   class ChiseDB
     include Singleton
 
     def initialize
       db_dir = CHISE::DataSource::DB_DIR
       @ds = DataSource.new(CHISE::DataSource::Berkeley_DB, db_dir, 0, 0755)
+      @feature_db = {}
+      @ccs_db = {}
       @byids_db = {}
     end
+    attr_reader :ds
 
-    def location() @ds.location; end
+    def close
+      # @ds.close if @ds # do not close for now
+    end
 
-    def get_feature(f) @ds.get_feature(f) end
+    def each_feature_name()
+      @ds.each_feature_name {|f|
+       next if f.to_s == "." || f.to_s == ".."
+       next if f.to_s =~ /\.txt\Z/
+       yield(f.path.unescape_win_filename.unescape.to_s)
+      }
+    end
 
-    def get_ccs(c) @ds.get_ccs(c) end
+    def each_ccs
+      each_entry("character/by_feature") {|f| yield(f) }
+    end
 
-    def decode_char(n, cid) @ds.decode_char(n, cid) end
+    def get_feature(name)
+      @feature_db[name] = FeatureDB.new(@ds, name) if @feature_db[name].nil?
+      @feature_db[name]
+    end
 
-    def load_feature(n, cid) @ds.load_feature(n, cid) end
+    def load_feature(cid, name)
+      feature = get_feature(name)
+      feature.get_value(cid)
+    end
 
-    def each_feature_name() @ds.each_feature_name {|f| yield f } end
+    def get_ccs(name)
+      @ccs_db[name] = CCS_DB.new(@ds, name) if @ccs_db[name].nil?
+      @ccs_db[name]
+    end
 
-    #def each_ccs() @ds.each_ccs {|c| yield c } end
+    def decode_char(ccs, code_point)
+      ccsdb = get_ccs(ccs)
+      ccsdb.decode(code_point)
+    end
 
     def get_by_ids_db(n)
       @byids_db[n] = ByIDS_DB.new(@ds, n) if @byids_db[n].nil?
       @byids_db[n]
     end
+
+    private
+    include EachEntryModule
   end
 
   class FeatureDB
+    include ParseValueModule
     def initialize(ds, name)
       @ds, @name = ds, name
+      # @feature = @ds.get_feature(@name)
+      @feature = @ds.get_feature(@name.path.escape.escape_win_filename.to_s)
+    end
+    def setup_db(w) @feature.setup_db(w); end
+    def sync() @feature.sync(); end
+    alias close sync
+    def set_value(cid, value) @feature.set_value(cid, value); end
+    def get_value(cid)
+      parse_value(@feature.get_value(cid))
+    end
+    def each_char
+      @feature.each_char {|cid, value|
+       yield(cid, parse_value(value))
+      }
     end
-    
   end
 
   class CCS_DB
-  end
+    def initialize(ds, name)
+      @ds, @name = ds, name
+      #qp @name
+      @ccs = @ds.get_ccs(@name)
+      @dsr = @ccsr = nil
+    end
+    def setup_db(w) @ccs.setup_db(w); end
+    def sync() @ccs.sync(); end
+    alias close sync
+    def set(code_point, cid) @ccs.set(code_point, cid); end
+    def decode(code_point) @ccs.decode(code_point); end
 
+    def setup_ccs_r
+      db_dir = CHISE::DataSource::DB_DIR
+      @dsr = DataSource_R.new(CHISE::DataSource::Berkeley_DB, db_dir, 0, 0755) if @dsr.nil?
+      #qp @name
+      @ccsr = CCS_R.new(@dsr, @name) if @ccsr.nil?
+    end
+
+    def each_char # call CCS_R here.
+      setup_ccs_r
+      @ccsr.each_char {|code_point, cid|
+       yield(code_point, cid)
+      }
+    end
+  end
 
   class ByIDS_DB
     include ChiseValue