Test generator and comparison

Add output regression check to "rake test"

rake gen - generate .decode for every .rd file
rake test - compare decode of .rd with .decode content

tasks/gen.rake

@@ -0,0 +1,29 @@
+$:.push(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'ruida'
+
+#
+# generate test results in ../rd
+#
+task :gen do
+  rd_dir = File.expand_path(File.join(File.dirname(__FILE__), '..', '..', 'rd'))
+  Dir.open(rd_dir).each do |path|
+    next unless path =~ /(.*)\.rd$/
+    name = $1
+    puts name
+    inp = File.open(File.join(rd_dir,path), 'r')
+    out = File.open(File.join(rd_dir,"#{name}.decode"), 'w+')
+    inp.binmode
+    out.binmode
+    rd = Ruida::Data.new inp.read
+    begin
+      parser = Ruida::Parser.new rd
+      parser.each do |c|
+        out.puts c
+      end
+    rescue Exception => e
+      STDERR.puts e
+    end
+    out.close
+    inp.close
+  end
+end

tasks/test.rake

@@ -4,17 +4,32 @@ require 'ruida'
 task :test do
   rd_dir = File.expand_path(File.join(File.dirname(__FILE__), '..', '..', 'rd'))
   Dir.open(rd_dir).each do |path|
-    next unless path =~ /.*\.rd$/
+    next unless path =~ /(.*)\.rd$/
+    name = $1
     puts path
     file = File.open(File.join(rd_dir,path), 'r')
     file.binmode
+    decoded = []
+    File.foreach(File.join(rd_dir,"#{name}.decode")) do |line|
+      decoded << line.chomp
+    end
     rd = Ruida::Data.new file.read
+    lnum = 0
     begin
       parser = Ruida::Parser.new rd
       parser.each do |c|
+        expected = decoded[lnum]
+        lnum += 1
+        unless expected == c.to_s
+          STDERR.puts "Fail in #{path}##{lnum}:"
+          STDERR.puts "Expected: #{expected.inspect}"
+          STDERR.puts "Got:      #{c.to_s.inspect}"
+          break
+        end
       end
     rescue Exception => e
       STDERR.puts e
     end
+    file.close
   end
 end