update.

[chise/ruby.git] / chise / chisedb.rb

diff --git a/chise/chisedb.rb b/chise/chisedb.rb
index f52732a..4b930a1 100755 (executable)
--- a/chise/chisedb.rb
+++ b/chise/chisedb.rb
@@ -9,7 +9,7 @@ module CHISE
       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?
+      v # sexp? or the other?
     end
   end
 
@@ -17,16 +17,24 @@ module CHISE
     include Singleton
 
     def initialize
-      db_dir = CHISE::DataSource::DB_DIR
-      @ds = DataSource.new(CHISE::DataSource::Berkeley_DB, db_dir, 0, 0755)
+      @location = CHISE::DataSource::DB_DIR.path
+      @ds = nil
+      setup_ds
       @feature_db = {}
       @ccs_db = {}
-      @byids_db = {}
+      # @byids_db = {}
+      @ccsstr_db = {}
+    end
+    attr_reader :ds, :location
+
+    def setup_ds
+      return if @ds
+      @ds = DataSource.new(CHISE::DataSource::Berkeley_DB, @location.to_s, 0, 0755)
     end
-    attr_reader :ds
 
     def close
       # @ds.close if @ds # do not close for now
+      # @ds = nil
     end
 
     def each_feature_name()
@@ -42,7 +50,7 @@ module CHISE
     end
 
     def get_feature(name)
-      @feature_db[name] = FeatureDB.new(@ds, name) if @feature_db[name].nil?
+      @feature_db[name] = FeatureDB.new(self, name) if @feature_db[name].nil?
       @feature_db[name]
     end
 
@@ -52,7 +60,7 @@ module CHISE
     end
 
     def get_ccs(name)
-      @ccs_db[name] = CCS_DB.new(@ds, name) if @ccs_db[name].nil?
+      @ccs_db[name] = CCS_DB.new(self, name) if @ccs_db[name].nil?
       @ccs_db[name]
     end
 
@@ -61,42 +69,88 @@ module CHISE
       ccsdb.decode(code_point)
     end
 
-    def get_by_ids_db(n)
-      @byids_db[n] = ByIDS_DB.new(@ds, n) if @byids_db[n].nil?
+    def nuget_by_ids_db(n)
+      @byids_db[n] = ByIDS_DB.new(self, n) if @byids_db[n].nil?
       @byids_db[n]
     end
 
+    def get_ccs_str(n)
+      @ccsstr_db[n] = CCS_STR.new(self, n) if @ccsstr_db[n].nil?
+#      @ccsstr_db[n] = CCS_STR_DB.new(self, n) if @ccsstr_db[n].nil?
+      @ccsstr_db[n]
+    end
+
     private
     include EachEntryModule
   end
 
+  module TableManagementModule
+    def to_hash
+      sync # add.
+      h = {}
+      each_char {|k, v| h[k] = v }
+      h
+    end
+
+    def dump
+      txt = @name.path.escape.escape_win_filename.to_s+".txt"
+      t = @cd.location+@category+@keyvalue+txt
+      t.open("wb"){|out|
+       to_hash.sort.each {|k, v|
+         out.printf("%s\t%s\n", k, v)
+       }
+      }
+    end
+  end
+
   class FeatureDB
     include ParseValueModule
-    def initialize(ds, name)
-      @ds, @name = ds, name
-      # @feature = @ds.get_feature(@name)
+    include TableManagementModule
+
+    def initialize(cd, name)
+      @cd, @name = cd, name
+      @ds = @cd.ds
       @feature = @ds.get_feature(@name.path.escape.escape_win_filename.to_s)
+      @category, @keyvalue = "character", "feature"
+      at_exit {
+       close
+      }
     end
     def setup_db(w) @feature.setup_db(w); end
-    def sync() @feature.sync(); end
+    def sync
+      #qp "sync"
+      @feature.sync
+    end
     alias close sync
-    def set_value(cid, value) @feature.set_value(cid, value); end
+
+    def set_value(cid, value)
+      @feature.set_value(cid, value.to_s)
+    end
+
     def get_value(cid)
       parse_value(@feature.get_value(cid))
     end
+
     def each_char
       @feature.each_char {|cid, value|
+       #qp cid, value
        yield(cid, parse_value(value))
       }
     end
   end
 
   class CCS_DB
-    def initialize(ds, name)
-      @ds, @name = ds, name
-      #qp @name
+    include TableManagementModule
+
+    def initialize(cd, name)
+      @cd, @name = cd, name
+      @ds = @cd.ds
       @ccs = @ds.get_ccs(@name)
       @dsr = @ccsr = nil
+      @category, @keyvalue = "character", "by_feature"
+      at_exit {
+       close
+      }
     end
     def setup_db(w) @ccs.setup_db(w); end
     def sync() @ccs.sync(); end
@@ -119,29 +173,35 @@ module CHISE
     end
   end
 
-  class ByIDS_DB
+  class CCS_STR_DB
+    include ParseValueModule
     include ChiseValue
     include TableAccessModule
+    include TableManagementModule
 
-    def initialize(ds, name)
-      @ds, @name = ds, name
+    def initialize(cd, name)
+      @cd, @name = cd, name
+      @ds = @cd.ds
       @category, @keyvalue = "character", "by_ids"
       reset
+      at_exit {
+       close
+      }
     end
 
-    def decode(ids)
+    def get_by_str(str)
       setup_db
       return nil if @db.nil?
-      parse_c_string(@db.get(ids))
+      parse_c_string(@db.get(str))
     end
 
-    def set_decoded_char(ids, cid)
+    def set_by_str(str, cid)
       setup_db(true)
       raise "@db is nil." if @db.nil?
-      @db.put(ids, format_char_id(cid))
+      @db.put(str, format_char_id(cid))
     end
 
-    def each
+    def each_char
       setup_db
       raise "@db is nil." if @db.nil?
       @db.each {|k, v|
@@ -149,4 +209,5 @@ module CHISE
       }
     end
   end
+
 end