xlsxwriter 0.0.2

data/test/test-array-formula.rb

@@ -0,0 +1,33 @@
+require_relative './xlsx-func-testcase'
+
+class TestArrayFormula < XlsxWriterTestCase
+  def setup
+    omit 'runs wrong test in libxlsxwriter'
+  end
+
+  test 'array_formula01' do |wb|
+    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|
+    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,70 @@
+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',   10000, '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',  10000, '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', 10000, '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',   10000, 'March'    ],
+    [ 'East',  'Grape',   7000, 'October'   ],
+    [ 'West',  'Grape',   1000, 'September' ],
+    [ 'East',  'Grape',  10000, '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',  10000, 'June'      ],
+    [ 'South', 'Pear',    1000, 'December'  ],
+    [ 'North', 'Grape',  10000, 'July'      ],
+    [ 'East',  'Grape',   6000, 'February'  ]
+  ]
+
+  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

@@ -0,0 +1,25 @@
+require_relative './xlsx-func-testcase'
+
+class TestChartArea < XlsxWriterTestCase
+  test 'chart_area03' do |wb|
+    wb.add_worksheet do |ws|
+      [
+        [1,  8,  3],
+        [2,  7,  6],
+        [3,  6,  9],
+        [4,  8, 12],
+        [5, 10, 15]
+      ].each { |row| ws.add_row row }
+
+      wb.add_chart(XlsxWriter::Workbook::Chart::AREA_STACKED_PERCENT) do |chart|
+        chart.axis_id_1 = 62_813_312
+        chart.axis_id_2 = 62_814_848
+
+        chart.add_series '=Sheet1!$A$1:$A$5', '=Sheet1!$B$1:$B$5'
+        chart.add_series '=Sheet1!$A$1:$A$5', '=Sheet1!$C$1:$C$5'
+
+        ws.insert_chart 'E9', chart
+      end
+    end
+  end
+end

data/test/test-data.rb

@@ -0,0 +1,65 @@
+require_relative './xlsx-func-testcase'
+
+class TestData < XlsxWriterTestCase
+  test 'data01' do |wb|
+    ws = wb.add_worksheet
+    ws.write_string(0, 0, 'Hello', nil)
+  end
+
+  test 'data02' do |wb|
+    ws = wb.add_worksheet
+
+    # in range
+    ws.write_number(0, 0, 123, nil)
+    ws.write_number(1_048_575, 0, 456, nil)
+
+    # out of range
+    ws.write_number(-1, 0, 123, nil)
+    ws.write_number(1_048_576, 0, 456, nil)
+  end
+
+  test 'data03' do |wb|
+    ws = wb.add_worksheet
+
+    ws.write_number(0, 16_383, 123, nil)
+    ws.write_number(1_048_575, 16_383, 456, nil)
+  end
+
+  test 'data04' do |wb|
+    ws = wb.add_worksheet
+
+    ws.write_string(0, 0, 'Foo', nil)
+    ws.write_string(0, 1, 'Bar', nil)
+    ws.write_string(1, 0, 'Bing', nil)
+    ws.write_string(2, 0, 'Buzz', nil)
+    ws.write_string(1_048_575, 0, 'End', nil)
+  end
+
+  test 'data05' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :format, bold: 1
+    ws.write_string 0, 0, 'Foo', :format
+  end
+
+  test 'data06' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :f1, bold: true
+    wb.add_format :f2, italic: true
+    wb.add_format :f3, bold: true, italic: true
+
+    ws.write_string 0, 'A', 'Foo', :f1
+    ws.write_string 1, 'A', 'Bar', :f2
+    ws.write_string 2, 'A', 'Baz', :f3
+  end
+
+  test 'data07' do |wb, t|
+    t.ignore_files = ['xl/calcChain.xml',
+                      '[Content_Types].xml',
+                      'xl/_rels/workbook.xml.rels']
+    ws = wb.add_worksheet
+
+    ws.write_formula_num 'A1', '=1+2', 3
+  end
+end

data/test/test-default-row.rb

@@ -0,0 +1,25 @@
+require_relative './xlsx-func-testcase'
+
+class TestDefaultRow < XlsxWriterTestCase
+  test 'default_row01' do |wb|
+    ws = wb.add_worksheet
+
+    ws.set_default_row(24, false)
+
+    ws.write_string(0, 'A', 'Foo', nil)
+    ws.write_string(9, 'A', 'Bar', nil)
+  end
+
+  test 'default_row05' do |wb|
+    ws = wb.add_worksheet
+
+    ws.set_default_row(24, true)
+
+    ws.write_string(0,  'A', 'Foo', nil)
+    ws.write_string(9,  'A', 'Bar', nil)
+    ws.write_string(19, 'A', 'Baz', nil)
+
+    (1..8).each { |i| ws.set_row(i, height: 24) }
+    (10..19).each { |i| ws.set_row(i, height: 24) }
+  end
+end

data/test/test-defined-name.rb

@@ -0,0 +1,46 @@
+require_relative './xlsx-func-testcase'
+
+class TestDefinedName < XlsxWriterTestCase
+  test 'defined_name01' do |wb, t|
+    t.ignore_elements = { 'xl/worksheets/sheet1.xml' => [ '<pageMargins' ] }
+    wb.add_worksheet do |ws|
+      ws.paper = 9
+      ws.vertical_dpi = 200
+      ws
+        .print_area(0, 'A', 5, 'E')
+        .autofilter(0, 'F', 0, 'G')
+        .write_string(0, 'G', 'Filter')
+        .write_string(0, 'F', 'Auto')
+        .fit_to_pages(2, 2)
+    end
+
+    wb.add_worksheet
+    wb.add_worksheet 'Sheet 3'
+
+    wb.define_name "'Sheet 3'!Bar", "='Sheet 3'!$A$1"
+    wb.define_name "Abc",           "=Sheet1!$A$1"
+    wb.define_name "Baz",           "=0.98"
+    wb.define_name "Sheet1!Bar",    "=Sheet1!$A$1"
+    wb.define_name "Sheet2!Bar",    "=Sheet2!$A$1"
+    wb.define_name "Sheet2!aaa",    "=Sheet2!$A$1"
+    wb.define_name "_Egg",          "=Sheet1!$A$1"
+    wb.define_name "_Fog",          "=Sheet1!$A$1"
+  end
+
+  test 'defined_name03' do |wb, t|
+    t.ignore_elements = { 'xl/worksheets/sheet1.xml' => [ '<pageMargins' ] }
+    wb.add_worksheet('sheet One')
+    wb.define_name 'Sales', '=\'sheet One\'!G1:H10'
+  end
+
+  test 'defined_name04' do |wb, t|
+    t.ignore_elements = { 'xl/worksheets/sheet1.xml' => [ '<pageMargins' ] }
+    wb.add_worksheet
+    wb.define_name '\\__',                 '=Sheet1!$A$1'
+    wb.define_name 'a3f6',                 '=Sheet1!$A$2'
+    wb.define_name 'afoo.bar',             '=Sheet1!$A$3'
+    wb.define_name "\xc3\xa9tude",         '=Sheet1!$A$4'
+    wb.define_name "e\xc3\xa9sum\xc3\xa9", '=Sheet1!$A$5'
+    wb.define_name 'a',                    '=Sheet1!$A$6'
+  end
+end

data/test/test-escapes.rb

@@ -0,0 +1,33 @@
+require_relative './xlsx-func-testcase'
+
+class TestEscapes < XlsxWriterTestCase
+  test 'escapes04' do |wb|
+    wb.add_worksheet
+      .write_url(0, 'A', 'http://www.perl.com/?a=1&b=2')
+  end
+
+  test 'escapes05' do |wb|
+    wb.add_worksheet('Start')
+      .write_url(0, 'A', 'internal:\'A & B\'!A1', string: 'Jump to A & B')
+    wb.add_worksheet('A & B')
+  end
+
+  test 'escapes06' do |wb|
+    ws = wb.add_worksheet
+    ws.set_column(0, 0, width: 14)
+    wb.add_format :f1, num_format: '[Red]0.0%\\ "a"'
+    ws.write_number(0, 'A', 123, :f1)
+  end
+
+  test 'escapes07' do |wb|
+    wb.add_worksheet
+      .write_url(0, 'A', 'http://example.com/!"$%&\'( )*+,-./0123456789:;<=>?@' \
+                         'ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`'                    \
+                         'abcdefghijklmnopqrstuvwxyz{|}~', nil)
+  end
+
+  test 'escapes08' do |wb|
+    wb.add_worksheet
+      .write_url 0, 'A', 'http://example.com/%5b0%5d', string: 'http://example.com/[0]'
+  end
+end

data/test/test-fit-to-pages.rb

@@ -0,0 +1,21 @@
+require_relative './xlsx-func-testcase'
+
+class TestFitToPages < XlsxWriterTestCase
+  test 'fit_to_pages04' do |wb, t|
+    t.ignore_elements = { 'xl/worksheets/sheet1.xml' => [ '<pageMargins' ] }
+    ws = wb.add_worksheet
+    ws.fit_to_pages(3, 2)
+    ws.paper = 9
+    ws.vertical_dpi = 200
+    ws.write_string 0, 'A', 'Foo', nil
+  end
+
+  test 'fit_to_pages05' do |wb, t|
+    t.ignore_elements = { 'xl/worksheets/sheet1.xml' => [ '<pageMargins' ] }
+    ws = wb.add_worksheet
+    ws.fit_to_pages(1, 0)
+    ws.paper = 9
+    ws.vertical_dpi = 200
+    ws.write_string 0, 'A', 'Foo', nil
+  end
+end

data/test/test-formatting.rb

@@ -0,0 +1,137 @@
+require_relative './xlsx-func-testcase'
+
+class TestFormatting < XlsxWriterTestCase
+  test 'format01' do |wb|
+    ws1 = wb.add_worksheet
+    ws2 = wb.add_worksheet 'Data Sheet'
+    ws3 = wb.add_worksheet
+
+    wb.add_format :unused, {}
+    wb.add_format :format, bold: true
+    wb.add_format :unused2, {}
+    wb.add_format :unused3, {}
+
+    ws1.write_string(0, 0, 'Foo', nil)
+    ws1.write_number(1, 0, 123, nil)
+
+    ws3.write_string(1, 1, 'Foo', nil)
+    ws3.write_string(2, 1, 'Bar', :format)
+    ws3.write_number(3, 2, 234, nil)
+  end
+
+  test 'format02' do |wb|
+    ws = wb.add_worksheet
+
+    ws.set_row(0, height: 30)
+    wb.add_format(:format1, font_name: 'Arial',
+                            bold: true,
+                            align: XlsxWriter::Format::ALIGN_LEFT,
+                            vertical_align: XlsxWriter::Format::ALIGN_VERTICAL_BOTTOM)
+    wb.add_format(:format2, font_name: 'Arial',
+                            bold: true,
+                            rotation: 90,
+                            align:  XlsxWriter::Format::ALIGN_CENTER,
+                            vertical_align:  XlsxWriter::Format::ALIGN_VERTICAL_BOTTOM)
+
+    ws.write_string(0, 0, 'Foo', :format1)
+    ws.write_string(0, 1, 'Bar', :format2)
+  end
+
+  test 'format06' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :f1, num_format_index: 2
+    wb.add_format :f2, num_format_index: 12
+
+    ws.write_number(0, 0, 1.2222, nil)
+    ws.write_number(1, 0, 1.2222, :f1)
+    ws.write_number(2, 0, 1.2222, :f2)
+    ws.write_number(3, 0, 1.2222, nil)
+    ws.write_number(4, 0, 1.2222, nil)
+  end
+
+  test 'format07' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :f1, num_format: '0.000'
+    wb.add_format :f2, num_format: '0.00000'
+    wb.add_format :f3, num_format: '0.000000'
+
+    ws.write_number(0, 0, 1.2222, nil)
+    ws.write_number(1, 0, 1.2222, :f1)
+    ws.write_number(2, 0, 1.2222, :f2)
+    ws.write_number(3, 0, 1.2222, :f3)
+    ws.write_number(4, 0, 1.2222, nil)
+  end
+
+  test 'format08' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :border1, bottom: XlsxWriter::Format::BORDER_THIN,
+                            bottom_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border2, top: XlsxWriter::Format::BORDER_THIN,
+                            top_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border3, left: XlsxWriter::Format::BORDER_THIN,
+                            left_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border4, right: XlsxWriter::Format::BORDER_THIN,
+                            right_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border5, border: XlsxWriter::Format::BORDER_THIN,
+                            border_color: XlsxWriter::Format::COLOR_RED
+
+    ws.write_blank(1, 1, :border1)
+    ws.write_blank(3, 1, :border2)
+    ws.write_blank(5, 1, :border3)
+    ws.write_blank(7, 1, :border4)
+    ws.write_blank(9, 1, :border5)
+  end
+
+  test 'format09' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :border1, border: XlsxWriter::Format::BORDER_HAIR,
+                            border_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border2, diag_type: XlsxWriter::Format::DIAGONAL_BORDER_UP,
+                            diag_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border3, diag_type: XlsxWriter::Format::DIAGONAL_BORDER_DOWN,
+                            diag_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border4, diag_type: XlsxWriter::Format::DIAGONAL_BORDER_UP_DOWN,
+                            diag_color: XlsxWriter::Format::COLOR_RED
+
+    ws.write_blank(1, 1, :border1)
+    ws.write_blank(3, 1, :border2)
+    ws.write_blank(5, 1, :border3)
+    ws.write_blank(7, 1, :border4)
+  end
+
+  test 'format10' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :border1, bg_color: XlsxWriter::Format::COLOR_RED
+    wb.add_format :border2, bg_color: XlsxWriter::Format::COLOR_YELLOW,
+                            pattern: XlsxWriter::Format::PATTERN_DARK_VERTICAL
+    wb.add_format :border3, bg_color: XlsxWriter::Format::COLOR_YELLOW,
+                            fg_color: XlsxWriter::Format::COLOR_RED,
+                            pattern: XlsxWriter::Format::PATTERN_GRAY_0625
+
+    ws.write_blank(1, 1, :border1)
+    ws.write_blank(3, 1, :border2)
+    ws.write_blank(5, 1, :border3)
+  end
+
+  test 'format12' do |wb|
+    ws = wb.add_worksheet
+
+    wb.add_format :top_left_bottom, bottom: XlsxWriter::Format::BORDER_THIN,
+                                    left:   XlsxWriter::Format::BORDER_THIN,
+                                    top:    XlsxWriter::Format::BORDER_THIN
+    wb.add_format :top_bottom,      bottom: XlsxWriter::Format::BORDER_THIN,
+                                    top:    XlsxWriter::Format::BORDER_THIN
+    wb.add_format :top_left,        left:   XlsxWriter::Format::BORDER_THIN,
+                                    top:    XlsxWriter::Format::BORDER_THIN
+    wb.add_format :unused,          left:   XlsxWriter::Format::BORDER_THIN
+
+    ws.write_string(1, 'B', 'test', :top_left_bottom)
+    ws.write_string(1, 'D', 'test', :top_left)
+    ws.write_string(1, 'F', 'test', :top_bottom)
+  end
+end