added tag v1_9_0_4

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_9_0_4@18845 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 42 insertions, 0 deletions

diff --git a/trunk/enc/trans/make_transdb.rb b/trunk/enc/trans/make_transdb.rb
new file mode 100644
index 0000000000..50d4f169f3
--- /dev/null
+++ b/trunk/enc/trans/make_transdb.rb
@@ -0,0 +1,42 @@
+#
+# static const rb_transcoder
+# rb_from_US_ASCII = {
+#     "US-ASCII", "UTF-8", &from_US_ASCII, 1, 0,
+#     NULL, NULL,
+# };
+#
+
+count = 0
+converters = {}
+transdirs = ARGV.dup
+outhdr = transdirs.shift || 'transdb.h'
+transdirs << 'enc/trans' if transdirs.empty?
+files = {}
+transdirs.each do |transdir|
+  next unless File.directory?(transdir)
+  Dir.open(transdir) {|d| d.grep(/.+\.[ch]\z/) }.sort_by {|e|
+    e.scan(/(\d+)|(\D+)/).map {|n,a| a||[n.size,n.to_i]}.flatten
+  }.each do |fn|
+    next if files[fn]
+    files[fn] = true
+    open(File.join(transdir,fn)) do |f|
+      f.each_line do |line|
+        if (/^static const rb_transcoder/ =~ line)..(/"(.*?)"\s*,\s*"(.*?)"/ =~ line)
+          if $1 && $2
+            from_to = "%s to %s" % [$1, $2]
+            if converters[from_to]
+              raise ArgumentError, '%s:%d: transcode "%s" is already registered (%s:%d)' %
+              [fn, $., from_to, *converters[from_to].values_at(2, 3)]
+            else
+              converters[from_to] = [$1, $2, fn[0..-3], $.]
+            end
+          end
+        end
+      end
+    end
+  end
+end
+result = converters.map {|k, v| %[rb_declare_transcoder("%s", "%s", "%s");\n] % v}.join
+open(outhdr, 'wb') do |f|
+  f.print result
+end