i

[chise/ruby.git] / tools / move-obsolete-files.rb

diff --git a/tools/move-obsolete-files.rb b/tools/move-obsolete-files.rb
new file mode 100755 (executable)
index 0000000..9692632
--- /dev/null
+++ b/tools/move-obsolete-files.rb
@@ -0,0 +1,82 @@
+#!/usr/bin/env ruby
+# Copyright (C) 2002-2004 Kouichirou Eto, All rights reserved.
+# move obsolete BDB files.
+
+$LOAD_PATH.unshift("..")
+require "chise/config"
+require "chise/util"
+
+module CHISE
+  class DBS_Management # DataBase file management
+    # from specs/char-atr.ja.txt
+    OBSOLETE_ATTRIBUTES = "
+cns-radical
+cns-radical?
+kangxi-radical
+daikanwa-radical
+
+cns-strokes
+kangxi-strokes
+daikanwa-strokes
+shinjigen-1-radical
+gb-original-radical
+japanese-strokes
+jis-strokes-a
+jisx0208-strokes
+unicode-strokes
+
+cns-total-strokes
+
+non-morohashi
+
+=>ucs*
+#=>mojikyo
+#=mojikyo
+->identical
+
+ancient-ideograph-of
+ancient-char-of-shinjigen-1
+original-ideograph-of
+original-char-of-shinjigen-1
+vulgar-ideograph-of
+vulgar-char-of-shinjigen-1
+ideographic-variants
+variant-of-shinjigen-1
+
+iso-10646-comment
+".split
+
+    def initialize
+    end
+
+    def move_obsolete_files
+      fdir = Config.instance.db_dir+"/system-char-id"
+      Dir.chdir(fdir){
+       odir = "obsolete"
+       Dir.mkdir(odir) unless FileTest.directory? odir
+
+       OBSOLETE_ATTRIBUTES.each {|attr|
+         next if attr =~ /^#/
+         f = get_filename(attr)
+         move(f, odir) if FileTest.exist?(f)
+         f = f+".txt"
+         move(f, odir) if FileTest.exist?(f)
+       }
+      }
+    end
+
+    def get_filename(t)
+      t = CHISE.unix_to_win(t) if CHISE.windows?
+      t
+    end
+
+    def move(file, dir)
+      cmd = "mv './#{file}' #{dir}"
+      p cmd
+      system cmd
+    end
+  end
+end
+
+man = CHISE::DBS_Management.new
+man.move_obsolete_files