write_xlsx 0.0.2

data/test/package/core/test_core01.rb

@@ -0,0 +1,28 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/core'
+
+class TestCore01 < Test::Unit::TestCase
+  def test_assemble_xml_file
+    properties = {
+      :author   => 'A User',
+      :created  => Time.local(2010, 1, 1, 0, 0, 0)
+    }
+
+    @obj = Writexlsx::Package::Core.new
+    @obj.set_properties(properties)
+    @obj.assemble_xml_file
+    result = got_to_array(@obj.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<cp:coreProperties xmlns:cp="http://schemas.openxmlformats.org/package/2006/metadata/core-properties" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:dcterms="http://purl.org/dc/terms/" xmlns:dcmitype="http://purl.org/dc/dcmitype/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <dc:creator>A User</dc:creator>
+  <cp:lastModifiedBy>A User</cp:lastModifiedBy>
+  <dcterms:created xsi:type="dcterms:W3CDTF">2010-01-01T00:00:00Z</dcterms:created>
+  <dcterms:modified xsi:type="dcterms:W3CDTF">2010-01-01T00:00:00Z</dcterms:modified>
+</cp:coreProperties>
+EOS
+    )
+    assert_equal(expected, result)
+  end
+end

data/test/package/core/test_core02.rb

@@ -0,0 +1,42 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/core'
+
+class TestCore02 < Test::Unit::TestCase
+  def test_assemble_xml_file
+    properties = {
+      :title    => 'This is an example spreadsheet',
+      :subject  => 'With document properties',
+      :author   => 'John McNamara',
+      :manager  => 'Dr. Heinz Doofenshmirtz',
+      :company  => 'of Wolves',
+      :category => 'Example spreadsheets',
+      :keywords => 'Sample, Example, Properties',
+      :comments => 'Created with Ruby and WriteXLSX',
+      :status   => 'Quo',
+      :created  => Time.local(2011, 4, 6, 19, 45, 15)
+    }
+
+    @obj = Writexlsx::Package::Core.new
+    @obj.set_properties(properties)
+    @obj.assemble_xml_file
+    result = got_to_array(@obj.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<cp:coreProperties xmlns:cp="http://schemas.openxmlformats.org/package/2006/metadata/core-properties" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:dcterms="http://purl.org/dc/terms/" xmlns:dcmitype="http://purl.org/dc/dcmitype/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <dc:title>This is an example spreadsheet</dc:title>
+  <dc:subject>With document properties</dc:subject>
+  <dc:creator>John McNamara</dc:creator>
+  <cp:keywords>Sample, Example, Properties</cp:keywords>
+  <dc:description>Created with Ruby and WriteXLSX</dc:description>
+  <cp:lastModifiedBy>John McNamara</cp:lastModifiedBy>
+  <dcterms:created xsi:type="dcterms:W3CDTF">2011-04-06T19:45:15Z</dcterms:created>
+  <dcterms:modified xsi:type="dcterms:W3CDTF">2011-04-06T19:45:15Z</dcterms:modified>
+  <cp:category>Example spreadsheets</cp:category>
+  <cp:contentStatus>Quo</cp:contentStatus>
+</cp:coreProperties>
+EOS
+    )
+    assert_equal(expected, result)
+  end
+end

data/test/package/relationships/test_relationships.rb

@@ -0,0 +1,28 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/relationships'
+
+class TestRelationships < Test::Unit::TestCase
+  def test_assemble_xml_file
+    @obj = Writexlsx::Package::Relationships.new
+    @obj.add_document_relationship('/worksheet',     'worksheets/sheet1.xml')
+    @obj.add_document_relationship('/theme',         'theme/theme1.xml')
+    @obj.add_document_relationship('/styles',        'styles.xml')
+    @obj.add_document_relationship('/sharedStrings', 'sharedStrings.xml')
+    @obj.add_document_relationship('/calcChain',     'calcChain.xml')
+    @obj.assemble_xml_file
+    result = got_to_array(@obj.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<Relationships xmlns="http://schemas.openxmlformats.org/package/2006/relationships">
+  <Relationship Id="rId1" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/worksheet" Target="worksheets/sheet1.xml"/>
+  <Relationship Id="rId2" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/theme" Target="theme/theme1.xml"/>
+  <Relationship Id="rId3" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/styles" Target="styles.xml"/>
+  <Relationship Id="rId4" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/sharedStrings" Target="sharedStrings.xml"/>
+  <Relationship Id="rId5" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/calcChain" Target="calcChain.xml"/>
+</Relationships>
+EOS
+    )
+    assert_equal(expected, result)
+  end
+end

data/test/package/relationships/test_sheet_rels.rb

@@ -0,0 +1,22 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/relationships'
+
+class TestSheetRels < Test::Unit::TestCase
+  def test_sheet_rels
+    @obj = Writexlsx::Package::Relationships.new
+    @obj.add_worksheet_relationship('/hyperlink', 'www.foo.com', 'External')
+    @obj.add_worksheet_relationship('/hyperlink', 'link00.xlsx', 'External')
+    @obj.assemble_xml_file
+    result = got_to_array(@obj.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<Relationships xmlns="http://schemas.openxmlformats.org/package/2006/relationships">
+  <Relationship Id="rId1" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/hyperlink" Target="www.foo.com" TargetMode="External"/>
+  <Relationship Id="rId2" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/hyperlink" Target="link00.xlsx" TargetMode="External"/>
+</Relationships>
+EOS
+    )
+    assert_equal(expected, result)
+  end
+end

data/test/package/shared_strings/test_shared_strings01.rb

@@ -0,0 +1,30 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/shared_strings'
+
+class TestSharedStrings01 < Test::Unit::TestCase
+  def test_shared_strings01
+    @obj = Writexlsx::Package::SharedStrings.new
+    @obj.string_count = 7
+    @obj.unique_count = 3
+    @obj.add_strings(['neptune', 'mars', 'venus'])
+    @obj.assemble_xml_file
+    result = got_to_array(@obj.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<sst xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" count="7" uniqueCount="3">
+  <si>
+    <t>neptune</t>
+  </si>
+  <si>
+    <t>mars</t>
+  </si>
+  <si>
+    <t>venus</t>
+  </si>
+</sst>
+EOS
+    )
+    assert_equal(expected, result)
+  end
+end

data/test/package/shared_strings/test_shared_strings02.rb

@@ -0,0 +1,30 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/shared_strings'
+
+class TestSharedStrings02 < Test::Unit::TestCase
+  def test_shared_strings02
+    @obj = Writexlsx::Package::SharedStrings.new
+    @obj.string_count = 3
+    @obj.unique_count = 3
+    @obj.add_strings(['abcdefg', '   abcdefg', 'abcdefg   '])
+    @obj.assemble_xml_file
+    result = got_to_array(@obj.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<sst xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" count="3" uniqueCount="3">
+  <si>
+    <t>abcdefg</t>
+  </si>
+  <si>
+    <t xml:space="preserve">   abcdefg</t>
+  </si>
+  <si>
+    <t xml:space="preserve">abcdefg   </t>
+  </si>
+</sst>
+EOS
+    )
+    assert_equal(expected, result)
+  end
+end

data/test/package/shared_strings/test_write_si.rb

@@ -0,0 +1,13 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/shared_strings'
+
+class TestWriteSi < Test::Unit::TestCase
+  def test_write_si
+    @obj = Writexlsx::Package::SharedStrings.new
+    @obj.__send__('write_si', 'neptune')
+    result = @obj.instance_variable_get(:@writer).string
+    expected = '<si><t>neptune</t></si>'
+    assert_equal(expected, result)
+  end
+end

data/test/package/shared_strings/test_write_sst.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/package/shared_strings'
+
+class TestWriteSst < Test::Unit::TestCase
+  def test_write_sst
+    @obj = Writexlsx::Package::SharedStrings.new
+    @obj.string_count = 7
+    @obj.unique_count = 3
+    @obj.__send__('write_sst')
+    result = @obj.instance_variable_get(:@writer).string
+    expected = '<sst xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" count="7" uniqueCount="3">'
+    assert_equal(expected, result)
+  end
+end

data/test/package/styles/test_styles_01.rb

@@ -0,0 +1,69 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx'
+require 'stringio'
+
+class TestStyles01 < Test::Unit::TestCase
+  def test_styles_01
+    workbook = WriteXLSX.new(StringIO.new)
+    workbook.__send__('prepare_format_properties')
+
+    @style = Writexlsx::Package::Styles.new
+    @style.set_style_properties(
+      workbook.xf_formats,
+      workbook.palette,
+      workbook.font_count,
+      workbook.num_format_count,
+      workbook.border_count,
+      workbook.fill_count,
+      workbook.custom_colors,
+      workbook.dxf_formats
+    )
+    @style.assemble_xml_file
+    result = got_to_array(@style.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<styleSheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main">
+  <fonts count="1">
+    <font>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+  </fonts>
+  <fills count="2">
+    <fill>
+      <patternFill patternType="none"/>
+    </fill>
+    <fill>
+      <patternFill patternType="gray125"/>
+    </fill>
+  </fills>
+  <borders count="1">
+    <border>
+      <left/>
+      <right/>
+      <top/>
+      <bottom/>
+      <diagonal/>
+    </border>
+  </borders>
+  <cellStyleXfs count="1">
+    <xf numFmtId="0" fontId="0" fillId="0" borderId="0"/>
+  </cellStyleXfs>
+  <cellXfs count="1">
+    <xf numFmtId="0" fontId="0" fillId="0" borderId="0" xfId="0"/>
+  </cellXfs>
+  <cellStyles count="1">
+    <cellStyle name="Normal" xfId="0" builtinId="0"/>
+  </cellStyles>
+  <dxfs count="0"/>
+  <tableStyles count="0" defaultTableStyle="TableStyleMedium9" defaultPivotStyle="PivotStyleLight16"/>
+</styleSheet>
+EOS
+      )
+    assert_equal(expected, result)
+  end
+end

data/test/package/styles/test_styles_02.rb

@@ -0,0 +1,104 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/workbook'
+require 'write_xlsx/package/styles'
+require 'stringio'
+
+class TestStyles02 < Test::Unit::TestCase
+  def test_styles_02
+    workbook = WriteXLSX.new(StringIO.new)
+
+    format1 = workbook.add_format(:bold => 1)
+    format2 = workbook.add_format(:italic => 1)
+    format3 = workbook.add_format(:bold => 1, :italic => 1)
+
+    workbook.__send__('set_default_xf_indices')
+    workbook.__send__('prepare_format_properties')
+
+    @style = Writexlsx::Package::Styles.new
+    @style.set_style_properties(
+      workbook.xf_formats,
+      workbook.palette,
+      workbook.font_count,
+      workbook.num_format_count,
+      workbook.border_count,
+      workbook.fill_count,
+      workbook.custom_colors,
+      workbook.dxf_formats
+    )
+    @style.assemble_xml_file
+    result = got_to_array(@style.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<styleSheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main">
+  <fonts count="4">
+    <font>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+    <font>
+      <b/>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+    <font>
+      <i/>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+    <font>
+      <b/>
+      <i/>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+  </fonts>
+  <fills count="2">
+    <fill>
+      <patternFill patternType="none"/>
+    </fill>
+    <fill>
+      <patternFill patternType="gray125"/>
+    </fill>
+  </fills>
+  <borders count="1">
+    <border>
+      <left/>
+      <right/>
+      <top/>
+      <bottom/>
+      <diagonal/>
+    </border>
+  </borders>
+  <cellStyleXfs count="1">
+    <xf numFmtId="0" fontId="0" fillId="0" borderId="0"/>
+  </cellStyleXfs>
+  <cellXfs count="4">
+    <xf numFmtId="0" fontId="0" fillId="0" borderId="0" xfId="0"/>
+    <xf numFmtId="0" fontId="1" fillId="0" borderId="0" xfId="0" applyFont="1"/>
+    <xf numFmtId="0" fontId="2" fillId="0" borderId="0" xfId="0" applyFont="1"/>
+    <xf numFmtId="0" fontId="3" fillId="0" borderId="0" xfId="0" applyFont="1"/>
+  </cellXfs>
+  <cellStyles count="1">
+    <cellStyle name="Normal" xfId="0" builtinId="0"/>
+  </cellStyles>
+  <dxfs count="0"/>
+  <tableStyles count="0" defaultTableStyle="TableStyleMedium9" defaultPivotStyle="PivotStyleLight16"/>
+</styleSheet>
+EOS
+      )
+      assert_equal(expected, result)
+    end
+end

data/test/package/styles/test_styles_03.rb

@@ -0,0 +1,90 @@
+# -*- coding: utf-8 -*-
+require 'helper'
+require 'write_xlsx/workbook'
+require 'write_xlsx/package/styles'
+require 'stringio'
+
+class TestStyles03 < Test::Unit::TestCase
+  def test_styles_03
+    workbook = WriteXLSX.new(StringIO.new)
+
+    format1 = workbook.add_format(:num_format => 2)
+    format2 = workbook.add_format(:num_format => 2, :bold => 1)
+    format3 = workbook.add_format(:num_format => '0.0')
+
+    workbook.__send__('set_default_xf_indices')
+    workbook.__send__('prepare_format_properties')
+
+    @style = Writexlsx::Package::Styles.new
+    @style.set_style_properties(
+      workbook.xf_formats,
+      workbook.palette,
+      workbook.font_count,
+      workbook.num_format_count,
+      workbook.border_count,
+      workbook.fill_count,
+      workbook.custom_colors,
+      workbook.dxf_formats
+    )
+    @style.assemble_xml_file
+    result = got_to_array(@style.xml_str)
+    expected = expected_to_array(<<EOS
+<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<styleSheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main">
+  <numFmts count="1">
+    <numFmt numFmtId="164" formatCode="0.0"/>
+  </numFmts>
+  <fonts count="2">
+    <font>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+    <font>
+      <b/>
+      <sz val="11"/>
+      <color theme="1"/>
+      <name val="Calibri"/>
+      <family val="2"/>
+      <scheme val="minor"/>
+    </font>
+  </fonts>
+  <fills count="2">
+    <fill>
+      <patternFill patternType="none"/>
+    </fill>
+    <fill>
+      <patternFill patternType="gray125"/>
+    </fill>
+  </fills>
+  <borders count="1">
+    <border>
+      <left/>
+      <right/>
+      <top/>
+      <bottom/>
+      <diagonal/>
+    </border>
+  </borders>
+  <cellStyleXfs count="1">
+    <xf numFmtId="0" fontId="0" fillId="0" borderId="0"/>
+  </cellStyleXfs>
+  <cellXfs count="4">
+    <xf numFmtId="0" fontId="0" fillId="0" borderId="0" xfId="0"/>
+    <xf numFmtId="2" fontId="0" fillId="0" borderId="0" xfId="0" applyNumberFormat="1"/>
+    <xf numFmtId="2" fontId="1" fillId="0" borderId="0" xfId="0" applyNumberFormat="1" applyFont="1"/>
+    <xf numFmtId="164" fontId="0" fillId="0" borderId="0" xfId="0" applyNumberFormat="1"/>
+  </cellXfs>
+  <cellStyles count="1">
+    <cellStyle name="Normal" xfId="0" builtinId="0"/>
+  </cellStyles>
+  <dxfs count="0"/>
+  <tableStyles count="0" defaultTableStyle="TableStyleMedium9" defaultPivotStyle="PivotStyleLight16"/>
+</styleSheet>
+EOS
+      )
+      assert_equal(expected, result)
+    end
+end