writeexcel 0.1.0 → 0.3.0

data/test/test_05_rows.rb

@@ -1,182 +1,182 @@
-###############################################################################
-#
-# A test for Spreadsheet::WriteExcel.
-#
-# Check that max/min columns of the Excel ROW record are written correctly.
-#
-# reverse('©'), October 2007, John McNamara, jmcnamara@cpan.org
-#
-# original written in Perl by John McNamara
-# converted to Ruby by Hideo Nakamura, cxn03651@msj.biglobe.ne.jp
-#
-############################################################################
-$LOAD_PATH.unshift "#{File.dirname(__FILE__)}/../lib"
-
-require "test/unit"
-require 'writeexcel'
-
-class TC_rows < Test::Unit::TestCase
-
-  def setup
-  end
-
-  def test_1
-    t = Time.now.strftime("%Y%m%d")
-    path = "temp#{t}-#{$$}-#{rand(0x100000000).to_s(36)}"
-    @test_file           = File.join(Dir.tmpdir, path)
-    workbook            = Spreadsheet::WriteExcel.new(@test_file)
-    workbook.compatibility_mode(1)
-    @tests               = []
-    
-    # for test case 1
-    row  = 1
-    col1 = 0
-    col2 = 0
-    worksheet = workbook.add_worksheet
-    worksheet.set_row(row, 15)
-    @tests.push(
-                 [
-                    " \tset_row(): row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                      :col_min => 0,
-                      :col_max => 0,
-                    }
-                 ]
-              )
-
-    # for test case 2
-    row  = 2
-    col1 = 0
-    col2 = 0
-    worksheet = workbook.add_worksheet
-    worksheet.write(row, col1, 'Test')
-    worksheet.write(row, col2, 'Test')
-    @tests.push(
-                 [
-                    " \tset_row(): row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                      :col_min => 0,
-                      :col_max => 1,
-                    }
-                 ]
-              )
-
-
-    # for test case 3
-    row  = 3
-    col1 = 0
-    col2 = 1
-    worksheet = workbook.add_worksheet
-    worksheet.write(row, col1, 'Test')
-    worksheet.write(row, col2, 'Test')
-    @tests.push(
-                [
-                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                        :col_min => 0,
-                        :col_max => 2,
-                    }
-                ]
-            )
-
-    # for test case 4
-    row  = 4
-    col1 = 1
-    col2 = 1
-    worksheet = workbook.add_worksheet
-    worksheet.write(row, col1, 'Test')
-    worksheet.write(row, col2, 'Test')
-    @tests.push(
-                [
-                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                        :col_min => 1,
-                        :col_max => 2,
-                    }
-                ]
-            )
-
-    # for test case 5
-    row  = 5
-    col1 = 1
-    col2 = 255
-    worksheet = workbook.add_worksheet
-    worksheet.write(row, col1, 'Test')
-    worksheet.write(row, col2, 'Test')
-    @tests.push(
-                [
-                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                        :col_min => 1,
-                        :col_max => 256,
-                    }
-                ]
-            )
-
-    # for test case 6
-    row  = 6
-    col1 = 255
-    col2 = 255
-    worksheet = workbook.add_worksheet
-    worksheet.write(row, col1, 'Test')
-    worksheet.write(row, col2, 'Test')
-    @tests.push(
-                [
-                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                        :col_min => 255,
-                        :col_max => 256,
-                    }
-                ]
-            )
-
-    # for test case 7
-    row  = 7
-    col1 = 2
-    col2 = 9
-    worksheet = workbook.add_worksheet
-    worksheet.set_row(row, 15)
-    worksheet.write(row, col1, 'Test')
-    worksheet.write(row, col2, 'Test')
-    @tests.push(
-                [
-                    " \tset_row + write():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
-                    {
-                        :col_min => 2,
-                        :col_max => 10,
-                    }
-                ]
-            )
-
-    workbook.biff_only  = 1
-    workbook.close
-    # Read in the row records
-    rows = []
-  
-    xlsfile = open(@test_file, "rb")
-    while header = xlsfile.read(4)
-      record, length = header.unpack('vv')
-      data = xlsfile.read(length)
-    
-      #read the row records only
-      next unless record == 0x0208
-      col_min, col_max = data.unpack('x2 vv')
-      
-      rows.push(
-        {
-          :col_min => col_min,
-          :col_max => col_max
-        }
-      )
-    end
-    xlsfile.close
-    (0 .. @tests.size - 1).each do |i|
-      assert_equal(@tests[i][1], rows[i], @tests[i][0])
-    end
-  end
-
-  def teardown
-    File.unlink(@test_file) if FileTest.exist?(@test_file)
-  end
-
-end
+###############################################################################
+#
+# A test for WriteExcel.
+#
+# Check that max/min columns of the Excel ROW record are written correctly.
+#
+# reverse('©'), October 2007, John McNamara, jmcnamara@cpan.org
+#
+# original written in Perl by John McNamara
+# converted to Ruby by Hideo Nakamura, cxn03651@msj.biglobe.ne.jp
+#
+############################################################################
+$LOAD_PATH.unshift "#{File.dirname(__FILE__)}/../lib"
+
+require "test/unit"
+require 'writeexcel'
+
+class TC_rows < Test::Unit::TestCase
+
+  def setup
+  end
+
+  def test_1
+    t = Time.now.strftime("%Y%m%d")
+    path = "temp#{t}-#{$$}-#{rand(0x100000000).to_s(36)}"
+    @test_file           = File.join(Dir.tmpdir, path)
+    workbook            = WriteExcel.new(@test_file)
+    workbook.compatibility_mode(1)
+    @tests               = []
+
+    # for test case 1
+    row  = 1
+    col1 = 0
+    col2 = 0
+    worksheet = workbook.add_worksheet
+    worksheet.set_row(row, 15)
+    @tests.push(
+                 [
+                    " \tset_row(): row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                      :col_min => 0,
+                      :col_max => 0,
+                    }
+                 ]
+              )
+
+    # for test case 2
+    row  = 2
+    col1 = 0
+    col2 = 0
+    worksheet = workbook.add_worksheet
+    worksheet.write(row, col1, 'Test')
+    worksheet.write(row, col2, 'Test')
+    @tests.push(
+                 [
+                    " \tset_row(): row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                      :col_min => 0,
+                      :col_max => 1,
+                    }
+                 ]
+              )
+
+
+    # for test case 3
+    row  = 3
+    col1 = 0
+    col2 = 1
+    worksheet = workbook.add_worksheet
+    worksheet.write(row, col1, 'Test')
+    worksheet.write(row, col2, 'Test')
+    @tests.push(
+                [
+                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                        :col_min => 0,
+                        :col_max => 2,
+                    }
+                ]
+            )
+
+    # for test case 4
+    row  = 4
+    col1 = 1
+    col2 = 1
+    worksheet = workbook.add_worksheet
+    worksheet.write(row, col1, 'Test')
+    worksheet.write(row, col2, 'Test')
+    @tests.push(
+                [
+                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                        :col_min => 1,
+                        :col_max => 2,
+                    }
+                ]
+            )
+
+    # for test case 5
+    row  = 5
+    col1 = 1
+    col2 = 255
+    worksheet = workbook.add_worksheet
+    worksheet.write(row, col1, 'Test')
+    worksheet.write(row, col2, 'Test')
+    @tests.push(
+                [
+                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                        :col_min => 1,
+                        :col_max => 256,
+                    }
+                ]
+            )
+
+    # for test case 6
+    row  = 6
+    col1 = 255
+    col2 = 255
+    worksheet = workbook.add_worksheet
+    worksheet.write(row, col1, 'Test')
+    worksheet.write(row, col2, 'Test')
+    @tests.push(
+                [
+                    " \twrite():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                        :col_min => 255,
+                        :col_max => 256,
+                    }
+                ]
+            )
+
+    # for test case 7
+    row  = 7
+    col1 = 2
+    col2 = 9
+    worksheet = workbook.add_worksheet
+    worksheet.set_row(row, 15)
+    worksheet.write(row, col1, 'Test')
+    worksheet.write(row, col2, 'Test')
+    @tests.push(
+                [
+                    " \tset_row + write():   row = #{row}, col1 = #{col1}, col2 = #{col2}",
+                    {
+                        :col_min => 2,
+                        :col_max => 10,
+                    }
+                ]
+            )
+
+    workbook.biff_only  = 1
+    workbook.close
+    # Read in the row records
+    rows = []
+
+    xlsfile = open(@test_file, "rb")
+    while header = xlsfile.read(4)
+      record, length = header.unpack('vv')
+      data = xlsfile.read(length)
+
+      #read the row records only
+      next unless record == 0x0208
+      col_min, col_max = data.unpack('x2 vv')
+
+      rows.push(
+        {
+          :col_min => col_min,
+          :col_max => col_max
+        }
+      )
+    end
+    xlsfile.close
+    (0 .. @tests.size - 1).each do |i|
+      assert_equal(@tests[i][1], rows[i], @tests[i][0])
+    end
+  end
+
+  def teardown
+    File.unlink(@test_file) if FileTest.exist?(@test_file)
+  end
+
+end

data/test/test_06_extsst.rb

@@ -1,80 +1,80 @@
-###############################################################################
-#
-# A test for Spreadsheet::WriteExcel.
-#
-# Check that we calculate the correct bucket size and number for the EXTSST
-# record. The data is taken from actual Excel files.
-#
-# reverse('©'), October 2007, John McNamara, jmcnamara@cpan.org
-#
-# original written in Perl by John McNamara
-# converted to Ruby by Hideo Nakamura, cxn03651@msj.biglobe.ne.jp
-#
-############################################################################
-$LOAD_PATH.unshift "#{File.dirname(__FILE__)}/../lib"
-
-require "test/unit"
-require 'writeexcel'
-
-class TC_extsst < Test::Unit::TestCase
-
-  def setup
-    t = Time.now.strftime("%Y%m%d")
-    path = "temp#{t}-#{$$}-#{rand(0x100000000).to_s(36)}"
-    @test_file           = File.join(Dir.tmpdir, path)
-    @workbook    = Spreadsheet::WriteExcel.new(@test_file)
-
-    @tests = [  # Unique     Number of   Bucket
-      # strings    buckets       size
-      [0,          0,               8],
-      [1,          1,               8],
-      [7,          1,               8],
-      [8,          1,               8],
-      [15,         2,               8],
-      [16,         2,               8],
-      [17,         3,               8],
-      [32,         4,               8],
-      [33,         5,               8],
-      [64,         8,               8],
-      [128,        16,              8],
-      [256,        32,              8],
-      [512,        64,              8],
-      [1023,       128,             8],
-      [1024,       114,             9],
-      [1025,       114,             9],
-      [2048,       121,            17],
-      [4096,       125,            33],
-      [4097,       125,            33],
-      [8192,       127,            65],
-      [8193,       127,            65],
-      [9000,       127,            71],
-      [10000,      127,            79],
-      [16384,      128,           129],
-      [262144,     128,          2049],
-      [1048576,    128,          8193],
-      [4194304,    128,         32769],
-      [8257536,    128,         64513],
-    ]
-  end
-
-  def teardown
-    @workbook.str_unique = 0
-    @workbook.close
-    File.unlink(@test_file) if FileTest.exist?(@test_file)
-  end
-
-  def test_1
-    @tests.each do |test|
-      str_unique = test[0]
-
-      @workbook.str_unique = test[0]
-      @workbook.calculate_extsst_size
-
-      assert_equal(@workbook.extsst_buckets, test[1],
-      " \tBucket number for str_unique  strings")
-      assert_equal(@workbook.extsst_bucket_size, test[2],
-      " \tBucket size   for str_unique  strings");
-    end
-
-  end
-end
+###############################################################################
+#
+# A test for WriteExcel.
+#
+# all test is commented out because Workbook#calculate_extsst_size was set to
+# private method. Before that, all test passed.
+#
+#
+#
+#
+# Check that we calculate the correct bucket size and number for the EXTSST
+# record. The data is taken from actual Excel files.
+#
+# reverse('©'), October 2007, John McNamara, jmcnamara@cpan.org
+#
+# original written in Perl by John McNamara
+# converted to Ruby by Hideo Nakamura, cxn03651@msj.biglobe.ne.jp
+#
+############################################################################
+$LOAD_PATH.unshift "#{File.dirname(__FILE__)}/../lib"
+
+require "test/unit"
+require 'writeexcel'
+require 'stringio'
+
+class TC_extsst < Test::Unit::TestCase
+
+  def setup
+    io = StringIO.new
+    @workbook    = WriteExcel.new(io)
+
+    @tests = [  # Unique     Number of   Bucket
+      # strings    buckets       size
+      [0,          0,               8],
+      [1,          1,               8],
+      [7,          1,               8],
+      [8,          1,               8],
+      [15,         2,               8],
+      [16,         2,               8],
+      [17,         3,               8],
+      [32,         4,               8],
+      [33,         5,               8],
+      [64,         8,               8],
+      [128,        16,              8],
+      [256,        32,              8],
+      [512,        64,              8],
+      [1023,       128,             8],
+      [1024,       114,             9],
+      [1025,       114,             9],
+      [2048,       121,            17],
+      [4096,       125,            33],
+      [4097,       125,            33],
+      [8192,       127,            65],
+      [8193,       127,            65],
+      [9000,       127,            71],
+      [10000,      127,            79],
+      [16384,      128,           129],
+      [262144,     128,          2049],
+      [1048576,    128,          8193],
+      [4194304,    128,         32769],
+      [8257536,    128,         64513],
+    ]
+  end
+
+  def test_to_tests
+    @tests.each do |test|
+
+      str_unique = test[0]
+
+      @workbook.str_unique = str_unique
+      @workbook.calculate_extsst_size
+
+      assert_equal(test[1], @workbook.extsst_buckets,
+        " \tBucket number for #{str_unique}  strings")
+      assert_equal(test[2], @workbook.extsst_bucket_size,
+        " \tBucket size for #{str_unique}  strings")
+    end
+  end
+
+end