+ 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
+ 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
+ #qp "sync"
+ @feature.sync
+ end
+ alias close sync
+
+ 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
+ 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
+ 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 ParseValueModule
+ include ChiseValue
+ include TableAccessModule
+ include TableManagementModule
+
+ def initialize(cd, name)
+ @cd, @name = cd, name
+ @ds = @cd.ds
+ @category, @keyvalue = "character", "by_ids"
+ reset
+ at_exit {
+ close
+ }
+ end
+
+ def decode(ids)
+ setup_db
+ return nil if @db.nil?
+ parse_c_string(@db.get(ids))
+ end
+
+ def set_decoded_char(ids, cid)
+ setup_db(true)
+ raise "@db is nil." if @db.nil?
+ @db.put(ids, format_char_id(cid))
+ end
+
+ def each_char
+ setup_db
+ raise "@db is nil." if @db.nil?
+ @db.each {|k, v|
+ yield(parse_value(k), parse_c_string(v))
+ }
+ end