writeexcel 0.1.0

data/test/test_28_autofilter.rb

@@ -0,0 +1,174 @@
+##########################################################################
+# test_28_autofilter.rb
+#
+# Tests for the token parsing methods used to parse autofilter expressions.
+#
+# reverse('©'), September 2005, 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_28_autofilter < Test::Unit::TestCase
+
+  def test_28_autofilter
+    @tests.each do |test|
+      expression = test[0]
+      expected   = test[1]
+      tokens     = @worksheet.extract_filter_tokens(expression)
+      result     = @worksheet.parse_filter_expression(expression, tokens)
+  
+      testname   = expression || 'none'
+      
+      assert_equal(expected, result, testname)
+    end
+  end
+
+  ###############################################################################
+  #
+  # Unpack the binary data into a format suitable for printing in tests.
+  #
+  def unpack_record(data)
+    data.unpack('C*').map! {|c| sprintf("%02X", c) }.join(' ')
+  end
+
+  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)
+    @worksheet  = @workbook.add_worksheet
+    @tests = [
+    [
+        'x =  2000',
+        [2, 2000],
+    ],
+
+    [
+        'x == 2000',
+        [2, 2000],
+    ],
+
+    [
+        'x =~ 2000',
+        [2, 2000],
+    ],
+
+    [
+        'x eq 2000',
+        [2, 2000],
+    ],
+
+    [
+        'x <> 2000',
+        [5, 2000],
+    ],
+
+    [
+        'x != 2000',
+        [5, 2000],
+    ],
+
+    [
+        'x ne 2000',
+        [5, 2000],
+    ],
+
+    [
+        'x !~ 2000',
+        [5, 2000],
+    ],
+
+    [
+        'x >  2000',
+        [4, 2000],
+    ],
+
+    [
+        'x <  2000',
+        [1, 2000],
+    ],
+
+    [
+        'x >= 2000',
+        [6, 2000],
+    ],
+
+    [
+        'x <= 2000',
+        [3, 2000],
+    ],
+
+    [
+        'x >  2000 and x <  5000',
+        [4,  2000, 0, 1, 5000],
+    ],
+
+    [
+        'x >  2000 &&  x <  5000',
+        [4,  2000, 0, 1, 5000],
+    ],
+
+    [
+        'x >  2000 or  x <  5000',
+        [4,  2000, 1, 1, 5000],
+    ],
+
+    [
+        'x >  2000 ||  x <  5000',
+        [4,  2000, 1, 1, 5000],
+    ],
+
+    [
+        'x =  Blanks',
+        [2, 'blanks'],
+    ],
+
+    [
+        'x =  NonBlanks',
+        [2, 'nonblanks'],
+    ],
+
+    [
+        'x <> Blanks',
+        [2, 'nonblanks'],
+    ],
+
+    [
+        'x <> NonBlanks',
+        [2, 'blanks'],
+    ],
+
+    [
+        'Top 10 Items',
+        [30, 10],
+    ],
+
+    [
+        'Top 20 %',
+        [31, 20],
+    ],
+
+    [
+        'Bottom 5 Items',
+        [32, 5],
+    ],
+
+    [
+        'Bottom 101 %',
+        [33, 101],
+    ],
+      ]
+  end
+
+  def teardown
+    @workbook.close
+    File.unlink(@test_file) if FileTest.exist?(@test_file)
+  end
+
+end

data/test/test_29_process_jpg.rb

@@ -0,0 +1,131 @@
+##########################################################################
+# test_29_process_jpg.rb
+#
+# Tests for the JPEG width and height processing.
+#
+# reverse('©'), September 2005, 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_29_process_jpg < 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)
+    @type       = 5   # Excel Blip type (MSOBLIPTYPE).
+  end
+
+  def teardown
+    @workbook.close
+    File.unlink(@test_file) if FileTest.exist?(@test_file)
+  end
+
+  def test_valid_jpg_image_1
+    testname = '3w x 5h jpeg image.'
+    
+    data = %w(
+      FF D8 FF E0 00 10 4A 46 49 46 00 01 01 01 00 60
+      00 60 00 00 FF DB 00 43 00 06 04 05 06 05 04 06
+      06 05 06 07 07 06 08 0A 10 0A 0A 09 09 0A 14 0E
+      0F 0C 10 17 14 18 18 17 14 16 16 1A 1D 25 1F 1A
+      1B 23 1C 16 16 20 2C 20 23 26 27 29 2A 29 19 1F
+      2D 30 2D 28 30 25 28 29 28 FF DB 00 43 01 07 07
+      07 0A 08 0A 13 0A 0A 13 28 1A 16 1A 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 FF C0
+      00 11 08 00 05 00 03 03 01 22 00 02 11 01 03 11
+      01 FF C4 00 15 00 01 01 00 00 00 00 00 00 00 00
+      00 00 00 00 00 00 00 07 FF C4 00 14 10 01 00 00
+      00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF C4
+      00 15 01 01 01 00 00 00 00 00 00 00 00 00 00 00
+      00 00 00 06 08 FF C4 00 14 11 01 00 00 00 00 00
+      00 00 00 00 00 00 00 00 00 00 00 FF DA 00 0C 03
+      01 00 02 11 03 11 00 3F 00 9D 00 1C A4 5F FF D9
+    )
+    image = [data.join('')].pack('H*')
+
+    expected = [@type, 3, 5]
+    result   = @workbook.process_jpg(image, 'test.jpg')
+    assert_equal(expected, result, " \t" + testname)
+  end
+
+  def test_valid_jpg_image_2
+    testname = '5w x 3h jpeg image.'
+    
+    data = %w(
+      FF D8 FF E0 00 10 4A 46 49 46 00 01 01 01 00 60
+      00 60 00 00 FF DB 00 43 00 06 04 05 06 05 04 06
+      06 05 06 07 07 06 08 0A 10 0A 0A 09 09 0A 14 0E
+      0F 0C 10 17 14 18 18 17 14 16 16 1A 1D 25 1F 1A
+      1B 23 1C 16 16 20 2C 20 23 26 27 29 2A 29 19 1F
+      2D 30 2D 28 30 25 28 29 28 FF DB 00 43 01 07 07
+      07 0A 08 0A 13 0A 0A 13 28 1A 16 1A 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 FF C0
+      00 11 08 00 03 00 05 03 01 22 00 02 11 01 03 11
+      01 FF C4 00 15 00 01 01 00 00 00 00 00 00 00 00
+      00 00 00 00 00 00 00 07 FF C4 00 14 10 01 00 00
+      00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF C4
+      00 15 01 01 01 00 00 00 00 00 00 00 00 00 00 00
+      00 00 00 06 08 FF C4 00 14 11 01 00 00 00 00 00
+      00 00 00 00 00 00 00 00 00 00 00 FF DA 00 0C 03
+      01 00 02 11 03 11 00 3F 00 9D 00 1C A4 5F FF D9
+    )
+    image = [data.join('')].pack('H*')
+
+    expected = [@type, 5, 3]
+    result   = @workbook.process_jpg(image, 'test.jpg')
+    assert_equal(expected, result, " \t" + testname)
+  end
+
+  def test_valid_jpg_image_3_ffco_marker_missing
+    testname = 'FFCO marker missing in image.'
+    
+    data = %w(
+      FF D8 FF E0 00 10 4A 46 49 46 00 01 01 01 00 60
+      00 60 00 00 FF DB 00 43 00 06 04 05 06 05 04 06
+      06 05 06 07 07 06 08 0A 10 0A 0A 09 09 0A 14 0E
+      0F 0C 10 17 14 18 18 17 14 16 16 1A 1D 25 1F 1A
+      1B 23 1C 16 16 20 2C 20 23 26 27 29 2A 29 19 1F
+      2D 30 2D 28 30 25 28 29 28 FF DB 00 43 01 07 07
+      07 0A 08 0A 13 0A 0A 13 28 1A 16 1A 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28
+      28 28 28 28 28 28 28 28 28 28 28 28 28 28 FF C1
+      00 11 08 00 03 00 05 03 01 22 00 02 11 01 03 11
+      01 FF C4 00 15 00 01 01 00 00 00 00 00 00 00 00
+      00 00 00 00 00 00 00 07 FF C4 00 14 10 01 00 00
+      00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF C4
+      00 15 01 01 01 00 00 00 00 00 00 00 00 00 00 00
+      00 00 00 06 08 FF C4 00 14 11 01 00 00 00 00 00
+      00 00 00 00 00 00 00 00 00 00 00 FF DA 00 0C 03
+      01 00 02 11 03 11 00 3F 00 9D 00 1C A4 5F FF D9
+    )
+    image = [data.join('')].pack('H*')
+
+    assert_raise(RuntimeError, " \t" + testname) {
+      @workbook.process_jpg(image, 'test.jpg')
+    }
+  end
+
+  def test_invalid_jpeg_image
+    testname = 'empty image'
+    image    = ''
+    
+    assert_raise(RuntimeError, " \t" + testname) {
+      @workbook.process_jpg(image, 'test.jpg')
+    }
+  end
+
+end

data/test/test_30_validation_dval.rb

@@ -0,0 +1,82 @@
+##########################################################################
+# test_30_validation_dval.rb
+#
+# Tests for the Excel DVAL structure used in data validation.
+#
+# reverse('©'), September 2005, 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_validation_dval < 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)
+    @worksheet  = @workbook.add_worksheet
+  end
+
+  def teardown
+    @workbook.close
+    File.unlink(@test_file) if FileTest.exist?(@test_file)
+  end
+
+  def test_1
+    obj_id     = 1
+    dv_count   = 1
+
+    caption    = " \tData validation: _store_dval(#{obj_id}, #{dv_count})"
+    target     = %w(
+                   B2 01 12 00 04 00 00 00 00 00 00 00 00 00 01 00
+                   00 00 01 00 00 00
+                 ).join(' ')
+
+    result     = unpack_record(@worksheet.store_dval(obj_id, dv_count))
+    assert_equal(target, result, caption)
+  end
+
+  def test_2
+    obj_id     = -1
+    dv_count   = 1
+
+    caption    = " \tData validation: _store_dval(#{obj_id}, #{dv_count})"
+    target     = %w(
+                   B2 01 12 00 04 00 00 00 00 00 00 00 00 00 FF FF
+                   FF FF 01 00 00 00
+                 ).join(' ')
+
+    result     = unpack_record(@worksheet.store_dval(obj_id, dv_count))
+    assert_equal(target, result, caption)
+  end
+
+  def test_3
+    obj_id     = 1
+    dv_count   = 2
+
+    caption    = " \tData validation: _store_dval(#{obj_id}, #{dv_count})"
+    target     = %w(
+                   B2 01 12 00 04 00 00 00 00 00 00 00 00 00 01 00
+                   00 00 02 00 00 00
+                 ).join(' ')
+
+    result     = unpack_record(@worksheet.store_dval(obj_id, dv_count))
+    assert_equal(target, result, caption)
+  end
+
+  ###############################################################################
+  #
+  # Unpack the binary data into a format suitable for printing in tests.
+  #
+  def unpack_record(data)
+    data.unpack('C*').map! {|c| sprintf("%02X", c) }.join(' ')
+  end
+
+end

data/test/test_31_validation_dv_strings.rb

@@ -0,0 +1,131 @@
+##########################################################################
+# test_31_validation_dv_strings.rb
+#
+# Tests for the packed caption/message strings used in the Excel DV structure
+# as part of data validation.
+#
+# reverse('©'), September 2005, 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_validation_dv_strings < 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)
+    @worksheet  = @workbook.add_worksheet
+  end
+
+  def teardown
+    @workbook.close
+    File.unlink(@test_file) if FileTest.exist?(@test_file)
+  end
+
+  def test_empty_string
+    string      = ''
+    max_length  = 32
+
+    caption    = " \tData validation: _pack_dv_string('', #{max_length})"
+    target     = %w(
+                   01 00 00 00
+                 ).join(' ')
+    result     = unpack_record(@worksheet.pack_dv_string(string, max_length))
+    assert_equal(target, result, caption)
+  end
+
+  def test_nil
+    string      = nil
+    max_length  = 32
+
+    caption    = " \tData validation: _pack_dv_string('', #{max_length})"
+    target     = %w(
+                   01 00 00 00
+                 ).join(' ')
+    result     = unpack_record(@worksheet.pack_dv_string(string, max_length))
+    assert_equal(target, result, caption)
+  end
+
+  def test_single_space
+    string      = ' '
+    max_length  = 32
+
+    caption    = " \tData validation: _pack_dv_string('', #{max_length})"
+    target     = %w(
+                   01 00 00 20
+                 ).join(' ')
+    result     = unpack_record(@worksheet.pack_dv_string(string, max_length))
+    assert_equal(target, result, caption)
+  end
+
+  def test_single_character
+    string      = 'A'
+    max_length  = 32
+
+    caption    = " \tData validation: _pack_dv_string('', #{max_length})"
+    target     = %w(
+                   01 00 00 41
+                 ).join(' ')
+    result     = unpack_record(@worksheet.pack_dv_string(string, max_length))
+    assert_equal(target, result, caption)
+  end
+
+  def test_string_longer_than_32_characters_for_dialog_captions
+    string      = 'This string is longer than 32 characters'
+    max_length  = 32
+
+    caption    = " \tData validation: _pack_dv_string('', #{max_length})"
+    target     = %w(
+                   20 00 00 54 68 69 73 20
+                   73 74 72 69 6E 67 20 69 73 20 6C 6F 6E 67 65 72
+                   20 74 68 61 6E 20 33 32 20 63 68
+                 ).join(' ')
+    result     = unpack_record(@worksheet.pack_dv_string(string, max_length))
+    assert_equal(target, result, caption)
+  end
+
+  def test_string_longer_than_32_characters_for_dialog_messages
+    string      = 'ABCD' * 64
+    max_length  = 255
+
+    caption    = " \tData validation: _pack_dv_string('', #{max_length})"
+    target     = %w(
+                            FF 00 00 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43 44 41 42 43 44 41 42 43 44 41 42 43 44 41
+                            42 43
+                 ).join(' ')
+    result     = unpack_record(@worksheet.pack_dv_string(string, max_length))
+    assert_equal(target, result, caption)
+  end
+
+  ###############################################################################
+  #
+  # Unpack the binary data into a format suitable for printing in tests.
+  #
+  def unpack_record(data)
+    data.unpack('C*').map! {|c| sprintf("%02X", c) }.join(' ')
+  end
+
+end