xlsxwriter 0.2.1.pre.2 → 0.2.3.pre.1

data/test/support/xlsx_comparable.rb

@@ -1,9 +1,18 @@
 # frozen_string_literal: true
 
+require 'diffy'
 require 'test/unit'
 require 'zip'
 
 module XlsxComparable
+  def assert_long_seq_equal(expected, actual)
+    expected = expected.join("\n")
+    actual = actual.join("\n")
+    diff = Diffy::Diff.new(expected, actual).to_s(:color)
+    full_message = "diff: \n#{diff}"
+    assert_block(full_message) { expected == actual }
+  end
+
   def assert_xlsx_equal(got_path, exp_path, ignore_files = [], ignore_elements = {})
     Zip::File.open(exp_path) do |exp_zip|
       Zip::File.open(got_path) do |got_zip|
@@ -17,38 +26,22 @@ module XlsxComparable
           exp_xml_str = exp_zip.read(exp_entry.name)
           got_xml_str = got_zip.read(exp_entry.name)
 
-          if %w(.png .jpeg .bmp .bin).include?(File.extname(exp_entry.name))
+          if %w[.png .jpeg .bmp .bin].include?(File.extname(exp_entry.name))
             exp_xml_str.force_encoding('BINARY')
             assert_equal(exp_xml_str, got_xml_str)
             next
           end
 
-          case exp_entry.name
-          when 'docProps/core.xml'
-            exp_xml_str.gsub!(/ ?John/, '')
-            exp_xml_str.gsub!(/\d{4}-\d\d-\d\dT\d\d\:\d\d:\d\dZ/, '')
-            got_xml_str.gsub!(/\d{4}-\d\d-\d\dT\d\d\:\d\d:\d\dZ/, '')
-          when 'xl/workbook.xml'
-            exp_xml_str.gsub!(/<workbookView[^>]*>/, '<workbookView/>')
-            exp_xml_str.gsub!(/<calcPr[^>]*>/, '<calcPr/>')
-            got_xml_str.gsub!(/<workbookView[^>]*>/, '<workbookView/>')
-            got_xml_str.gsub!(/<calcPr[^>]*>/, '<calcPr/>')
-          when %r{xl/worksheets/sheet\d+.xml}
-            exp_xml_str.gsub!(/horizontalDpi="200" /, '')
-            exp_xml_str.gsub!(/verticalDpi="200" /, '')
-            exp_xml_str.gsub!(/(<pageSetup[^>]*) r:id="rId1"/, '\1')
-          when %r{xl/charts/chart\d+.xml}
-            exp_xml_str.gsub!(/<c:pageMargins[^>]*>/, '<c:pageMargins/>')
-            got_xml_str.gsub!(/<c:pageMargins[^>]*>/, '<c:pageMargins/>')
-          end
+          _sanitize_for_comparison(exp_entry.name, exp_xml_str, got_xml_str)
 
           got_xml = _xml_to_list(got_xml_str)
 
-          if exp_entry.name =~ /.vml\z/
-            exp_xml = _vml_to_list(exp_xml_str)
-          else
-            exp_xml = _xml_to_list(exp_xml_str)
-          end
+          exp_xml =
+            if exp_entry.name =~ /.vml\z/
+              _vml_to_list(exp_xml_str)
+            else
+              _xml_to_list(exp_xml_str)
+            end
 
           if ignore_elements.key?(exp_entry.name)
             patterns = ignore_elements[exp_entry.name]
@@ -61,7 +54,7 @@ module XlsxComparable
             exp_xml = _sort_rel_file_data(exp_xml)
           end
 
-          assert_equal exp_xml, got_xml
+          assert_long_seq_equal exp_xml, got_xml
         end
       end
     end
@@ -86,7 +79,7 @@ module XlsxComparable
       line.strip!
       next if line == ''
 
-      line.tr!(?', ?")
+      line.tr!("'", '"')
       line << ' ' if line =~ /"$/
       line << "\n" if line =~ />$/
       line.gsub!('><', ">\n<")
@@ -107,4 +100,25 @@ module XlsxComparable
 
     xml_elements
   end
+
+  def _sanitize_for_comparison(name, exp_xml_str, got_xml_str)
+    case name
+    when 'docProps/core.xml'
+      exp_xml_str.gsub!(/ ?John/, '')
+      exp_xml_str.gsub!(/\d{4}-\d\d-\d\dT\d\d:\d\d:\d\dZ/, '')
+      got_xml_str.gsub!(/\d{4}-\d\d-\d\dT\d\d:\d\d:\d\dZ/, '')
+    when 'xl/workbook.xml'
+      exp_xml_str.gsub!(/<workbookView[^>]*>/, '<workbookView/>')
+      exp_xml_str.gsub!(/<calcPr[^>]*>/, '<calcPr/>')
+      got_xml_str.gsub!(/<workbookView[^>]*>/, '<workbookView/>')
+      got_xml_str.gsub!(/<calcPr[^>]*>/, '<calcPr/>')
+    when %r{xl/worksheets/sheet\d+.xml}
+      exp_xml_str.gsub!(/horizontalDpi="200" /, '')
+      exp_xml_str.gsub!(/verticalDpi="200" /, '')
+      exp_xml_str.gsub!(/(<pageSetup[^>]*) r:id="rId1"/, '\1')
+    when %r{xl/charts/chart\d+.xml}
+      exp_xml_str.gsub!(/<c:pageMargins[^>]*>/, '<c:pageMargins/>')
+      got_xml_str.gsub!(/<c:pageMargins[^>]*>/, '<c:pageMargins/>')
+    end
+  end
 end

data/test/test_array_formula.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+
+require_relative './xlsx_func_testcase'
+
+class TestArrayFormula < XlsxWriterTestCase
+  test 'array_formula01' do |wb, t|
+    t.ignore_files = %w(
+      xl/calcChain.xml
+      [Content_Types].xml
+      xl/_rels/workbook.xml.rels
+    )
+    ws = wb.add_worksheet nil
+
+    ws.write_number(0, 1, 0, nil)
+    ws.write_number(1, 1, 0, nil)
+    ws.write_number(2, 1, 0, nil)
+    ws.write_number(0, 2, 0, nil)
+    ws.write_number(1, 2, 0, nil)
+    ws.write_number(2, 2, 0, nil)
+
+    ws.write_array_formula(0, 0, 2, 0, '{=SUM(B1:C1*B2:C2)}', nil)
+  end
+
+  test 'array_formula02' do |wb, t|
+    t.ignore_files = %w(
+      xl/calcChain.xml
+      [Content_Types].xml
+      xl/_rels/workbook.xml.rels
+    )
+    ws = wb.add_worksheet
+    wb.add_format(:bold, bold: true)
+
+    ws.write_number(0, 1, 0, nil)
+    ws.write_number(1, 1, 0, nil)
+    ws.write_number(2, 1, 0, nil)
+    ws.write_number(0, 2, 0, nil)
+    ws.write_number(1, 2, 0, nil)
+    ws.write_number(2, 2, 0, nil)
+
+    ws.write_array_formula(0, 0, 2, 0, '{=SUM(B1:C1*B2:C2)}', :bold)
+  end
+end

data/test/test_autofilter.rb

@@ -0,0 +1,72 @@
+# frozen_string_literal: true
+
+require_relative './xlsx_func_testcase'
+
+class TestAutofilter < XlsxWriterTestCase
+  ROWS = [
+    %w[Region Item Volume Month],
+    ['East',  'Apple',  9000,   'July'],
+    ['East',  'Apple',  5000,   'July'],
+    ['South', 'Orange', 9000,   'September'],
+    ['North', 'Apple',  2000,   'November'],
+    ['West',  'Apple',  9000,   'November'],
+    ['South', 'Pear',   7000,   'October'],
+    ['North', 'Pear',   9000,   'August'],
+    ['West',  'Orange', 1000,   'December'],
+    ['West',  'Grape',  1000,   'November'],
+    ['South', 'Pear',   10_000, 'April'],
+    ['West',  'Grape',  6000,   'January'],
+    ['South', 'Orange', 3000,   'May'],
+    ['North', 'Apple',  3000,   'December'],
+    ['South', 'Apple',  7000,   'February'],
+    ['West',  'Grape',  1000,   'December'],
+    ['East',  'Grape',  8000,   'February'],
+    ['South', 'Grape',  10_000, 'June'],
+    ['West',  'Pear',   7000,   'December'],
+    ['South', 'Apple',  2000,   'October'],
+    ['East',  'Grape',  7000,   'December'],
+    ['North', 'Grape',  6000,   'April'],
+    ['East',  'Pear',   8000,   'February'],
+    ['North', 'Apple',  7000,   'August'],
+    ['North', 'Orange', 7000,   'July'],
+    ['North', 'Apple',  6000,   'June'],
+    ['South', 'Grape',  8000,   'September'],
+    ['West',  'Apple',  3000,   'October'],
+    ['South', 'Orange', 10_000, 'November'],
+    ['West',  'Grape',  4000,   'July'],
+    ['North', 'Orange', 5000,   'August'],
+    ['East',  'Orange', 1000,   'November'],
+    ['East',  'Orange', 4000,   'October'],
+    ['North', 'Grape',  5000,   'August'],
+    ['East',  'Apple',  1000,   'December'],
+    ['South', 'Apple',  10_000, 'March'],
+    ['East',  'Grape',  7000,   'October'],
+    ['West',  'Grape',  1000,   'September'],
+    ['East',  'Grape',  10_000, 'October'],
+    ['South', 'Orange', 8000,   'March'],
+    ['North', 'Apple',  4000,   'July'],
+    ['South', 'Orange', 5000,   'July'],
+    ['West',  'Apple',  4000,   'June'],
+    ['East',  'Apple',  5000,   'April'],
+    ['North', 'Pear',   3000,   'August'],
+    ['East',  'Grape',  9000,   'November'],
+    ['North', 'Orange', 8000,   'October'],
+    ['East',  'Apple',  10_000, 'June'],
+    ['South', 'Pear',   1000,   'December'],
+    ['North', 'Grape',  10_000, 'July'],
+    ['East',  'Grape',  6000,   'February']
+  ].freeze
+
+  test 'autofilter00' do |wb|
+    ws = wb.add_worksheet
+
+    ROWS.each { |row| ws.add_row row }
+  end
+
+  test 'autofilter01' do |wb|
+    ws = wb.add_worksheet
+
+    ROWS.each { |row| ws.add_row row }
+    ws.autofilter('A1', 50, 3)
+  end
+end

data/test/{test-chart-area.rb → test_chart_area.rb}

@@ -1,6 +1,6 @@
 # frozen_string_literal: true
 
-require_relative './xlsx-func-testcase'
+require_relative './xlsx_func_testcase'
 
 class TestChartArea < XlsxWriterTestCase
   DATA = [
@@ -9,7 +9,7 @@ class TestChartArea < XlsxWriterTestCase
     [3,  6,  9],
     [4,  8, 12],
     [5, 10, 15]
-  ]
+  ].freeze
 
   test 'chart_area01' do |wb|
     wb.add_worksheet do |ws|

data/test/{test-chart-axis.rb → test_chart_axis.rb}

@@ -1,6 +1,6 @@
 # frozen_string_literal: true
 
-require_relative './xlsx-func-testcase'
+require_relative './xlsx_func_testcase'
 require_relative './support/chart_test'
 
 class TestChartAxis < XlsxWriterTestCase
@@ -11,16 +11,16 @@ class TestChartAxis < XlsxWriterTestCase
     [2,  4,  6],
     [3,  6,  9],
     [4,  8, 12],
-    [5, 10, 15],
-  ]
+    [5, 10, 15]
+  ].freeze
 
   DATA2 = [
     [1, 8,  3],
     [2, 7,  6],
     [3, 6,  9],
     [4, 8,  12],
-    [5, 10, 15],
-  ]
+    [5, 10, 15]
+  ].freeze
 
   chart_test 'chart_axis01', XlsxWriter::Workbook::Chart::BAR do |chart|
     chart.axis_id_1 = 58_955_648
@@ -71,7 +71,7 @@ class TestChartAxis < XlsxWriterTestCase
 
   test 'chart_axis06' do |wb|
     wb.add_worksheet do |ws|
-      [ [2, 60], [4, 30], [6, 10] ].each { |row| ws.add_row row }
+      [[2, 60], [4, 30], [6, 10]].each { |row| ws.add_row row }
       wb.add_chart(XlsxWriter::Workbook::Chart::PIE) do |chart|
         chart.add_series '=Sheet1!$A$1:$A$3', '=Sheet1!$B$1:$B$3'
         chart.title = 'Title'
@@ -279,8 +279,8 @@ class TestChartAxis < XlsxWriterTestCase
   end
 
   chart_test 'chart_axis26', XlsxWriter::Workbook::Chart::LINE do |chart|
-    chart.axis_id_1 = 73_048_448
-    chart.axis_id_2 = 73_049_984
+    chart.axis_id_1 = 108_315_392
+    chart.axis_id_2 = 108_329_216
 
     chart.add_series '=Sheet1!$A$1:$A$5'
     chart.add_series '=Sheet1!$B$1:$B$5'
@@ -290,8 +290,8 @@ class TestChartAxis < XlsxWriterTestCase
   end
 
   chart_test 'chart_axis27', XlsxWriter::Workbook::Chart::LINE do |chart|
-    chart.axis_id_1 = 73_048_448
-    chart.axis_id_2 = 73_049_984
+    chart.axis_id_1 = 108_315_392
+    chart.axis_id_2 = 108_329_216
 
     chart.add_series '=Sheet1!$A$1:$A$5'
     chart.add_series '=Sheet1!$B$1:$B$5'
@@ -301,8 +301,8 @@ class TestChartAxis < XlsxWriterTestCase
   end
 
   chart_test 'chart_axis28', XlsxWriter::Workbook::Chart::LINE do |chart|
-    chart.axis_id_1 = 45_451_904
-    chart.axis_id_2 = 47_401_600
+    chart.axis_id_1 = 115_375_104
+    chart.axis_id_2 = 115_390_720
 
     chart.add_series '=Sheet1!$A$1:$A$5'
     chart.add_series '=Sheet1!$B$1:$B$5'
@@ -312,8 +312,8 @@ class TestChartAxis < XlsxWriterTestCase
   end
 
   chart_test 'chart_axis29', XlsxWriter::Workbook::Chart::LINE do |chart|
-    chart.axis_id_1 = 45_444_480
-    chart.axis_id_2 = 47_402_368
+    chart.axis_id_1 = 145_169_024
+    chart.axis_id_2 = 145_176_448
 
     chart.add_series '=Sheet1!$A$1:$A$5'
     chart.add_series '=Sheet1!$B$1:$B$5'
@@ -356,8 +356,8 @@ class TestChartAxis < XlsxWriterTestCase
   end
 
   chart_test 'chart_axis33', XlsxWriter::Workbook::Chart::LINE do |chart|
-    chart.axis_id_1 = 68_827_008
-    chart.axis_id_2 = 68_898_816
+    chart.axis_id_1 = 143_682_944
+    chart.axis_id_2 = 143_946_496
 
     chart.add_series '=Sheet1!$A$1:$A$5'
     chart.add_series '=Sheet1!$B$1:$B$5'